留言簿關(guān)閉方法:
創(chuàng)新互聯(lián)是一家專注于成都網(wǎng)站設(shè)計、成都網(wǎng)站建設(shè)與策劃設(shè)計,長子網(wǎng)站建設(shè)哪家好?創(chuàng)新互聯(lián)做網(wǎng)站,專注于網(wǎng)站建設(shè)十年,網(wǎng)設(shè)計領(lǐng)域的專業(yè)建站公司;建站業(yè)務(wù)涵蓋:長子等地區(qū)。長子做網(wǎng)站價格咨詢:028-86922220
進(jìn)入后臺-模塊-模塊管理
找到:留言簿模塊 點擊卸載
然后后臺-核心-欄目管理
刪除“留言板”欄目
會員功能關(guān)閉方法:
進(jìn)入后臺-系統(tǒng)-系統(tǒng)基本參數(shù)-會員設(shè)置
把會員功能關(guān)閉就好了
樓主可以去我的論壇看,里面有圖片,看起來更方便些,下面這個留言本絕對可行的
一、安裝與調(diào)試
常聽朋友感嘆ASP程序難學(xué)不易懂,不過我起初學(xué)習(xí)這門技術(shù)的時候也有過這樣的感悟。從今天開始,我將以我學(xué)ASP的經(jīng)驗來做一個簡單的ASP留言本,這個留言本用了Access數(shù)據(jù)庫,所以務(wù)必請大家要跟我一起做的朋友都安裝好Office軟件,相信各位自己的電腦上都有了。好了,開始。
創(chuàng)建ASP的運行環(huán)境(安裝IIS)
IIS(Internet Information Service)是構(gòu)建ASP站點所必須的,所以,我們應(yīng)該先確認(rèn)自己的電腦已安裝了IIS信息服務(wù),如果沒有安裝好的話,請按以下步驟:
1、打開“控制面板”
2、雙擊“添加/刪除程序”
3、單擊“添加/刪除Windows組件”,打開添加/刪除Windows組件對話框:
3、從下拉的列表中選擇“Internet 信息服務(wù)(IIS)”單擊“下一步”:
4、出現(xiàn)組件安裝進(jìn)度窗口,如彈出需要安裝盤的話,放入Windows2000安裝盤,按提示操作即可。直至最后安裝完畢。
二、設(shè)計數(shù)據(jù)庫
ASP程序本身并不能儲存數(shù)據(jù),眾所周知,留言本有以下信息需要保存:留言者姓名、聯(lián)系方式、留言內(nèi)容等等。因為ASP并不能儲存數(shù)據(jù),所以數(shù)據(jù)庫在這種環(huán)境之下就產(chǎn)生了。數(shù)據(jù)庫的種類也很多,針對不同的程序也有適用于它的數(shù)據(jù)庫,比如Access和Ms SQL就比較適用ASP和ASP.net程序,至于其它的數(shù)據(jù)庫和程序,就不屬于本文所討論的問題了,有興趣的朋友可以查看其它一些資料。
那么既然Access和MS SQL都適用ASP,那么具體又如何來選擇呢?我們可以打一個比方:比如釘一枚小釘子,聰明的人一定不會用一個大的棒槌,而是選擇小的鐵錘,雖然用大的棒槌也一樣的可以把釘子釘進(jìn)去,可是沒有人愿意這樣做。
數(shù)據(jù)庫也一樣:Access比較適用小型的應(yīng)用,而MS SQL則適用于大中型的數(shù)據(jù)庫應(yīng)用,所以要做一個留言本,理所當(dāng)然是選擇Access更好一些,但是如果你決心使用MS,沒有人會極力阻止你。好了,廢話少說,切入正題,下面開始創(chuàng)建數(shù)據(jù)庫。
Access是微軟office辦公軟件中的其中一個,默認(rèn)的安裝Office是有這個Access的,好了,打開程序,開始了,GO!
進(jìn)入實戰(zhàn)了。打開程序后,出現(xiàn)一個對話框,這里我們選擇第一個選項”空Access數(shù)據(jù)庫”點擊確定,彈出一個新建數(shù)據(jù)庫的文件框,選擇你上次你建的站點目錄,起個data的文件名,點擊創(chuàng)建,OK! 雙擊”使用設(shè)計器創(chuàng)建表”打開表創(chuàng)建窗口”如圖
創(chuàng)建表的結(jié)構(gòu)如下表:
字段名稱 數(shù)據(jù)類型 備注(筆者注釋)
id 自動編號 設(shè)置“自動編號”
user 文本 留言者姓名
qq 數(shù)字 留言者的QQ,因為QQ號是由數(shù)字組成
email 文本 留言者的電子郵件
content 備注 留言內(nèi)容
data 日期/時間 留言時間,設(shè)定默認(rèn)值為Now()
數(shù)據(jù)庫設(shè)計好了以后,可以直接在數(shù)據(jù)庫里添加兩條記錄,以后測試時候用!
三、連接數(shù)據(jù)庫
在上一節(jié),我們已經(jīng)為我們的程序創(chuàng)建了一個數(shù)據(jù)庫,在這一節(jié)中,我們來用ASP把程序和數(shù)據(jù)庫連接起來,以后就可以連接到數(shù)據(jù)庫、在ASP中顯示數(shù)據(jù)庫中的數(shù)據(jù)以及更復(fù)雜的插入、修改和刪除。
一起看以下代碼,這就是ASP程序中常用的連接數(shù)據(jù)庫的代碼:
%
set conn=server.createobject("adodb.connection")
connstr="Provider=Microsoft.jet.oledb.4.0;data source="server.mappath("data.mdb")
conn.open connstr
%
解釋一下以上代碼:
% 這是ASP程序的起始
set conn=server.createobject("adodb.connection") 在服務(wù)器上創(chuàng)建了一個連接數(shù)據(jù)庫的對象
connstr="Provider=Microsoft.jet.oledb.4.0;data source="server.mappath("data.mdb") 告訴ASP數(shù)據(jù)庫的接接方法以及路徑
conn.open connstr 創(chuàng)建了對象后就用來打開數(shù)據(jù)庫進(jìn)行連接
% 一切OK了!結(jié)束ASP程序
將上面的代碼另存為conn.asp文件,放在服務(wù)器目錄下面就可以了。怎么樣,簡單吧?
四、制作留言本首頁
前面我們已經(jīng)連接好了數(shù)據(jù)庫,就要讓它在這里發(fā)揮一下作用了,這一節(jié)將講述如何將數(shù)據(jù)庫里的數(shù)據(jù)用ASP讀取出來,在頁面中顯示出來,這樣就等于是查看留言本了。
利用DW制作如下頁面(這里我就不講如何去做這個頁面了,最后我將會給出HTML代碼下載)
將制作好的文件存為index.asp,下面就創(chuàng)建數(shù)據(jù)記錄集,用來顯示數(shù)據(jù)庫的數(shù)據(jù)到這個頁面中:
用記事本打開index.asp,在頁頭加入以下代碼:
%@LANGUAGE="VBScript" codepage="936"%
!--#include file="conn.asp"--
%
set rs=server.createobject("adodb.recordset")
sql="select user,qq,email,content,data from main order by id desc"
rs.open sql,conn,1,1
%
代碼拷貝框
%@LANGUAGE="VBScript" codepage="936"%
!--#include file="conn.asp"--
%
set rs=server.createobject("adodb.recordset")
sql="select user,qq,email,content,data from main order by id desc"
rs.open sql,conn,1,1
%
[Ctrl+A 全部選擇 然后拷貝]
解釋一下:
第一行,表明ASP使用的是VB腳本
第二行,是用include包含文件,這里包含的是數(shù)據(jù)庫連接文件。
第三行,ASP程序開始
第四行,利用Server內(nèi)置對象創(chuàng)建一個記錄集
第五行, SQL語句,這里的意思是選擇數(shù)據(jù)庫中的user,qq,email,content,data字段,指定該數(shù)據(jù)表的名稱是“main”數(shù)據(jù) 的排列順序是倒序。
第六行,用剛才創(chuàng)建的名為rs的記錄集打開數(shù)據(jù)庫,設(shè)置屬性為只讀(1,1為只讀數(shù)據(jù),1,3為插入數(shù)據(jù),2,3是修改數(shù)據(jù)。
這樣就打開了數(shù)據(jù)庫,接下來就可以顯示了。
將“留言人”代替為“%=rs("user")%
“時間”代替為“%=rs("data")%
“留言內(nèi)容在此”代替為“%=rs("content")%
“QQ”鏈接到:;%=rs("qq")%
“郵件”鏈接到:mailt%=rs("email")%
最后將“填寫留言”鏈接 add.asp “管理留言”鏈接 admin.asp
好了,再次保存,瀏覽看看!
怎么了?只顯示一條記錄?原來我們在數(shù)據(jù)庫里添加了兩條記錄的哦!還有一條呢?別急,因為我們沒有指定ASP循環(huán)顯示,所以就只有一條啦。。。
在剛才的代碼后面添加一行
%do while not rs.eof%
并在頁面的第一個表格的末尾加上
%
rs.movenext
loop
%
上面的代碼就是說用rs記錄集指針一條一條往下一條移動,直到末尾,loop是循環(huán)的意思。。哈哈,再次瀏覽這個文件
看明白了嗎,這樣就可以讓數(shù)據(jù)庫中的數(shù)據(jù)全部顯示在頁面中了。
五、制作添加留言頁面,實現(xiàn)留言功能
我們是做的一個留言本,實現(xiàn)留言的功能就十分重要了,要不然就算不上留言本了,接下來就一起來實現(xiàn)這個功能。
用DW制作以下這樣的頁面:
設(shè)置表單的屬性如下:
姓名:設(shè)置為單行文本域,名稱為“user”
QQ號:設(shè)置為單行文本域,名稱為“qq”
郵件:設(shè)置為單行文本域,名稱為“email”
內(nèi)容:設(shè)置為多行文本域,名稱為“content”
最后將表單的“Action”動作指向addsave.asp就可以了。
保存文檔名為add.asp,OK!下一步!
表單是做好了,但是還需要后臺程序的支持,一起來使用ASP編寫一個添加留言處理程序,添加留言代碼:
%@LANGUAGE="VBScript" codepage="936"% 表明ASP使用的是VB腳本
!--#include file="conn.asp"-- 是用include包含文件,這里包含的是數(shù)據(jù)庫連接文件
%
set rs=server.createobject("adodb.recordset") 利用Server內(nèi)置對象創(chuàng)建一個記錄集
sql="select user,qq,email,content,data from main" SQL語句,上節(jié)有詳解
rs.open sql,conn,1,3 用剛才創(chuàng)建的名為rs的記錄集打開數(shù)據(jù)庫,設(shè)置屬性為插入數(shù)據(jù)
rs.addnew 用記錄集新添加一條數(shù)據(jù)
user=request.form("user") 請求表單的變量,定義變量為user,這里request.form是請求表單的意思
qq=request.form("qq") 請求表單的變量,定義變量為qq,這里request.form是請求表單的意思
email=request.form("email") 請求表單的變量,定義變量為email,這里request.form是請求表單的意思
content=request.form("content") 請求表單的變量,定義變量為content,這里request.form是請求表單的意思
rs("user")=user 將請求到的表單值傳向記錄集中代表user字段的名稱
rs("qq")=qq 將請求到的表單值傳向記錄集中代表qq字段的名稱
rs("email")=email 將請求到的表單值傳向記錄集中代表email字段的名稱
rs("content")=content 將請求到的表單值傳向記錄集中代表content字段的名稱
rs.update 更新一下數(shù)據(jù)庫中的數(shù)據(jù)。
rs.close 關(guān)閉記錄集
set rs=nothing 銷毀記錄集
conn.close 關(guān)閉數(shù)據(jù)庫連接
set rs=nothing 銷毀數(shù)據(jù)庫連接
%
代碼拷貝框
%@LANGUAGE="VBScript" codepage="936"% 表明ASP使用的是VB腳本
!--#include file="conn.asp"-- 是用include包含文件,這里包含的是數(shù)據(jù)庫連接文件
%
set rs=server.createobject("adodb.recordset") 利用Server內(nèi)置對象創(chuàng)建一個記錄集
sql="select user,qq,email,content,data from main" SQL語句,上節(jié)有詳解
rs.open sql,conn,1,3 用剛才創(chuàng)建的名為rs的記錄集打開數(shù)據(jù)庫,設(shè)置屬性為插入數(shù)據(jù)
rs.addnew 用記錄集新添加一條數(shù)據(jù)
user=request.form("user") 請求表單的變量,定義變量為user,這里request.form是請求表單的意思
qq=request.form("qq") 請求表單的變量,定義變量為qq,這里request.form是請求表單的意思
email=request.form("email") 請求表單的變量,定義變量為email,這里request.form是請求表單的意思
content=request.form("content") 請求表單的變量,定義變量為content,這里request.form是請求表單的意思
rs("user")=user 將請求到的表單值傳向記錄集中代表user字段的名稱
rs("qq")=qq 將請求到的表單值傳向記錄集中代表qq字段的名稱
rs("email")=email 將請求到的表單值傳向記錄集中代表email字段的名稱
rs("content")=content 將請求到的表單值傳向記錄集中代表content字段的名稱
rs.update 更新一下數(shù)據(jù)庫中的數(shù)據(jù)。
rs.close 關(guān)閉記錄集
set rs=nothing 銷毀記錄集
conn.close 關(guān)閉數(shù)據(jù)庫連接
set rs=nothing 銷毀數(shù)據(jù)庫連接
%
[Ctrl+A 全部選擇 然后拷貝]
將以上文件存為addsave.asp,測試下!咦?怎么填好提交以后就出現(xiàn)空白了,為什么?這是因為在addsave.asp中沒有設(shè)置數(shù)據(jù)成功提交好后的轉(zhuǎn)向頁面,這里不用做那么復(fù)雜的,只要做一個刷新頁面就行了,在程序的后面加上:
meta http-equiv="refresh" content="2;URL=index.asp"
然后在頁面中添加提示信息,比如:“您的留言已經(jīng)成功提交,2秒鐘后將自動返回留言本首頁”
好了,這個留言的功能總算實現(xiàn)了,最后再測試下,看看效果!
OK!
六、制作管理登陸頁面
留言本的管理功能對于留言本來說就不言而喻了,像論壇的登陸功能就是一個很好的例子,不過我們做留言本基本上有刪除功能就行了,寫這個教程是為了更多的ASP入門者更好的了解ASP,所以旨在學(xué)習(xí)用,當(dāng)然也可以在這基礎(chǔ)上添加更多的功能,比如回復(fù)留言者。
好了,開始了,還是按照以前的,用Dreamweaver做一個登陸頁面,如下圖:
把用戶名的表單名稱設(shè)置為admin,密碼的表單名稱設(shè)為password,把動作指向checkpass.asp,,存admin.asp這樣登陸頁面就好了,
下面就做檢測密碼的ASP程序了,看以下代碼解釋:
!--#include file="conn.asp"-- 把conn.asp包含進(jìn)來連接數(shù)據(jù)庫
% ASP起始
admin=request.form("admin") 定義admin的值是表單傳過來的用戶名域名稱admin
password=request.form("password") 定義admin的值是表單傳過來的用戶名域名稱admin
if admin="" or password="" then 這句的意思是假如用戶名和密碼沒有輸入的話那么執(zhí)行下一句
response.Write("script language=javascriptalert(請?zhí)顚懲暾?);history.go(-1)/script") 用javascript腳本提示用戶
end if 結(jié)束if語句
sql="select * from admin where admin="admin" and password="password"" 這句很重要,我們放到后面講
set rs=conn.execute(sql) 設(shè)定記錄集rs,用conn執(zhí)行SQL語句
if rs.eof or rs.bof then 當(dāng)沒有符合篩選結(jié)果時,則執(zhí)行下面的句子
response.write "script language=javascript"
response.write "alert(用戶或密碼不對!);"
response.write "javascript:history.go(-1);"
response.write "/script" 用javascript腳本提示用戶
else 如果符合條件的時候
session("admin")=admin 新建session,值等于表單傳來的用戶名
response.redirect "mymanage.asp" 轉(zhuǎn)向到mymanage.asp,進(jìn)入管理頁
end if 結(jié)束if語句
% ASP結(jié)束
代碼拷貝框
!--#include file="conn.asp"-- 把conn.asp包含進(jìn)來連接數(shù)據(jù)庫
% ASP起始
admin=request.form("admin") 定義admin的值是表單傳過來的用戶名域名稱admin
password=request.form("password") 定義admin的值是表單傳過來的用戶名域名稱admin
if admin="" or password="" then 這句的意思是假如用戶名和密碼沒有輸入的話那么執(zhí)行下一句
response.Write("script language=javascriptalert(請?zhí)顚懲暾?);history.go(-1)/script") 用javascript腳本提示用戶
end if 結(jié)束if語句
sql="select * from admin where admin="admin" and password="password"" 這句很重要,我們放到后面講
set rs=conn.execute(sql) 設(shè)定記錄集rs,用conn執(zhí)行SQL語句
if rs.eof or rs.bof then 當(dāng)沒有符合篩選結(jié)果時,則執(zhí)行下面的句子
response.write "script language=javascript"
response.write "alert(用戶或密碼不對!);"
response.write "javascript:history.go(-1);"
response.write "/script" 用javascript腳本提示用戶
else 如果符合條件的時候
session("admin")=admin 新建session,值等于表單傳來的用戶名
response.redirect "mymanage.asp" 轉(zhuǎn)向到mymanage.asp,進(jìn)入管理頁
end if 結(jié)束if語句
% ASP結(jié)束
[Ctrl+A 全部選擇 然后拷貝]
將以上代碼保存為checkpass.asp
這樣,用戶在admin.asp頁面中輸入用戶名和密碼后,就把用戶名和密碼值傳給checkpass.asp處理,當(dāng)用戶名和密碼的值和數(shù)據(jù)庫中的字段相匹配時,就進(jìn)入mymanage.asp這個管理頁面,同時建一個session,這個session的會話變量將在后面起作用,
七、制作管理頁面
上節(jié)中講的是制作登陸頁面和檢測用戶,當(dāng)用戶名和密碼正確時就轉(zhuǎn)到管理頁面,好了,開始實現(xiàn)它。
其實這個留言本的管理頁面和用戶直接看到的首頁沒有多大的區(qū)別,只是用了Session會話變量用作保護(hù)和增加了一個刪除鏈接,當(dāng)點擊這個鏈接的時候,就會自動刪除這條留言,好了,其本的目的知道了,那就GO!
剛才講了,這個頁面和首頁的index.asp相似,那么就先復(fù)制就行了,然后再改一下
首先找到下面這句:
sql="select user,qq,email,content,data from main order by id desc"
把它改為
sql="select id,user,qq,email,content,data from main order by id desc"
這樣,就選取到了id這個自動編號的值,以便刪除留言時鎖定這個id。
然后在“郵件”這個鏈接后面增加一個鏈接“刪除”,鏈接:del.asp?id=%=rs("id") ,修改代碼后為a href="del.asp?id=%=rs("id")%" onclick="return confirm(是否確定刪除本留言?);"刪除/a 這樣,待會我們做del這個頁的時候,就會知道為什么了!
改過后存為mymanage.asp
現(xiàn)在打開瀏覽器看看!
怎么不用輸入用戶名和密碼都可進(jìn)入呀?別急,上節(jié)中,我們不是建了一個session的會話變量,這時就派上用場了,直接用記事本打開。在%@LANGUAGE="VBScript" codepage="936"%這句的后面加上%if session("admin")"" then%這句,在末尾寫上:
%
else
response.Redirect("admin.asp")
end if%
下面來講解一下。
%if session("admin")"" then% 就是說如果session這個("admin")的值不是空的話就執(zhí)行。
%
else
response.Redirect("admin.asp")
end if% 為空的話就轉(zhuǎn)向登陸頁,重新登陸,這樣的話,直接輸入網(wǎng)址的話就會跳到admin.asp,簡單吧!
八、刪除留言
上節(jié)我們增加了一個刪除留言的鏈接,以下是這個del.asp的代碼
!--#include file="conn.asp"--
%
set rs=server.createobject("adodb.recordset")
id=Request.QueryString("id")
sql="select * from main where id="id
rs.open sql,conn,2,3
rs.delete
rs.update
%
很明了吧,才幾句,第1、2、3句都不用我解釋了,大家都在上幾節(jié)中明白了。
第4句:
id=Request.QueryString("id") 用id取值字符串中傳的id,回頭看一下刪除的鏈接:del.asp?id=%=rs("id")% 就是這個鏈接才把id的值傳來的,%=rs("id")%是讀取數(shù)據(jù)庫中的自動編號字段中的id。
第5句:
用sql定義SQL語句,這里的*是通配符,表示所有,而Where有點像我們漢語中的“當(dāng)”,整句話的意思是選擇所有來自表名為main的字段,它的條件是當(dāng)數(shù)據(jù)庫中的id字段是字串所傳來的id。如果這個沒有的話這個一時間不明白也不要緊,慢慢接觸就知道了。
第6句是打開符合條件的記錄,確切的講不應(yīng)該叫記錄集了,因為經(jīng)過我們這樣篩選的話,記錄絕對是一條,2,3指定可以對數(shù)據(jù)庫中的數(shù)據(jù)進(jìn)入修改。
第7、8句
rs.delete 看了就明白了,原來這才是整個程序的精髓,就是執(zhí)行刪除了。
rs.update 這是更新數(shù)據(jù)庫中的表,刪除后就更新。
最后大家自己用rs.close和conn.close釋放。
經(jīng)過些學(xué)習(xí),大家應(yīng)該對ASP有所了解和認(rèn)識了,這個做ASP留言本的教程就到此結(jié)束了。歡迎大家到新視野QQ群里面共同討論學(xué)習(xí)。
首先找到\SCRIPT\common.js文件,找到如下代碼,去掉雙斜杠
"
if(strEmail==""){
//alert(str01);
//return false;
}
"
然后找到\THEMES\當(dāng)時所應(yīng)用的主題\TEMPLATE\b_article_commentpost.html
查找代碼label for="inpEmail"#ZC_MSG053#,修改為label for="inpEmail"#ZC_MSG053#(*)!
在后臺的左側(cè)的導(dǎo)航欄里 有一個 評論管理 你在 那里邊找找找看
網(wǎng)頁名稱:zblog+關(guān)閉留言本 關(guān)閉留言板
標(biāo)題網(wǎng)址:http://bm7419.com/article30/dohjdso.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供虛擬主機、自適應(yīng)網(wǎng)站、用戶體驗、做網(wǎng)站、移動網(wǎng)站建設(shè)、品牌網(wǎng)站設(shè)計
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)