动态网页制作实训作业(13)

11111

If error_message<>"" Then

Response.Write error_message & "<p>请<a href='zhuce.asp'>返回</a>重新输入"

Else

response.Cookies("user")=Trim(Request("user_name")) '用户名记入cookies

response.Cookies("password")=Trim(Request("user_pass1"))

response.Cookies("user").expires=date()+3*365

response.Cookies("password").expires=date()+3*365 '有效期限为3年

response.redirect "login.htm"

End If

%>

</body>

</html>

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库动态网页制作实训作业(13)在线全文阅读。