第一篇:留言簿的制作步驟
留言簿的制作步驟: 1> ACCESS中的數據表的建立:文件名:
表中必有字段:ID——自動編號;姓名——文本;性別——文本(值為01或02);留言主題——文本;留言——備注(255);發表時間——時間或日期(默認值為函數NOW)
保存位置:站點根目錄。
2> 創立動態站點 3> 數據源的連接
A:自定義Provider=Microsoft.Jet.OLEDB.4.0;Data Source=“&server.mappath(”db1.mdb“)B:(嘗試)數據源:管理工具中數據源的設置。(系統DSN)
4> liuyanban.asp文件的建立
界面設計(略)
應用程序——綁定
姓名——{Recordset1.xinming};發表時間——{Recordset1.fbshijian};留言主題——{Recordset1.liuyanhuti};留言——{Recordset1.liuyan} 重點(難點):頭像(根據性別輸出頭像)插入圖像(來自數據源)images/<%=(Recordset1.Fields.Item(”xinbie“).Value)%>.jpg
(在站點下建有images文件夾,內有01.jpg 和02.jpg)應用程序——服務器行為——重復區域;記錄集分頁 5> charuliuyan.asp文件的制作
界面設計(略)
表單元素(性別用單選按鈕組,值分別為01或02)
應用程序——服務器行為——插入記錄
6> 功能——刪除記錄
liuyanban.asp——選中文本(刪除)轉到詳細頁面: ID shachuly.asp忽略: 界面設計(略)
表單元素綁定(性別)移至特定記錄 刪除記錄
7> 功能——修改記錄
liuyanban.asp——選中文本(修改)轉到詳細頁面: ID xiugaily.asp忽略: 界面設計(略)
表單元素綁定(性別)移至特定記錄ID 修改記錄
補充功能:計數器(訪問次數)——liuyanban.asp
這是你第 {Application.count}次訪問這張網頁了!!應用程序——綁定——應用程序變量count
<%Application(”count“)= Application(”count")+1 %>
練習:通訊錄系統
第二篇:學用asp+access制作留言簿
學用asp+access制作留言簿
前言:這是一篇asp+access的留言簿教程,運行測試環境:win2000+IE5.0。此篇教程適合對asp有一定了解的人,如果是初學者,建議先看點asp方面的書籍,或者本站XML+ASP的一些文章和論壇的一些貼子,至少能對變量、語法、函數、對象等有一個大概的了解。
一、總體思路
留言簿雖小,但對asp知識的要求還是挺全面的。首先對留言簿要完成的功能做一個大體的介紹。在設計一個項目時,最好能夠構思出大體輪廓并寫出來,這樣就不會越做越亂,到最后自己都不知道自己要做什么!
1、單用戶版:這篇教程中所要完成的留言簿只有一個管理員,所有人不需要注冊就可留言。
2、留言者必須填寫用戶名、QQ號、郵箱、主頁、留言內容、留言時間、可以使用悄悄話功能、可以獲取用戶IP地址,其中留言內容可以使用簡單的UBB功能。
3、可以實現一定的管理功能:刪除留言、編輯留言、自定義頁頭和頁低、定義留言數、寫公告、對留言簿進行一些最簡單的配置等。
4、主要用asp+access2000完成
5、如果必要大家可以加搜索功能。
6、在程序設計中,盡量使用模塊化,減少大量無用代碼。
二、數據庫構造
1、數據庫名: data.mdb
說明:在設計留言簿的過程中,可以保持此名,設計完畢后可以改為data.asp,以保證數據庫的安全性。
2、數據庫表:總共有三個表:
(1)admin 主要記錄管理員的用戶名和密碼以及一些基礎信息。
(2)content 用來記錄用戶留言內容
(3)gbfined 用來記錄留言簿的一些基本配置,如題頭圖片地址、圖片長度高度、留言簿每頁的留言條數,公告內容等等。
3、數據庫表的具體設計:
(1)admin表
字段名
類型
長度
說明
admin_name
文本
默認
存儲管理員的名字 admin_password
文本
默認
存儲管理員的密碼 admin_qq
文本
默認
存儲管理員的oicq號 admin_email
文本
存儲管理員的郵箱
admin_homepage
文本
150
存儲管理員的主頁地址 admin_webname
文本
150
存儲管理員的主頁名稱
說明:A、“常歸”項中的“允許空字符串”最好填“是” B、表格設計完后最好能夠填入數據: admin_name:admin admin_password: admin admin_qq: 57146
admin_email: daifo@5dmeng.com
admin_homepage: http://www.tmdps.cn“> ,asp教程,織夢帝國,織夢帝國留言簿,呆佛,daifo,code,download,articles,guestbook,源代碼“>
sub bottom(gb_editioner)%>
|
然后在index.asp中加入下面代碼:
<%call bottom(gb_editioner)%>
把所有文件保存到guestbook文件夾中,然后在瀏覽器是軟件入http://localhost/guestbook/index.asp.數據庫文件的擴展名還能改的。為了數據庫的安全性,建議你在設計完一個項目后,改動的你數據庫文件名為:****.asp。
現摘錄一網友對數據庫(表)的幾段語句,在本教程中并未用到這些語句,但是很有幫助,大家可以和我對數據庫的操作比較一下:
'******************************************************************* '打開數據庫
sub opendb(connect)set connect=server.CreateObject(”ADODB.connection“)
connect.ConnectionString=”DRIVER={Microsoft Access Driver(*.mdb)};DBQ=“ & server.MapPath(databasename)connect.Open strconn end sub
'******************************************************************* '關閉數據庫
sub closedb(connect)connect.close set connect=nothing end sub '******************************************************************* '打開單個表讀
sub opentable(connect,tbname,myrs)set myrs=server.createobject(”ADODB.recordset“)rssql=”select * from “ & tbname myrs.open rssql,connect,1,1 end sub
'******************************************************************* '關閉臨時表 sub closetable(rs)rs.close set rs=nothing end sub
'******************************************************************* '查詢數據庫
sub searchtable(connect,sql,rs)set rs=server.createobject(”ADODB.recordset“)rs.open sql,connect,1,1 end sub
'******************************************************************* '查詢并更改數據庫
sub changetable(connect,sql,rs)set rs=server.createobject(”ADODB.recordset“)rs.open sql,connect,1,3 end sub
********************************************************************
好了,我們接著來。
3、下面給出,我的 index.asp的內容,然后按這些來設計留言簿!
<%'調用函數庫inc.asp文件 '函數庫中的form參數action值 action=request(”action“)select case action '檢查登錄
case ”chklogin“
chklogin
'刪除留言,由于,代碼不是很多,所以不例為函數,大家可以試著將其做成函數
case ”delete“
if session(”adminpress“)<>”“ then
'如果管理員登錄了,那么刪除留言
我用的是spl語句,很簡單的語句!
strsql=”delete * from content where user_id=“&request.querystring(”id“)
conn.execute(strsql)'關閉數據庫
conn.close
set conn=nothing
'刪除成功,回留言簿
response.write”
response.write”刪除成功,,正回留言簿.......
setTimeout(”location.replace('index.asp')“,600)
<%'結束代碼的執行,回首頁面
response.end
else
'如果未登錄,進入登錄界面
response.redirect”index.asp?action=login“
end if
case ”w_r_add“
if session(”adminpress“)<>”“ then
w_r_add '留言簿配置修改入庫
else
response.redirect”index.asp?action=login“
end if
case ”w_p_add“
if session(”adminpress“)<>”“ then
w_p_add '版主信息修改入庫
else
response.redirect”index.asp?action=login“
end if
case ”inputadd“
recadd
'留言內容入庫
case ”editadd“
if session(”adminpress“)<>”“ then
editadd '編輯或回復留言入庫
else
response.redirect”index.asp?action=login“
end if
case ”logout“ '管理員退出登錄
session(”adminpress“)=”“
response.redirect”index.asp“ end select %>
select case action
case ”“
listrec '顯示留言信息
case ”serguest“
serrec
'搜索留言
case ”login“
login
'登錄界面
case ”input“
input
'輸入留言界面
case ”chklogin“
chklogin '檢查登錄,此函數可以放在頂部,但為了顯示錯誤信息的工整性,我放到了此處
case ”editrec“
editrec '修改信息界面
case ”manage“ '驗證管理者是否
if session(”adminpress“)=”“ then
login
else
listrec
end if
case ”m_write“ '修改配置界面
if session(”adminpress“)<>”“ then
m_write
else
login
end if
case ”m_person“ '修改版主信息界面
if session(”adminpress“)<>”“ then
m_person
else
login
end if end select call bottom(gb_editioner)'調用頁低信息
%>
最后我們一起來看看inc.asp文件內容,此文件中全部是index.asp文件調用的函數。
首先在文件頭加上:來調用定義的變量。
1、首先我們寫出引號和空格的轉換函數,主要是為了解決數據與sql函數相沖突。
<% Function ChkString(string)if string = ”“ then string = ” “ ChkString = server.htmlencode(Replace(string, ”'“, ”''“))End Function
Function ChkUserString(string)string = ChkString(string)ChkUserString = server.htmlencode(Replace(string, ” “, ”“))End Function %>
2、關于頁面頭和頁面低部函數,在第二講中已經寫出,這里不再重寫。
3、登錄界面 <%sub login%>
4、驗證管理員密碼是否正確 <%end sub '驗證登錄密碼 sub chklogin()
admin_name=chkstring(request(”username“))'取得表單數據 admin_password=chkstring(request(”password“))
strsql=”select admin_name,admin_password from admin“
set rs = conn.Execute(strsql)
'讀取數據庫中用戶和密碼
if not(rs.bof and rs.eof)then
if admin_name=rs(”admin_name“)and admin_password=rs(”admin_password“)then
session(”adminpress“)=chkstring(request(”username“))
'如果管理員名字和密碼輸入正確存取session變量,以便管理員對留言簿的維護。
rs.close
set rs=nothing
conn.close
set conn=nothing '關閉數據庫和表
response.redirect ”index.asp“ '回到首頁
response.end '結束后面代碼的操作
else
'驗證用戶名和密碼輸入錯誤的處理
response.write ”
response.write ”
返回上一頁
rs.close
set rs=nothing
end if
else
response.write ”登錄出現錯誤或者數據庫被破壞!“
end if
end sub %>
5、輸入留言界面。思路:用戶不用注冊就可以留言,管理員留言時一些基本信息自動調用。<%sub input%>
end sub%>6、留言內容入庫 sub recadd '讀取表單數據
user_name=request(”username“)
user_email=request(”email“)
user_qq=request(”oicq“)
user_address=request(”address“)
user_homepage=request(”homepage“)
user_webname=request(”webname“)
user_image=request(”images“)
user_ip=request.servervariables(”remote_addr“)
user_content=chkuserstring(request(”content“))
user_silent=request(”silent“)
user_time=now()'將讀取數據寫入庫
strSql = ”insert into content(user_name, user_qq,user_email,user_address,user_homepage,user_webname,user_image,user_ip,user_content,user_silent,user_time)Values('“
strSql = StrSQl & user_name & ”', '“
strSql = StrSQl & user_qq & ”', '“
strSql = StrSQl & user_email & ”', '“
strSql = StrSQl & user_address & ”', '“
strSql = StrSQl & user_homepage & ”', '“
strSql = StrSQl & user_webname & ”', '“
strSql = StrSQl & user_image & ”', '“
strSql = StrSQl & user_ip & ”', '“
strSql = StrSQl & user_content & ”', “
strSql = StrSQl & user_silent & ”, '“
strsql = strsql & now()&”')“
conn.Execute(StrSql)'關閉數據庫
conn.close
set conn=nothing '返回留言簿首頁
response.write”
response.write”留言成功,,正回留言簿.......
response.end end sub %>
第三篇:留言簿的制作過程
動態站點(留言簿)的制作過程
一、安裝調試ASP環境
安裝IIS或將NetBox測試服務器復制到你的站點根文件夾中。
1、打開“控制面板”—選擇“添加或刪除WINDOWS組件”
2、選擇IIS信息服務的復選框,單擊“下一步”(注意:需有WINDOWS的安裝光盤或其備份)
3、若IIS組件安裝完畢,打開控制面板的“管理工具”,選擇“Internet信息服務”---雙擊
4、右擊“默認網站”—“屬性”—選擇“網站”選項卡的“IP地址”為127.0.0.1
5、選擇“主目錄”為本地站點根文件夾
6、選擇“文檔”為index.asp
至此,IIS服務器配置完畢。
二、打開ACCESS , 建立數據庫。
三、建立動態站點
1、配置本地信息
2、測試服務器
3、新建動態網頁index.asp,并設計靜態顯示部分。
四、打開應用程序面板,選擇“數據庫”,檢查前三步設置是否完成。
若已完成,單擊“+”,添加數據源名稱(DSN),見課本。
五、繼續選擇應用程序面板的“綁定”,單擊“+”,添加記錄集,見課本插圖。
六、將動態內容添加到靜態頁面中
七、繼續選擇應用程序面板的“服務器行為”,單擊“+”,添加“重復區域”、“記錄集分頁”
八、若要添加留言,須制作添加留言界面如insert.asp,只要在此頁面中添加一個一行一列的表格,再選擇“應用程序工具欄”中的“插入記錄表單向導”,進行設置即可。
九、若要添加管理員登陸頁面,須在頁面中先添加表單元素,再添加服務器行為“用戶身份驗證---登錄用戶”
第四篇:語文課件制作步驟
語文課件制作步驟
第一步:1.點右鍵——新建——PPT演示文稿;2.重命名——YW201101盧雪蓮《桃花心木》(6下);3.雙擊打開——單擊此處打開第一張幻燈片——內容版式(空白)——復制左邊空白3張;4.視圖——標尺——視圖——網格和參考線——(點擊選中)屏幕上顯示網格——屏幕上顯示參考線——確定;
第二步:1.電子課文——點右鍵——另存為圖片——桌面——文件名(桃花心木)—保存類型(JPEG)——保存;2.點右鍵——打開方式——畫圖——重新調整大小——選擇——剪切——粘貼;3.在圖片上點右鍵——設置圖片格式——尺寸——高度(10厘米)——(選中)鎖定縱橫比——(選中)相對于圖片的原始尺寸——確定;4.插入——文本框——水平——輸入“義務教育課程標準實驗教科書 人教版小學語文六年級下冊”(黑體、楷體GB2312、華文隸書,28號,加粗)——輸入“達州職業技術學院 師范系11語文教育 盧雪蓮”(黑體,24號,加粗)——插入——文本框——垂直———輸入“桃花心木”(黑體,54號,加粗)——調整圖片和文本框,使其均勻美觀;
第三步:1.復制圖片到第二張幻燈片——居中并下移一格——插入文本框——輸入“導語設計”(黑體,54號,加粗)——文本框底邊放到第三條線上,居中;2.復制圖片到第三張幻燈片,橫豎居中,點擊(A)插入藝術字——選擇藝術字樣式(54)——確定——輸入“衷心感謝各位領導、專家、同仁光臨指導!”——確定——設置藝術字格式——尺寸——高度:3厘米 寬度:20厘米——確定——(45)輸入“謝謝!(”高度:3厘米 寬度:6厘米)——確定;
3.復制左邊第二張幻燈片,并粘貼10次——分別更改為“作者簡介”“識字寫字”“詞語解釋”“朗讀感悟”“課文賞析”“合作探究”“板書設計”“教師總結”“作業布置”“擴展閱讀”;
4.點擊左邊第二張幻燈片——點擊回車鍵(Enter)——內容版式(空白)——插入——文本框——水平——第一行第三點開始——向右向下拉——最后一行倒數第三點結束;
5.輸入或復制粘貼內容——選中文字(黑體,28號,加粗)——文本框居中、首行退兩格、兩端對齊;
6.選中文字——線條顏色——其他線條顏色(標準)紅色——確定——線型(3磅);
7.選中文字——填充顏色——其他填充顏色(標準)淺色44——確定。
第五篇:留言簿系統
留言簿系統一、系統概述
本系統是一個簡單的留言簿系統,可以用于發表留言、查看已發表留言、管理留言等功能,具有以下特點:
1、無需FSO、無需數據庫支持,高速運行;
2、具有強大的分頁功能,并且具有自動對新留言排序功能;
3、具有回復功能,回復留言沒有任何權限限制;
4、具有留言閱讀總數統計功能;
5、具有回復留言總數統計功能;
6、同時采用了數據島顯示所有留言功能;
7、可以在任意IIS版本中運行,對瀏覽器無任何要求;
8、界面美觀,無需美化即可使用;
9、類似BBS風格,可以作為小型論壇使用。
二、系統設計
本系統分為:
1、首頁
首頁中顯示所有留言,以及每條留言的具體信息,如:發表人、留言標題、發表日期、閱讀次數和回復次數。
2、新增留言
新增留言中可以編輯要增加的留言,包括發表人基本信息、留言標題以及留言內容等,編輯完成后即可提交,還可消除重填。
3、查看留言
在首頁中點擊要查看的留言即可查看有關該留言的詳細信息,包括留言內容、標題、日期、回復和瀏覽次數等。
4、回復留言
查看某一留言的時候,若想回復即可單擊頁面中的“回復留言”按鈕,編輯回復內容。編輯完成后提交,可查看回復內容和所回復的留言。
三、界面設計
本系統界面設計簡潔、美觀。
1、留言簿首頁
2、新增留言
3、回復留言
4、查看留言
四、功能實現
本系統是一個簡單的留言簿系統,可以用于發表留言、查看已發表留言、管理留言等功能,具體可以實現以下功能:
1、分頁功能
2、新增留言功能;
3、自動對新留言排序功能;
4、查看留言功能;
5、回復留言功能,回復留言沒有任何權限限制;
6、留言閱讀總數統計功能;
7、回復留言總數統計功能;
8、顯示所有留言功能;