vbs数据库
1. vbs连接上数据库后，如何查询数据（在线等）
一般数据查询返回结果保存在记录集recordset中，而不是数组array中。
set rs = new recordset
rs.open "select name age from students where userid=0001",,
调用的话，可以用rs.fields("name")等。
2. vbs怎样将word书签与数据库中的数据连接
1、首先给出连接数据库的VB代码，
2、定义ADO连接对象，
3、定义数据库连接字符串，
4、获取数据库连接字符串，
5、获取数据库查询语句
6、创建数据库连接对象。
7、利用数据库连接字符串打开数据库。
8、执行sql语句并返回对应的结果集。
9、获得结果集中年龄字段的值。
10、关闭数据库。
11、释放数据库对象。
3. vbs连接mysql
这是复制来的,我之前做过,确实是需要建立DSN数据源,需要去下载mysql驱动
\一种是在ODBC数据源中建立一个DSN。具体方法是：
1、打开控制面板中的ODBD数据源；
2、选择系统DSN，添加一个新的DSN驱动程序；
3、选择MyODBD，出现一个对话框供输入MySQL：
（1）Windows DSN name：所要建立DSN的名称；
（2）MySQL Host (name or ip)：MySQL服务器的名称或IP地址。一般填LocalHost ；
（3） MySQL database name：需要使用数据库的名称。
4、在MySQL管理程序中建立数据库。以数据库chunfeng为例，内有user数据表，两个字段分别是：username和password，我们可以试着加入几个记录：
（1）user：连接数据库的用户名。可填root超级用户；
（2）password：连接数据库用户口令。可不填；
（3）Port(if not 3306)：MySQL在服务器的端口。填默认为3306；
（4）SQL command on connect：使用SQL命令连接数据库。可不填。
全部填完后按OK保存。
好了，我们来连接数据库，ASP代码如下：
<%
strConnection = "dsn=chunfeng;driver={myodbd driver};server=localhost;uid=root;pwd=; database=chunfeng"
Set adoDataConn = Server.CreateObject("ADODB.Connection")
adoDataConn.Open strConnection
strQuery = "SELECT * FROM user"
Set rs = adoDataConn.Execute(strQuery)
If Not rs.BOF Then
%>
<TABLE>
<TR>
<TD<b>用户名</b></TD>
<TD><b>口令</b></TD>
</TR>
<%
Do While Not rs.EOF
%>
<TR>
<TD><%=rs("username")%></TD>
<TD><%=rs("password")%></TD>
</TR>
<%
rs.MoveNext
Loop
%>
</TABLE>
<%
Else
Response.Write("Sorry, no data found.")
End If
rs.Close
adoDataConn.Close
Set adoDataConn = Nothing
Set rsEmailData = Nothing
%>
另一种方法就是把上面ASP代码第二行代码改为：
strconnection="DefaultDir=;Driver={myodbc driver};database=chunfeng"
并且无需建立系统DSN，也不需要用户名和口令。不过不推荐使用这种方法。
4. VBS数据库怎么保存
参数说明：(1)strDBType（数据库类型：如ORACEL；DB2；SQL；ACCESS）
' (2)strDBAlias（数据库别名）
' (3)strUID（用户名）
' (4)strPWD（密码）
' (5)strIP（数据库IP地址：仅SQL SERVER 使用）
' (6)strLocalHostName（本地主机名：仅SQL SERVER 使用）
' (7)strDataSource（数据源：仅ACCESS使用；如d:\yysc.mdb）
5. vbs中oracle数据库接续失败
数据库的字符串是否写错了或者重新配置一下数据库服务名OraID。
先用VB自带的那个直接工具先连上，再把连接地址复制出来，修改一下。
参考格式：Provider=OraOLEDB.Oracle.1;Password=密码;PersistSecurityInfo=True;UserID=用户名;DataSource=数据库网络服务名。