如何在線更改密碼？
更新時(shí)間：2006年11月16日 00:00:00 作者：
<%
id = Request("id")
newpassword = Request("password")
newpasswordtemp = Request("passwordtemp")
If newpassword <> newpasswordtemp Then
Response.Write "<center>對不起,新密碼與新密碼確認(rèn)不同.請重試!</center>"
Response.End
End If
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("userinfo.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set rs = Server.CreateObject("ADODB.Recordset")
sql="update userinfo set 密碼='" & newpassword & "' where id="&id
rs.Open sql, conn, adOpenDynamic, adLockPessimistic
%>
[1]
相關(guān)文章
如何顯示最后十名來訪者？...2006-11-11
如何用變量實(shí)現(xiàn)群聊和悄悄話？...2006-11-11
如何實(shí)現(xiàn)在下拉菜單里輸入文字？...
2006-11-11 
如何用Access加密頁面？...
2006-11-11 
如何判斷URL格式是否符合規(guī)范？...
2006-11-11 
如何在讀取Excel文件時(shí)創(chuàng)建列表的下拉菜單？
如何在讀取Excel文件時(shí)創(chuàng)建列表的下拉菜單？...
2006-11-11 
如何編寫一個(gè)過濾掉HTML代碼的函數(shù)？...
2006-11-11 
如何向前端推送用戶請求的信息？...
2006-11-11 
如何使用表單發(fā)送電子郵件？...
2006-11-11