ASP技術在論壇中的運用(三)（吐血推薦！?。。。?/h1>

2019-11-18 22:42:08

字體：大 中 小

來源：轉載

供稿：網友

　先要給出一個表單，能夠讓網友輸入注冊信息，這些是HTML的內容，且放在一邊，我們來仔細看看具體實現注冊的asp腳本。

　　' 將數據中的單引號改成兩個單引號，并且在前后加上單引號

　　Function SqlStr( data )

　　 SqlStr = "'" & Replace( data, "'", "''" ) & "'"

　　End Function

　　這是一個自定義的函數，用來把用戶輸入中的單引號（’）轉換成兩個單引號（’’）。在ASP中，用雙引號圍著的是字符串，因而上面的"'"代表的就是只有一個單引號的字符串。之所以要把一個單引號換成兩個單引號，這是因為在SQL語句中，用單引號圍起來是用來代表變量的。為了不至于混淆，就要把字符串中的單引號用兩個單引號來表示。而所有的用戶輸入都要作為變量嵌入到SQL語句中的，所以這個函數是必不可少的。

　　

　　'存貯準備

　　id=Request("id")

　　passWord=Request("password")

　　nickname=Request("nickname")

　　email=Request("email")

　　sex=request("sex")

　　

　　把來自用戶輸入表單中的內容保存在變量中，這不是必須的，但寫了更容易讀寫。

　　

　　if Request("name")="" then name=" " else name=request("name")

　　if Request("phone")="" then phone=" " else phone=request("phone")

　　

　　因為這些內容不是必須填的，為了防止用戶沒有輸入任何內容，而造成數據庫操作上的錯誤，就必須把沒有填入字段用空格來代替。

　　

　　'建立連接

　　Set conn = Server.CreateObject("ADODB.Connection")

　　conn.Open "driver={Microsoft access Driver (*.mdb)};dbq=" & Server.MapPath("bbssystem.mdb")

　　

　　 這一段是建立數據庫連接，數據庫的名稱為bbssystem.mdb，這一段中唯一要注意的是Server.MapPath函數的應用。一般來說，凡是涉及到具體的目錄的地方，都不要直接使用目錄名，而用Server.MapPath函數來代替。善用好Server.MapPath和Request.ServerVariables()等函數，能夠讓你的WEB應用具有更好的可移植性。

　　

　　Set cmd = Server.CreateObject("ADODB.Command")

　　'查詢作者是否已存在

　　Set cmd.ActiveConnection = conn

　　cmd.CommandText = "查詢作者"

　　 ReDim param(0) ' 聲明參數數組

　　param(0) = CStr(id) ' Cint 不可忽略

　　Set rs = cmd.Execute( ,param )

　　

　　這一段就是用來執行存貯查詢的。在ADO中執行查詢的方法有很多種，但是對于存貯查詢就只能使用Command對象了。首先，建立了一個叫做cmd的Command對象，然后把conn連接對象賦給cmd對象的ActiveConnection屬性，把要執行的查詢名稱"查詢作者"賦給CommandText屬性，然后為查詢參數賦值。我們聲明了一個參數數組param(0)，因為在"查詢作者"這個查詢中只有一個參數，所以數組就只有一個分量了。一般的，在查詢中有幾個參數，就要申明有相應分量個數的參數數組。并且參數出現的順序是個數組中分量的順序是對應的。在使用參數查詢的過程中，尤其要注意的是，參數的類型要嚴格匹配，否這就會出錯，所以上面的CStr()類型轉換函數是不可缺少的。

　　

　　if not (rs.eof or rs.bof) then

　　response.write "

錯誤，你輸入的ID號已經被占用，請換一個再試試！
"

　　

　　else

　　

　　sql = "Insert Into 作者表 (id, 昵稱, Email, 密碼,姓名,學校,系別,性別,電話) Values( "

　　sql = sql & SqlStr(id) & ", "

　　sql = sql & SqlStr(nickname) & ", "

　　sql = sql & SqlStr(email) & ", "

　　sql = sql & SqlStr(password) & ", "

　　sql = sql & SqlStr(name) & ", "

　　sql = sql & SqlStr(school) & ", "

　　sql = sql & SqlStr(department) & ", "

　　sql = sql & SqlStr(sex) & ", "

　　sql = sql & SqlStr(phone) & ")"

　　

　　conn.Execute sql

　　調用一個SQL的Insert語句把數據插入到數據庫中。其實這一查詢也可以做成存貯查詢放在數據庫中，我偷了點懶：-）不過對比之下也可以看到存貯查詢的好處，運行時查詢寫起來實在是太麻煩了。

上一篇：ASP技術在論壇中的運用(四)（吐血推薦?。。。。?/a>

下一篇：ASP技術在論壇中的運用(二)（吐血推薦?。。。。?/a>

發表評論 共有條評論 用戶名: 密碼: 驗證碼: 匿名發表

學習交流

更多

• 

  索泰發布一款GTX 1070 Mini迷

• 

  AMD新旗艦顯卡輕松干翻NVIDIA

索泰發布一款GTX 1070 Mini迷你版本:小機

索泰發布一款GTX 1070 Mini迷你版本:小機箱大愛...

• usb無線網卡怎么用,小編告訴你安裝教程09-10
• usb調試在哪,小編告訴你usb調試在哪09-10
• 優盤不顯示,小編告訴你優盤不顯示怎么辦09-10
• 低級格式化,小編告訴你硬盤怎么低級格式化09-10

• 帝國cms分類信息的所在地在的修改09-08
• 將網站地圖和友情鏈接table樣式改為div+css09-08
• 用帝國cms實現不規則新聞或信息調用（應大站09-08
• 帝國調用DZ論壇精華帖09-08
• 用靈動標簽調用discuz和phpwind的最新貼子09-08

熱門圖片

更多

• 

  芭蕾舞蹈表演，真實美到極致

• 

  下午茶時間，悠然自得的休憩

• 

  充斥這繁華奢靡氣息的城市迪拜風景圖片

• 

  從山間到田野再到大海美麗的自然風景圖片

• 

  肉食主義者的最愛美食烤肉圖片

• 

  夏日甜心草莓美食圖片

• 

  人逢知己千杯少，喝酒搞笑圖集

• 

  搞笑試卷，學生惡搞答題

猜你喜歡的新聞

• 榮耀總裁趙明烏鎮演講：榮耀首款5G手機V30下
• 搜狐張朝陽：回歸媒體是搜狐重新崛起的關鍵
• 華為輪值董事長郭平：虛擬技術創造現實價值
• 第六屆世界互聯網大會開幕“to B”端成熱門
• 滴滴英文服務上線兩周年 用戶已超200萬
• 華為推出全球至快AI訓練集群Atlas900
• 馬斯克：特斯拉正組建中國技術團隊
• 10年后6G將問世 速度有望比5G快100倍
• WeworkCEO稱已開始考慮未來職位 不排除放棄
• 谷歌軟件商店模式變革：推出5美元會員 可用數

猜你喜歡的關注

• ASP主件中的安全問題
• 用ASP建立站內搜索
• 利用ASP規劃聊天室
• 用ASP實現網頁保密的兩種方法
• 用ASP實現網頁BBS
• 在ASP中常見的錯誤80004005信息和解決辦法
• 用ASP實現一個真正的注冊頁面
• ASP的Internet/Intranet編程常見問題
• 如何用ASP編寫網站統計系統一
• 如何用ASP編寫網站統計系統二