标题: [问题求助] VBS脚本ADO怎么连接读取SQL里面的表的内容? [打印本页]
作者: czjt1234 时间: 2016-3-20 12:34 标题: VBS脚本ADO怎么连接读取SQL里面的表的内容?
SQLManager,设置数据库用户名密码,可以打开数据库,看到里面的表及内容
[attach]9695[/attach]- Set conn = CreateObject("ADODB.Connection")
- conn.Open "Driver={SQL server};server=192.168.0.251;uid=NetCafe;pwd=123456;"
- MsgBox conn.DefaultDatabase
复制代码
MsgBox 语句显示 master
说明已经连接成功
请问怎么用ADO Recordset查询里面的表的数据?
作者: happy886rr 时间: 2016-3-20 12:59
回复 1# czjt1234
哪种语言,你的连接字符串是什么?
作者: czjt1234 时间: 2016-3-20 13:42
- Set conn = CreateObject("ADODB.Connection")
- conn.Open "Driver={SQL server};server=192.168.0.251;uid=NetCafe;pwd=123456;"
- conn.Execute("select * from console_clientpc_list")
复制代码
第三行对象名无效
是不是要指定什么数据库先?
作者: happy886rr 时间: 2016-3-20 13:59
本帖最后由 happy886rr 于 2016-3-20 14:02 编辑
回复 3# czjt1234
database=哪去了。端口不是默认需要加上。就这两点,其他都没问题。
还有服务器是否设置了IP拦截
作者: yu2n 时间: 2016-3-20 14:01
SQL Server- Dim StrDBConn1
- StrDBConn1 = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=user123;Password=pwd123;Initial Catalog=MyDB;Data Source=SqlServer-Name"
- Set objRS1 = CreateObject("ADODB.RecordSet")
- Set objsConn1 = CreateObject("ADODB.Connection")
- strSQL1 = "Select * from User where name='" & CName & "'"
- objsConn1.ConnectionString = StrDBConn1
- objsConn1.Open
- objRS1.Open strSQL1, objsConn1, 3, 3
- If objRS1.RecordCount > 0 Then
复制代码
Access- Set conn = CreateObject("adodb.connection")
- Set rs = CreateObject("ADODB.Recordset")
-
- strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
- "Data Source=D:\TEST.MDB;" & _
- "Password=Abcd123;" & _
- "User ID=datamaintain;"
- strSql = "select * from `Users`"
-
- conn.Open strConn
- With rs
- .ActiveConnection = conn
- .CursorLocation = adUseClient
- .CursorType = adOpenKeyset
- .LockType = adLockOptimistic
- .Open strSql
- End With
复制代码
作者: czjt1234 时间: 2016-3-20 14:39
回复 4# happy886rr
我是本机连接的,没有端口问题
还有如果指定了database,由于该文件正在使用中,会无法打开
该文件在windows里也是无法复制的,因为正在使用中
SQLManager可以打开,那么它是打开的哪个数据库,默认数据库怎么表示
怎么打开默认数据库
作者: czjt1234 时间: 2016-3-20 14:43
回复 5# yu2n
一样,由于数据库文件D:\Program Files\Hintsoft\PubwinServer\database\local_Data.MDF在使用中
提示无法打开登录'D:\Program Files\Hintsoft\PubwinServer\database\local_Data.MDF'中请求的数据库
作者: czjt1234 时间: 2016-3-20 14:54
我用SQLManager连接,也没有指定数据库文件啊
它是不是打开默认数据库?
作者: czjt1234 时间: 2016-3-20 14:56
- Set conn = CreateObject("ADODB.Connection")
- conn.Open "Driver={SQL server};server=192.168.0.251;uid=NetCafe;pwd=123456;"
- conn.Execute("SELECT name FROM Sysusers where status='2' and islogin='1'")
复制代码
这个没有报错,说明已经连上了数据库
怎么读取表格?
作者: happy886rr 时间: 2016-3-20 15:02
回复 9# czjt1234
你为什么非要读取sql的默认数据库?那个只有sa用户才能看到。新建一个其他数据库,试试看。
作者: czjt1234 时间: 2016-3-20 15:04
我就要读取顶楼图示里的一个表的数据
作者: czjt1234 时间: 2016-3-20 15:05
9楼的,是读取用户的,怎么把读取的用户显示出来?
我就是基础语法不会
作者: czjt1234 时间: 2016-3-20 15:07
本帖最后由 czjt1234 于 2016-3-20 15:12 编辑
回复 10# happy886rr
因为我指定数据库文件是打不开的,正在使用中
而SQLManager打开默认数据库是可行的
我运行SQLManager时,只输入了用户名密码。没有指定数据库文件
作者: czjt1234 时间: 2016-3-29 14:25
SQLManager,设置数据库用户名密码,可以打开数据库,看到里面的表及内容
图在顶楼- Set conn = CreateObject("ADODB.Connection")
- conn.Open "Driver={SQL server};server=192.168.0.251;uid=NetCafe;pwd=123456;"
- MsgBox conn.DefaultDatabase
复制代码
MsgBox 语句显示 master
说明已经连接成功
请问怎么用ADO Recordset查询里面的表的数据?
欢迎光临 批处理之家 (http://bathome.net./) |
Powered by Discuz! 7.2 |