VB如何连接远程 SQLServer2000? VB如何连接远程 SQLServer2000用DAO ,ADO那种都行.请给出代码谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Dim MyCn As ADODB.ConnectionDim RsEmployee As ADODB.RecordsetPrivate Sub Form_Load()Set MyCn = New ADODB.ConnectionMyCn.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=" + “数据库用户名” + ";password='" + “数据库用户口令” + "';Initial Catalog=" + “数据库名” + ";Data Source=" + "服务起器的计算机名"Set RsEmployee = New ADODB.RecordsetRsEmployee.CursorLocation = adUseClientRsEmployee.Open "查询语句", MyCn, adOpenStatic, adLockOptimisticEnd Sub这只是一个简单示范连接语句,自己可以在此基础上扩展 CloseServiceHandle关闭的是什么? vb生成EXE后出现的几个问题? Excel 组件 vb 关于数据保存与调用 [求助]VB怎样ListView内容数据保存到Word文档里呢 如何让控件背景色实现Alphp淡入淡出的效果? (客户端调用服务器端DLL问题)非常急,希望高人指点小弟 各位大侠帮帮忙!急!!!有高分! 急,有分送 Data Report如何实现 每页小计、累计 什么叫多步操作产生错误啊? 高分求助U盘与DOS
Dim RsEmployee As ADODB.RecordsetPrivate Sub Form_Load()
Set MyCn = New ADODB.ConnectionMyCn.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=" + “数据库用户名” + ";password='" + “数据库用户口令” + "';Initial Catalog=" + “数据库名” + ";Data Source=" + "服务起器的计算机名"Set RsEmployee = New ADODB.Recordset
RsEmployee.CursorLocation = adUseClient
RsEmployee.Open "查询语句", MyCn, adOpenStatic, adLockOptimistic
End Sub这只是一个简单示范连接语句,自己可以在此基础上扩展