'插入記錄*************************
function sqlinsert(itablename,ifileldb,idatabase)
for i = lbound(ifileldb) to ubound(ifileldb)
if i <> ubound(ifileldb) then
if ifileldb(i+1) <> empty then
ifileldbs = ifileldbs & ifileldb(i) & ","
idatabases = idatabases & idatabase(i) & ","
else
ifileldbs = ifileldbs & ifileldb(i)
idatabases = idatabases & idatabase(i)
end if
else
ifileldbs = ifileldbs & ifileldb(i)
idatabases = idatabases & idatabase(i)
end if
next
sql = "insert into [" & itablename & "](" & ifileldbs & ") values(" & idatabases & ")"
con.execute(sql)
end function
'更新記錄*************************
function sqlupdate(utablename,ufileldb,udatabase,qualification)
for i = lbound(ufileldb) to ubound(ufileldb)
if ufileldb(i) = empty then exit for
if i <> ubound(ufileldb) then
if ufileldb(i+1) <> empty then
result = result & (ufileldb(i) & "=" & udatabase(i) & ",")
else
result = result & (ufileldb(i) & "=" & udatabase(i))
end if
else
result = result & (ufileldb(i) & "=" & udatabase(i))
end if
next
sql = "update [" & utablename & "] set " & result & " where " & qualification & ""
con.execute(sql)
end function
'定義變數和陣列*************************
dim itablename,ifileldb(1),idatabase(1),utablename,ufileldb(1),udatabase(1)
'插入記錄*************************
itablename = "t_admin" '資料表名稱
ifileldb(0) = "username" '欄位名稱
idatabase(0) = "'" & request.form("username") & "'" '表單名稱
ifileldb(1) = "password"
idatabase(1) = "'" & md5(trim(request.form("password")),32) & "'"
sqlinsert itablename,ifileldb,idatabase '呼叫函式
'更新記錄*************************
utablename = "t_admin" '資料表名稱
ufileldb(0) = "username" '欄位名稱
udatabase(0) = "'" & request.form("username") & "'" '表單名稱
if request.form("password") <> empty then
ufileldb(1) = "password"
udatabase(1) = "'" & md5(trim(request.form("password")),32) & "'"
end if
sqlupdate utablename,ufileldb,udatabase,"id=" & request.form("id") 'id為條件,呼叫函式
陣列長度從0開始,2個字段的把陣列長度定義為1,可以按照需要更改長度.
以上方法有效避免繁瑣的資料庫操作**編寫,避免不必要的錯誤,節省了除錯的時間.
ASP對資料庫的訪問
文 王漢洲 asp即active server page，是微軟推出的動態web設計技術，是用於www服務的伺服器端指令碼環境，在站點的web伺服器上解釋指令碼，可產生並執行動態 互動式 高效率的站點伺服器應用程式。概述利用asp，我們可以很容易地把html 超文字標記語言 文字 指令碼命令及act...
利用ASP備份SQL SERVER資料庫
if session user name then response.write end if call connlink name session user name set rs1 server.createobject adodb.recordset sql1 select from user...
利用jsp mysql 對資料庫進行訪問
connection conn null statement stmt 載入資料庫驅動類 class.forname com.mysql.jdbc.driver newinstance 資料庫連線url string url jdbc mysql 我本地資料庫的名稱叫做ysp 資料庫使用者名稱和密碼...