rst.open "select * from warehouse",myconn
解决方案 »
- ...关于做一个ocx,bs中调用不到模块内函数的问题
- 关于active控件注册的一些问题
- 怎么获取单击datagrid列表的行数?
- vsFlexGrid小数点前面的零没法显示
- 求解
- 周末工作的最后一个问题没有解决,关于存储过程插不进记录问题?,都一个星期了,老板都急了,那位好心人帮帮我
- ********* VBA 问题,来者有分*****************
- 哪里有VB的编码规范文档?
- vb与orcale的连接
- 使用Data控件如何实现数据库的检索?请代码示例
- activexreport在编程的机上已经注册了,生成打包程序后,在其他机安装也要注册吗?
- MSHFlexGrid的双层列怎么设?
如根据select * from warehouse就提取不出数据,
但根据select warehouse from warehouse就可提取数据。
把字段改成unicode类型就可以了,真的好奇怪。但pb中就不存在这种问题。
Private Sub Form_Load()
Dim myconn As New ADODB.Connection
Dim myrst As New ADODB.Recordset
Dim strconn As String, i As Integer, j As Integer
strconn = "provider=SQLOLEDB;Server=myServer;Initial Catalog=FI;User ID=sa ;password=mypass"
myconn.Open strconn
With myrst
.ActiveConnection = myconn
.CursorLocation = adUseClient
.CursorType = adOpenDynamic
.LockType = adLockReadOnly
.Open "select * from FI_warehouse", , , , adCmdText
Set Grid1.DataSource = myrst
End With
End Sub
上面的过程只能返回表的字段名称,表内容无法取得!!