在登錄框增加一個(gè)記住密碼按鈕：

• 記住密碼：<input value="1" type="checkbox" name="checkbox"<% If Request.Cookies("OTRememberMeCookie") = "1" Then   Response.Write "CHECKED"   Else   Response.Write ""   End If %>><input type="hidden" name="action" value="true">

  <input type="hidden" name="postion" value="<%=postion%>">

在提交登錄請(qǐng)求時(shí)增加以下處理代碼，將用戶名和密碼寫(xiě)入cookie：

• <%

          If Request.form("checkbox") ="1" Then        Response.Cookies("OTPasswordCookie") = Request.Form("Password")        Response.Cookies("OTRememberMeCookie") = "1"        Response.Cookies("OTPasswordCookie").expires = Date+365        Response.Cookies("OTRememberMeCookie").expires = Date+365        Else        Response.Cookies("OTRememberMeCookie") =""         Response.Cookies("OTPasswordCookie") = ""         End If 

  %>

在用戶登錄成功后添加下面的代碼：

Response.Cookies("UserCookie")("User")=xxx
Response.Cookies("UserCookie")("Password")=md5(pwd, 32)
Response.Cookies("UserCookie").Expires=Date+cookies失效時(shí)間

密碼最好加密。

在網(wǎng)站首頁(yè)添加這樣的代碼：
strUsername=Request.Cookies("UserCookie")("User")
strPassword=Request.Cookies("UserCookie")("Password")
驗(yàn)證這個(gè)cookies里取得的用戶和密碼是否正確，如果正確，就不用登錄了。

Response.Cookies("Username")=用戶名
Response.Cookies("Password")=密碼
這樣設(shè)

然后這樣讀:
Request.Cookies("Username")
Request.Cookies("Username")