当前位置:首页 » 操作系统 » vbs数据库操作

vbs数据库操作

发布时间: 2022-08-03 07:54:30

‘壹’ 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,也不需要用户名和口令。不过不推荐使用这种方法。

‘贰’ vbscript 访问MYSQL数据库

还要求啥 "原理" 呀, 难道是作业吗 ...

‘叁’ 怎么用vbs操作数据库(mdb)(500分)

如果你会用sql语句创建数据库、建表、添加表的字段
对表进行增删 查改,那么一切都仅仅是执行sql语句

‘肆’ 我想编一个VBS文件,对数据库进行操作,详情如下

open 路径+文件名(没有会自己创建)for append as #1

‘伍’ 有关VBS脚本通过ADODB对数据库进行操作的教程哪里有

没有的,至少说非西门子高级用户是没有的,如果你参加了西门子高级培训就有这类资料的纸质版,否则只能参照微软的VBS脚本语言帮助手册。

‘陆’ vbs连接上数据库后,如何查询数据(在线等)

一般数据查询返回结果保存在记录集recordset中,而不是数组array中。
set rs = new recordset
rs.open "select name age from students where userid=0001",,

调用的话,可以用rs.fields("name")等。

‘柒’ 想用VBS实行数据库的自动备份,参阅了百度老师的复制程序,如下。如何在存储时以当前日期及时间命名

Set fso = Wscript.CreateObject("Scripting.FileSystemObject")
set c=fso.getfile("f:\xx.mdb")
thepath="e:\"&year(now())&month(now())&day(now())&hour(now())&minute(now())&second(now())&".rar"
c.(thepath)

如果想要日期前面补零参考下面的文章即可

‘捌’ 熟悉vbs sql数据库的请进~~达到要求的回答再追加100分~

php.asp.vb,vc,等程序连接 mysql mssql SQL操作语法几乎一至,问题是你需要连接引用方式

‘玖’ vbs 数据库返回一个结果集,vbs用什么获得,dim吗还是什么,怎么遍历这个结果集,求大神指点

返回的应该是RecordSet

你可以用下面的方法来定义

dim rs as adodb.recordset
set rs=server.CreateObject("adodb.recordset")

然后就可以用append方法,edit方法或者update方法操作。

热点内容
linux切换root用户 发布:2025-01-17 22:50:27 浏览:534
速卖通算法 发布:2025-01-17 22:42:12 浏览:444
编译中标题翻译的特点 发布:2025-01-17 22:42:07 浏览:439
oppok7x激活密码是多少 发布:2025-01-17 22:41:02 浏览:222
按键精灵脚本自动交易分解 发布:2025-01-17 22:30:33 浏览:14
如何恢复安卓60 发布:2025-01-17 22:27:07 浏览:439
正版秒赞源码 发布:2025-01-17 22:25:09 浏览:989
安卓怎么玩pokemon 发布:2025-01-17 22:23:40 浏览:757
软计算算法 发布:2025-01-17 22:23:38 浏览:99
prim求最小生成树算法 发布:2025-01-17 22:23:29 浏览:886