❶ 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干嗎用呢?