❶ vbscript操作数据库的问题
Server=.;数据库路径没写
❷ 帮忙写一个VBS操作数据库的简单脚本
这里是我些的模板! 具体你自己修改! 有点基本的VBS工底就可以了!
==============================================================
dim cn
dim rs
dim row
dim col
dim viewdata '继承返回的查询结果 将从这里获取查询的返回内容
dim mdbpath '这个是mdb数据库文件路径
dim sqlcmd '这里是SQL语句
dim STRsql '返回的查询结果存放在这个变量里
set cn=CreateObject("ADODB.Connection")
set rs=CreateObject("ADODB.Recordset")
mdbpath="d:\pass.mdb"
cn.Open "DSN=dsnmdb;Uid=;Pwd="
SQLcmd="select * from Pathlist"
rs.Open SQLcmd,cn,,,adCmdText
if rs.bof=false then '如果查询结果有返回的则
viewdata=rs.GetRows
STRsql=""
for row=0 to UBound(viewdata,2) '获取二维数组的长度
for col=0 to UBound(viewdata,1)
strsql=strsql & viewdata(col,row) & " "
next
strsql=strsql & vbcrlf
next
end if
rs.close
cn.close
msgbox strsql
❸ 关于VBScript语言,用文本框查询数据库的问题。
我要改的话；
Str=""
if Request.Form("UserID")<>"" then
xxxxx=Request.Form("UserID")
Str = " where id="&xxxxxx
End If
%>
<%
Dim Rs1
Dim Rs1_numRows
Set Rs1 = Server.CreateObject("ADODB.Recordset")
Rs1.ActiveConnection = MM_ebook_STRING
Rs1.Source = "SELECT * FROM ShopBook "&Str
Rs1.CursorType = 0
Rs1.CursorLocation = 2
Rs1.LockType = 1
Rs1.Open()
Rs1_numRows = 0
end if
表单里面是数字，如果是字符 Str = " where 用户名=' "&xxxxxx&" ' "
❹ asp vbscript 操作 access数据库 问题
where 日期='"&date&"' 改成
where 日期=#"&date&"#
❺ 如何使用VBScript访问ORACLE数据库并查询一张表
如何使用VBScript访问ORACLE数据库并查询一张表
不知道你用的什么数据库，权且当作SQL Server
private void showdata()
{
try
{
string selectsql = @"select * from [user]"; //select语句，修改下，应该不难吧
SqlCommand cmd = new SqlCommand(selectsql, conn); //conn就是创建的SqlConnection实例，你如果用到数据库，应该有创建
cmd.CommandType = CommandType.Text;
string info = String.Empty; //表结果
SqlDataReader odr = cmd.ExecuteReader();
while(odr.Read())
{
info = odr[0].ToString() + " " + odr[1].ToString() + "\n";
//具体每行有几列数据，就添加到n-1，0是第一列，你应该也能修改，可以在个数据之间加个空格，以及行末加个回车，自己改。。。
}
infoTxt.Text = info; //将info显示到你说的文本框中，infoTxt为文本框的名称，你应该也可以看懂
}
catch (Exception ex)
{
Console.WriteLine(ex.Message);
}
}
//将函数体部分放入到你的按钮click事件中就可以了
❻ 请教高人VBScript语言中如何连接Access数据库
<%
set conn = createobject("adodb.connection")
ConStr="Driver={Microsoft Access Driver (*.mdb)};dbq=D:\修改\tai\t\Database\datadb.mdb"
conn.open ConStr
set rs = createobject("adodb.recordset")
rs.open "select * from book ",conn, 3, 1, &H0001
reponse.write "ID, NAME" & "<BR>"
Do Until rs.EOF
reponse.write rs("ID") & "," & rs("NAME") & "<BR>"
rs.MoveNext
Loop
rs.Close
conn.Close
Set rs = Nothing
Set conn = Nothing
%>
❼ VBScript链接数据库后如何执行查询,插入,删除,修改语句要例子......谢谢了
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("aspfree.mdb")
set conn = server.createobject("adodb.connection") conn.open strconn //Sqlset adocon=server.createobject("adodb.recordset")
adocon.Open"Driver={SQL Server};Server=(Local);UID=***;PWD=***;"& _
"database=数据库名;"
//insert Set rs = Server.CreateObject("ADODB.Recordset")
sql="insert into Review (ReviewName,ProctID) values ('ww','9787799203249')" rs.open sql,conn,3,3 rs.addnew
rs("reviewname")="ll"
rs.updaters.close
❽ 我想编一个VBS文件,对数据库进行操作,详情如下
open 路径+文件名（没有会自己创建）for append as #1
❾ VBScript写入ACCESS数据库
别做梦啦，页面的里js代码和vbs代码是不可能操作数据库的，要不然还要asp和php干吗用呢?