Sendregister.asp 這一頁從register.asp 中取得表單域的內(nèi)容，將它們插入數(shù)據(jù)庫中。要注意用戶名必須是唯一的。所以，首先查詢要 驗證輸入的用戶名是否已經(jīng)存在。如果是的話，用戶被重新引回register.asp 頁，并被要求選擇另一個用戶名。如果用戶 名是新的，輸入的內(nèi)容就被傳遞給數(shù)據(jù)庫。 sql_findmember = "select count(*) from loginuser where username = '" & username &"'" Set RS_findmember = application("Conn").Execute(sql_findmember) If RS_findmember(0) < > 0 Then session("message") = "THE ENTRY HAD BEEN INSERTED EARLIER .. Please try another log in name" response.redirect "register.asp" End If If RS_findmember(0) = 0 Then sql_insert = "insert into loginuser (username,useremail,passWord) _ values('" & username & "','" & useremail & "', '" & pwd &"') " Set RS_insert = Application("Conn").Execute(sql_insert) Session("message") = "THE ENTRY HAS BEEN INSERTED .. Thank You" response.redirect "index.asp" End If 這樣，如果RS_findmember(0) 返回的值是0，就表示用戶名在數(shù)據(jù)庫中不存在，名字就被輸入了。會員就可以使用站 點的其它部分了。反之，如果RS_findmember(0) 返回的值大于0，用戶就被引導(dǎo)回注冊主頁，并被要求填寫一個新的用戶 名。 還要注意，在向數(shù)據(jù)庫中插入數(shù)據(jù)之前有一些事情需要警惕。替換函數(shù)用來確保當(dāng)訪問者鍵入了"'",就需要用''代 替。 username = replace(request.form("txt_name"),"'","''")
