请问vb怎连ado,看了书还是不太明白,连不上
求助!!!!!!!!!!!!!!!!!!!!
求助!!!!!!!!!!!!!!!!!!!!
解决方案 »
- 送分100分:程序中的变量名称与窗体名称或控件名称或类中的属性或方法的名称相同时会有什么影响
- 关于流媒体的实时显示
- 这一段程序我执行错误。为什么呢??请告诉我。提示我If aa.FileExists(FileName) Then这一行错误。
- 请帮我看看我的这条语句错在哪里?
- 我觉得从资源文件中读取文件要比直接读取文件快,请问是不是真的这样,还是我的错觉。如果真的是这样,请问为什么?
- 请教各位,一个文件分割软件的算法怎么写?
- 求一款能编程的报表
- 【分享】让你的桌面背景每天自动更新高清高质量的壁纸(from bing)
- 控件的问题。。。。。。。。。。。。。0
- ?挑战高手!如何实现一个先进先出的队列(具体内容内详)
- 字符串和数字型变量互转的函数,急用,立即结贴!
- 谁有全国邮政编码的数据库?急需
Dim adoCmm As New adodb.Command
Dim adoRec As New adodb.Recordset
adoCnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Program Files\Microsoft Visual Studio\VB98\NWIND.MDB;Persist Security Info=False" adoCmm.ActiveConnection = adoCnn
adoCmm.CommandType = adCmdText
adoCmm.CommandText = "select * from employees"
Set adoRec = adoCmm.Execute
Set MSHFlexGrid1.DataSource = adoRec
Dim Rs As New adodb.Recordset
CN.ConnectionString = "Provider=sqloledb;Data Source=pmserver;Initial Catalog=northwind;User Id=sa;Password=sa;"
CN.Open
Rs.CursorLocation = adUseClient
Rs.Open "select * from employees", CN, adOpenDynamic, adLockBatchOptimistic
Set DataGrid1.DataSource = Rs