㈠ 請高手花點時間幫我注釋代碼意思，謝謝大家
<%@language=vbscript codepage=936 %>
<!--包含文件-->
<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
''''檢測客戶端提交的用戶名和密碼
''''如果用戶名或密碼任一為空，則設置標置FoundErr為true，設置錯誤提示ErrMsg
dim sql,rs
dim username,password,CheckCode
username=replace(trim(request("username")),"'","")
password=replace(trim(Request("password")),"'","")
if UserName="" then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>用戶名不能為空！</li>"
end if
if Password="" then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>密碼不能為空！</li>"
end if
''''如果FoundErr不等於true，表示密碼和用戶名有效。
if FoundErr<>True then
''''對密碼使用md5進行加密
password=md5(password)
''''創建數據集對象
''''根據加密後的password和username從資料庫中提取數據
set rs=server.createobject("adodb.recordset")
sql="select * from admin where password='"&password&"' and username='"&username&"'"
rs.open sql,conn,1,3
''''如果沒有符合條件的數據，則置錯誤標志FoundErr，設置錯誤提示ErrMsg
if rs.bof and rs.eof then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>用戶名或密碼錯誤！！！</li>"
else
''''有符合條件的數據，但密碼不匹配，此處為防止SQL注入
if password<>rs("password") then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>用戶名或密碼錯誤！！！</li>"
else
''''用戶名和密碼完全匹配
''''取客戶端IP地址
rs("LastLoginIP")=Request.ServerVariables("REMOTE_ADDR")
''''取當前時間
rs("LastLoginTime")=now()
''''將登錄次數加1
rs("LoginTimes")=rs("LoginTimes")+1
''''更新以上數據
rs.update
''''設置Session的值
session("admin")=rs("username")
session("purview")=rs("purview")
rs.close
set rs=nothing
''''關閉數據集，調用CloseConn函數關閉資料庫連接
call CloseConn()
''''客戶端轉向
Response.Redirect "main.asp"
end if
end if
''''用戶名或者密碼無效時，關閉數據集，調用WriteErrMsg顯示錯誤信息，調用CloseConn關閉數據連接
rs.close
set rs=nothing
end if
if FoundErr=True then
call WriteErrMsg()
end if
call CloseConn()
'****************************************************
'過程名：WriteErrMsg
'作 用：顯示錯誤提示信息
'參 數：無
'****************************************************
sub WriteErrMsg()
dim strErr
strErr=strErr & "<html><head><title>錯誤信息</title><meta http-equiv='Content-Type' content='text/html; charset=gb2312'>" & vbcrlf
strErr=strErr & "<link href='../css/normal.css' rel='stylesheet' type='text/css'></head><body>" & vbcrlf
strErr=strErr & "<table cellpadding=2 cellspacing=1 border=0 width=400 class='border' align=center>" & vbcrlf
strErr=strErr & " <tr align='center'><td height='22' class='title'><br><br><strong>出 錯 了 ！</strong><br><br></td></tr>" & vbcrlf
strErr=strErr & " <tr><td height='100' class='tdbg' valign='top'><b>產生錯誤的原因：</b><br>" & errmsg &"</td></tr>" & vbcrlf
strErr=strErr & " <tr align='center'><td class='tdbg'><br><br><a href='../default.asp'>>> 返回登錄頁面</a></td></tr>" & vbcrlf
strErr=strErr & "</table>" & vbcrlf
strErr=strErr & "</body></html>" & vbcrlf
response.write strErr
end sub
%>
真要一行行注釋,打字真的很累
㈡ 花點時間去閱讀，它是什麼____
花點時間去開懷大笑（域外箴言）
王啟國編譯
2006年01月13日
◆花點時間去工作，它是成功的標簽；
◆花點時間去思考，它是力量的來源；
◆花點時間去玩耍，它是永葆青春的秘笈；
◆花點時間去閱讀，它是智慧的源泉；
◆花點時間去學會友善，它是通向快樂的大道；
◆花點時間去夢想，它是載著你駛向星球的馬車；
◆花點時間去愛別人和接受別人的愛，它是上天的詔命；
◆花點時間去到處走走，生命太短暫何忍蹉跎；
◆花點時間去開懷大笑，它是心靈的樂章。
㈢ 花點時間還能撐多久
花點時間去學Take the time to learnspend time on sth/ spend time learning sth上面都可以如果你喜歡學英語，你就要多花點時間去學。You must spend more time on it , If you love learning English .
㈣ 花點時間我要取消一份續訂
想要學校直接取消就預定就好了，這個不需要別人幫助的，你想要取消什麼？在那個平台上直接點擊取消就可以了
㈤ 花點時間是做什麼的有誰知道嗎
回答，花點時間是做什麼的？有誰知道時間就是金錢，生命要爭取時間，什麼事情就可以做的完完整整勝利在望，珍惜時間
㈥ 花點時間的「每周一花」怎麼樣
花點時間的「每周一花」是指他們的包月鮮花服務，通過網上預訂，確定周期，有包月、包季度和包年好幾種方式，肯定是時間越長越劃算。不過包月鮮花本身就很值了，才99塊錢，在每周一能收到應季鮮花，也可以周六收到鮮花，很人性化。花點時間有很多實體加盟店，也無需擔心售後啥的。
㈦ 花點時間怎麼取消續訂
花點兒時間怎麼取消續訂話的時間，找到個人中心設置進入到賬戶中心。取消定製。