ASP動態(tài)網(wǎng)站開發(fā)的步驟

上傳人：哈*** IP屬地：云南上傳時間：2025-01-19 格式：DOCX 頁數(shù)：35 大小：1.06MB 積分：12 舉報 版權(quán)申訴

已閱讀5頁，還剩30頁未讀，繼續(xù)免費閱讀

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請進行舉報或認領(lǐng)

文檔簡介

/第1章ASP基礎(chǔ)MicrosoftActiveServerPages即我們所稱的ASP，是一套微軟開發(fā)的效勞器端腳本環(huán)境，通過ASP我們可以結(jié)合HTML網(wǎng)頁、ASP指令和ActiveX元件建立動態(tài)、交互且高效的WEB效勞器應(yīng)用程序。有了ASP你就不必擔憂客戶的瀏覽器是否能運行你所編寫的代碼，因為所有的程序都將在效勞器端執(zhí)行，包括所有嵌在普通HTML中的腳本程序。當程序執(zhí)行完畢后，效勞器僅將執(zhí)行的結(jié)果返回給客戶瀏覽器，這樣也就減輕了客戶端瀏覽器的負擔，大大提高了交互的速度。本章節(jié)重點介紹ASP的特點、文件結(jié)構(gòu)、根本語法、創(chuàng)作方法以及運行方式。1.1ASP的特點使用VBScript、JavaScript等簡單易懂的腳本語言，結(jié)合HTML代碼，即可快速地完成網(wǎng)站的應(yīng)用程序。無須compile編譯，容易編寫，可在效勞器端直接執(zhí)行。使用普通的文本編輯器，如Windows的記事本，即可進行編輯設(shè)計。當然我們使用Dreamweaver作為開發(fā)工具。與瀏覽器無關(guān),用戶端只要使用可執(zhí)行HTML碼的瀏覽器，即可瀏覽ASP所設(shè)計的網(wǎng)頁內(nèi)容。ASP所使用的腳本語言(VBScript、JavaScript)均在WEB效勞器端執(zhí)行，用戶端的瀏覽器不需要能夠執(zhí)行這些腳本語言。5.ASP的源程序，不會被傳到客戶瀏覽器，因而可以防止所寫的源程序被他人剽竊，也提高了程序的平安性。6.運行ASP所需的環(huán)境簡單，要求的配置低，單機只需安裝IIS。如上所述，與一般的程序不同，ASP程序無須編譯，ASP程序的控制部份，是使用VBScript、JavaScript等腳本語言來設(shè)計的，當執(zhí)行ASP程序時，腳本程序?qū)⒁徽酌畎l(fā)送給腳本解釋器(即腳本引擎)，由腳本解釋器進行翻譯并將其轉(zhuǎn)換成效勞器所能執(zhí)行的命令。當然，同其他編程語言一樣，ASP程序的編寫也遵循一定的規(guī)則，如果你想使用你所喜愛的腳本語言編寫ASP程序，那么你的效勞器上必須要有能解釋這種腳本語言的腳本解釋器。當你安裝ASP時，系統(tǒng)提供了兩種腳本語言：VBsrcipt和JavaScript，而VBscript則被作為系統(tǒng)默認的腳本語言。ASP本身并不是一種腳本語言，它只是提供了一種使鑲嵌在HTML頁面中的腳本程序得以運行的環(huán)境。ASP程序其實是以擴展名為.asp的純文本形式存在于WEB效勞器上的，你可以用任何文本編輯器翻開它，ASP程序中可以包含純文本、HTML標記以及腳本命令。其實我們在此要說的是，用ASP程序?qū)崿F(xiàn)的是一系列*.asp的文本文件，只需要將這些文本文件存儲到效勞器的相應(yīng)位置，然后通過日常上網(wǎng)瀏覽網(wǎng)頁的方式，由效勞器端解釋執(zhí)行ASP程序，將用戶請求的信息發(fā)送到客戶瀏覽器，實現(xiàn)我們經(jīng)常所說的B/S（瀏覽器/效勞器）模式。這與其他程序設(shè)計有所區(qū)別，無需對編寫的程序進行打包，形成可執(zhí)行文件。1.2ASP文件結(jié)構(gòu)ASP的文件包括：文本、HTML標記、ASP對象、ActiveX組件、Java小程序、客戶端腳本、效勞器端腳本。1.ASP文件結(jié)構(gòu)<%@LANGUAGE="主要腳本語言"%><html><head><title>標題</title></head><body><%'asp代碼---%></body></html>2.ASP根本語法（1）ASP的所有代碼都用放在<%%>之中，這些代碼有效勞器解釋執(zhí)行。（2）ASP的注釋語句采用'的形式。（3）在ASP文件的開頭注明采用的是那種腳本語言：<%@LANGUAGE="VBScript/JavaScript"%>（4）在書寫ASP代碼時不必區(qū)分字母的大小寫，但務(wù)必記住ASP代碼中用到的標點符號必須是輸入法英文狀態(tài)下的。1.3ASP創(chuàng)作方法任何一個文本編輯器都可以用來編寫ASP文件，如記事本，對于程序設(shè)計水平較高者可以采用記事本的方式來編寫，這樣能夠加深對程序的印象，提高對程序的敏感度，但對于大多數(shù)人還是通過一個方便的工具來編寫ASP代碼，會更簡單容易。我們經(jīng)常用的工具是Dreamweaver，這是網(wǎng)頁三劍客之一，中文解釋“為夢幻編織〞，這是我們制作網(wǎng)頁最常用的工具。詳細介紹見附錄2。1.4ASP運行方式ASP文件的運行方式比較簡單，我們用ASP創(chuàng)立的是動態(tài)網(wǎng)站，因此，為我們運行的方式也就是訪問網(wǎng)站的方式，我們可以用以下兩種方式來訪問網(wǎng)站：1.單機運行在我們創(chuàng)作網(wǎng)站的過程中我們一般采用單機運行的方式來瀏覽我們的網(wǎng)站，瀏覽ASP動態(tài)網(wǎng)站不像瀏覽靜態(tài)網(wǎng)頁那么簡單，靜態(tài)網(wǎng)頁文件以.html或.htm為后綴名，直接在IE瀏覽器中翻開即可瀏覽，而ASP動態(tài)網(wǎng)站的瀏覽需安裝IIS（Internet信息效勞）（1）配置IIS=1\*GB3①單擊“開始〞按鈕，選擇“設(shè)置〞命令，再選擇“控制面板〞命令。=2\*GB3②選擇“添加/刪除程序〞選項，翻開“添加/刪除程序〞窗口.=3\*GB3③單擊“添加/刪除Windows組件〞圖標，看到有很多相關(guān)的Windows組件可以安裝。=4\*GB3④在“組件〞列表框中選擇“Internet信息效勞(IIS)〞選項。在網(wǎng)上下載一個適合于本計算機操作系統(tǒng)的IIS安裝包（例如適合于windowsxp的IIS5.0），解壓縮之后，將文件夾命名為i386存入優(yōu)盤中，安裝過程中將提示的文件所在路徑修改為優(yōu)盤所在路徑，例如：G:\i386或者H:\i386等。=5\*GB3⑤完成IIS的安裝。（2）瀏覽網(wǎng)站將網(wǎng)站文件夾復(fù)制到C:\Inetpub\目錄下。單擊“開始〞按鈕，選擇“設(shè)置〞命令，再選擇“控制面板〞命令，在控制面板中選擇“管理工具〞，雙擊“Internet信息效勞〞，出現(xiàn)以下操作界面：按上圖所指位置單擊，在彈出的子目錄中選擇“網(wǎng)站〞，再單擊“網(wǎng)站〞，右擊彈出的“默認網(wǎng)站〞子目錄，選擇“屬性〞，彈出“默認網(wǎng)站〞屬性對話框，我們在此需要修改的有“主目錄〞和“文檔〞屬性，單擊主目錄得到以下對話框：按上圖所示，要將我們要運行的網(wǎng)站設(shè)置為主目錄，單擊“瀏覽〞，找到我們復(fù)制到C:\Inetpub\目錄下的網(wǎng)站文件夾。對于“文檔〞屬性選項卡，如果“啟用文檔中〞沒有index.asp，需要添加上，因為我們的ASP主頁默認為index.asp。在IE瀏覽器地址欄中輸入HYPERLINK或HYPERLINK即可瀏覽網(wǎng)站。2.網(wǎng)站上傳將網(wǎng)站上傳到自己申請的網(wǎng)站空間中，然后在IE瀏覽器的地址欄中輸入相應(yīng)的網(wǎng)址即可瀏覽網(wǎng)站。現(xiàn)在有好多網(wǎng)站提供免費的動態(tài)網(wǎng)站空間，比方HYPERLINK，我們可以很方便的在此網(wǎng)站上申請免費申請動態(tài)網(wǎng)站空間。課后作業(yè)：1.練習(xí)IIS安裝和配置。2.申請免費網(wǎng)站空間，編寫一個簡單的ASP程序，上傳到自己申請的網(wǎng)站空間中。第2章連接數(shù)據(jù)庫2.1ACCESS數(shù)據(jù)庫<%strconn="DRIVER=MicrosoftAccessDriver(*.mdb);DBQ="&Server.MapPath("數(shù)據(jù)庫文件")setconn=server.createobject("adodb.connection")conn.openstrconn%>或<%Setconn=Server.CreateObject("ADODB.Connection")Conn.ConnectionString="Provider=Microsoft.jet.oledb.4.0;datasource="&server.mappath("數(shù)據(jù)庫路徑")conn.open()%>2.2SQLSERVER數(shù)據(jù)庫<%strconn="Driver={SQLServer};Description=sqldemo;SERVER=;_UID=LoginID;PWD=Password;DATABASE=Database_Name"setconn=server.createobject("adodb.connection")conn.openstrconn%>注：我們通常將以上連接數(shù)據(jù)庫的程序代碼存儲在一個公用文件中，并將其命名為conn.asp中，要連接訪問數(shù)據(jù)庫時，在相應(yīng)頁面的代碼區(qū)域嵌入此頁面，通常使用以下代碼：這一般是我們進行動態(tài)網(wǎng)站開發(fā)的第一步，也是最關(guān)鍵的一步。課后作業(yè)：用ACCESS創(chuàng)立一個數(shù)據(jù)庫，命名為data.mdb，分別用以上兩種方法實現(xiàn)連接數(shù)據(jù)庫。第3章ASP動態(tài)網(wǎng)站開發(fā)的步驟3.1顯示信息的步驟1.簡單顯示信息（顯示一條記錄）（1）確定腳本語言：<%@LANGUAGE="VBSCRIPT"%>注：這句代碼不需要掌握，在用Dreamweaver創(chuàng)立一動態(tài)頁面時，Dreamweaver默認的腳本語言就是VBSCRIPT，因此，在新建頁面的代碼區(qū)域第一行便是如下代碼：<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%>（2）連接數(shù)據(jù)庫：（3）創(chuàng)立記錄集：<%setrs=Server.CreateObject("adodb.recordset")%>（4）書寫SQL語句：<%sql="select*from表名where條件"%>（5）執(zhí)行SQL語句：<%rs.opensql,conn,1,1%>（6）顯示信息：<%=rs("字段名")%>注：在進行顯示信息時，一般用表格來布局，插入相應(yīng)行列的表格，在相應(yīng)的單元格的代碼區(qū)域添加代碼：<%=rs("字段名")%>。（7）關(guān)閉記錄集：<%rs.Closesetrs=nothing%>2.分頁顯示信息（顯示多條記錄）（1）確定腳本語言：<%@LANGUAGE="VBSCRIPT"%>（2）連接數(shù)據(jù)庫：（3）創(chuàng)立記錄集：<%setrs=Server.CreateObject("adodb.recordset")%>（4）書寫SQL語句：<%sql="select*from表名where條件orderby字段名desc"%>（5）執(zhí)行SQL語句：<%rs.opensql,conn,1,1%>（6）顯示信息：<%=rs("字段名")%>①實現(xiàn)分頁的代碼：<%rs.PageSize=2'指示Recordset中一頁所包含的記錄數(shù)（數(shù)字可變）PageCount=rs.PageCount'用PageCount屬性確定Recordset對象中數(shù)據(jù)的頁數(shù)Page=int(request.QueryString("Page"))ifPage<=0orrequest.QueryString("Page")=""thenPage=1endifrs.AbsolutePage=Page'指定當前記錄所在的頁%>②循環(huán)語句開始：<%i=0dowhile(i<rs.PageSizeandnotrs.bofandnotrs.eof)%>③要顯示的信息：插入表格進行布局，一般循環(huán)的是表格的某一行。在相應(yīng)的單元格的代碼區(qū)域添加代碼：<%=rs("字段名")%>④循環(huán)語句結(jié)束：<%rs.movenext()i=i+1 loop%>（7）關(guān)閉記錄集：<%rs.Closesetrs=nothing%>（8）設(shè)置頁碼超級鏈接：<%fori=1toPageCount%><ahref="信息顯示頁面.asp?Page=<%=i%>"><%=i%></a><%next%>3.2添加信息的步驟（1）確定腳本語言：<%@LANGUAGE="VBSCRIPT"%>（2）獲取要插入的數(shù)據(jù)：用Request對象（2）連接數(shù)據(jù)庫：（3）創(chuàng)立記錄集：<%setrs=Server.CreateObject("adodb.recordset")%>（4）書寫SQL語句：<%sql="select*from表名"%>（5）執(zhí)行SQL語句：<%rs.opensql,conn,1,3%>（6）執(zhí)行插入命令：<%rs.addnew%>（7）記錄集字段賦值：<%rs("字段名")=變量名%>（8）執(zhí)行更新命令：<%rs.update%>（9）關(guān)閉記錄集：<%rs.Closesetrs=nothing%>3.3修改信息的步驟（1）確定腳本語言：<%@LANGUAGE="VBSCRIPT"%>（2）獲取要修改的數(shù)據(jù)：用Request對象（2）連接數(shù)據(jù)庫：（3）創(chuàng)立記錄集：<%setrs=Server.CreateObject("adodb.recordset")%>（4）書寫SQL語句：<%sql="select*from表名where條件"%>（5）執(zhí)行SQL語句：<%rs.opensql,conn,1,3%>（6）記錄集字段賦值：<%rs("字段名")=變量名%>（7）執(zhí)行更新命令：<%rs.update%>（8）關(guān)閉記錄集：<%rs.Closesetrs=nothing%>3.4刪除信息的步驟（1）確定腳本語言：<%@LANGUAGE="VBSCRIPT"%>（2）獲取要刪除的數(shù)據(jù)：用Request對象（2）連接數(shù)據(jù)庫：（3）創(chuàng)立記錄集：<%setrs=Server.CreateObject("adodb.recordset")%>（4）書寫SQL語句：<%sql="select*from表名where條件"%>（5）執(zhí)行SQL語句：<%rs.opensql,conn,1,3%>（6）執(zhí)行刪除命令：<%rs.delete%>（7）執(zhí)行更新命令：<%rs.update%>（8）關(guān)閉記錄集：<%rs.Closesetrs=nothing%>課后作業(yè)：在數(shù)據(jù)庫data.mdb中創(chuàng)立數(shù)據(jù)表student，字段名稱為：編號id（自動編號），學(xué)號sid（文本），姓名sname（文本），年級sgrade（文本），專業(yè)sspeciality（文本），電話sphone（文本）。添加相應(yīng)信息如：20060201，張三，2006，計算機信息管理，。……1.編寫ASP代碼實現(xiàn)在網(wǎng)頁中顯示學(xué)號為20060201所有信息。2.編寫ASP代碼實現(xiàn)通過網(wǎng)頁向數(shù)據(jù)表student中添加信息：20060202，里斯，2006，計算機信息管理，3.分頁顯示所有學(xué)生記錄信息，每頁顯示1條記錄信息。4.學(xué)號為20060202的同學(xué)轉(zhuǎn)入計算機及應(yīng)用，編寫程序?qū)崿F(xiàn)將學(xué)號為20060202的同學(xué)的專業(yè)修改為計算機及應(yīng)用。5.學(xué)號為20060202的同學(xué)轉(zhuǎn)入其他班級，編寫程序?qū)崿F(xiàn)刪除該同學(xué)的記錄信息。第4章功能實現(xiàn)經(jīng)常上網(wǎng)的同學(xué)會發(fā)現(xiàn)，在我們使用一個網(wǎng)站提供的資源時，網(wǎng)站提供應(yīng)我們的是這樣一些操作功能，比方我們可以瀏覽網(wǎng)站提供應(yīng)我們的一些公用資源，直接復(fù)制網(wǎng)頁當中提供的資料即可，再比方有一些重要的資料設(shè)定了訪問權(quán)限，需要我們注冊為網(wǎng)站的用戶，在登錄網(wǎng)站之后即可執(zhí)行相應(yīng)的操作……在我們學(xué)習(xí)網(wǎng)站開發(fā)時，我們首先做一些根本的約定，我們制作的網(wǎng)頁都存放在自己命名的網(wǎng)站文件夾中（本教材以xinxiguanli為例），在xinxiguanli文件夾中建立images文件夾用來存放制作網(wǎng)頁用的圖片資料，建立database文件夾用來存放數(shù)據(jù)庫文件，建立include文件夾用來存放嵌入文件，建立file文件夾用來存放一些可供下載的文件，建立upfile文件夾用來存放用戶上傳的文件。4.1網(wǎng)站公用模塊在我們上網(wǎng)瀏覽網(wǎng)站時，我們經(jīng)常會發(fā)現(xiàn)網(wǎng)頁的某些局部在整個網(wǎng)站所有頁面中始終不變，例如網(wǎng)頁的頂端或底端在網(wǎng)站中始終是不變的，解決這一問題我們經(jīng)常采用嵌入文件的方法，將網(wǎng)站的公用模塊單獨設(shè)置為幾個獨立的網(wǎng)頁，然后用以下命令將其嵌入即可：例題4.1操作要求：參照以上圖片完成在主頁（index.asp）的頂端嵌入include文件夾中的head.asp文件。操作步驟如下：1.選擇素材：完成此操作需要用到以下兩個圖片index.jpg和bar.gifindex.jpgbar.gif2.制作head.asp頁面：（1）新建一動態(tài)頁面，將其保存到include文件夾下，并命名為head.asp，切換到代碼視圖，刪除所有代碼。（2）居中插入一寬度為726px，1行1列的表格，設(shè)置其邊框為0，在表格內(nèi)居中插入圖像index.jpg，設(shè)置圖像尺寸，寬726px高150px。（3）居中插入一寬度為726px，1行8列的表格，設(shè)置其邊框為1，背景顏色為#99FFFF，邊框顏色為#FFFFFF，均勻設(shè)置各列的寬度，依次輸入首頁、系部介紹、專業(yè)介紹、課程設(shè)置、考試信息、校園新聞、就業(yè)指導(dǎo)、招聘信息，并設(shè)置字號為12px。（4）居中插入一寬度為726px，1行1列的表格，設(shè)置其邊框為0，在表格內(nèi)居中插入圖像bar.gif，設(shè)置表格的背景圖像為bar.gif。3.制作主頁及其它網(wǎng)頁：新建一動態(tài)頁面，將其保存到xinxiguanli文件夾下，并命名為index.asp，切換到代碼視圖，在代碼<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%>之下添加代碼：（如果感到代碼多了很亂的話，可以刪除這兩句代碼以下的所有HTML代碼）依照以上操作制作其它網(wǎng)頁：xibujieshao.asp、zhuanyejieshao.asp、kechengshezhi.asp、kaoshixinxi.asp、xiaoyuanxinwen.asp、jiuyezhidao.asp、zhaopinxinxi.asp。4.制作超級鏈接：切換到head.asp頁面的設(shè)計視圖，以制作首頁的超級鏈接為例，選定“首頁〞兩個字，在屬性欄的鏈接處輸入index.asp，或者單擊鏈接右邊的文件夾圖標，查找相應(yīng)的頁面，即可完成相應(yīng)的操作。其它文字的超級鏈接都可按照以上方法完成。在IE瀏覽器中輸入網(wǎng)址HYPERLINK即可瀏覽操作的結(jié)果。4.2顯示信息模塊我們上網(wǎng)瀏覽網(wǎng)頁時，經(jīng)常會發(fā)現(xiàn)網(wǎng)站首頁會提供應(yīng)我們一些最新的通知或重要信息，而且這些信息大多數(shù)以時間倒序排列，也就是說最新的消息或通知總是顯示在頁面的最上面，當我們點擊此標題時，會彈出相應(yīng)的詳細信息。然而這些信息的標題是提前被存儲在數(shù)據(jù)庫相應(yīng)的數(shù)據(jù)表中，我們首先要做的是顯示數(shù)據(jù)庫中的信息，再采用網(wǎng)址傳遞參數(shù)的方式在另外的頁面中顯示此標題的詳細內(nèi)容。網(wǎng)址傳遞參數(shù)是動態(tài)網(wǎng)站開發(fā)的重要方法，運用此方法可以大大減少網(wǎng)站維護的工作量，網(wǎng)址傳遞參數(shù)的根本格式是：網(wǎng)址？參數(shù)名=參數(shù)值。例題4.2操作要求：在zhaopinxinxi.asp頁面中顯示數(shù)據(jù)庫data.mdb中數(shù)據(jù)表zhaopin的有關(guān)內(nèi)容，要求運用表格布局頁面，倒序顯示編號、公司名稱、招聘職位、招聘人數(shù)、發(fā)布時間等信息，并在沒一行的最后用戶點擊查看即可彈出瀏覽器窗口，查看該招聘的詳細要求。操作步驟：1.建立數(shù)據(jù)庫：在網(wǎng)站文件夾xinxiguanli中新建文件夾database，翻開ACCESS創(chuàng)立數(shù)據(jù)庫data.mdb，并保存到database文件夾中，在數(shù)據(jù)庫中創(chuàng)立數(shù)據(jù)表zhaopin，表格結(jié)構(gòu)及信息如以下圖：2.頁面設(shè)計：用Dreamweaver翻開zhaopinxinxi.asp頁面，在頁面中插入2行6列的表格，表格寬度設(shè)置為726px，在第1行依次輸入編號、公司名稱、招聘職位、招聘人數(shù)、發(fā)布時間和招聘要求，在第2行最后一欄輸入“查看〞兩個字，并設(shè)置表格和單元格屬性為居中。3.代碼編寫：<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><html><head><title>招聘信息</title><scriptlanguage="javascript"></script></head><body><%setrs=Server.CreateObject("adodb.recordset")%><%sql="select*fromzhaopinorderbyiddesc"%><%rs.opensql,conn,1,1%><%rs.PageSize=2'指示Recordset中一頁所包含的記錄數(shù)（數(shù)字可變）PageCount=rs.PageCount'用PageCount屬性確定Recordset對象中數(shù)據(jù)的頁數(shù)Page=int(request.QueryString("Page"))ifPage<=0orrequest.QueryString("Page")=""thenPage=1endifrs.AbsolutePage=Page'指定當前記錄所在的頁%><tablewidth="726"border="1"align="center"bordercolor="#0033FF"bgcolor="#CCFFFF"cellpadding="0"cellspacing="0"bordercolorlight="#0000dd"bordercolordark="#FFFFFF"><tralign="center"valign="middle"bgcolor="#0066FF"><tdwidth="50">編號</td><tdwidth="180">公司</td><tdwidth="180">招聘職位</td><tdwidth="67">招聘人數(shù)</td><tdwidth="151">發(fā)布時間</td> <tdwidth="72">招聘要求</td></tr><%i=0dowhile(i<rs.PageSizeandnotrs.bofandnotrs.eof)%><tralign="center"valign="middle"><td><%=rs("id")%></td> <td><%=rs("gongsi")%></td><td><%=rs("zhiwei")%></td><td><%=rs("renshu")%></td><td><%=rs("time")%></td> <td><ahref="javascript:winopen('zhaopin.asp?id=<%=rs("id")%>')">查看</a></td></tr><%rs.movenext()i=i+1loop%></table><%rs.Closesetrs=nothing%><divalign="center"><%fori=1toPageCount%><ahref="zhaopinxinxi.asp?Page=<%=i%>"><%=i%></a><%next%></div></body></html>4.制作彈出頁面（zhaopin.asp）：（1）在zhaopinxinxi.asp頁面的代碼視圖中，<head></head>標記中添加如下JavaScript代碼：<scriptlanguage="javascript"></script>（2）在設(shè)計視圖中選擇“查看〞，在屬性欄“鏈接到〞添加如下代碼：javascript:winopen('zhaopin.asp?id=<%=rs("id")%>')在代碼視圖中將看到以下代碼：<ahref="javascript:winopen('zhaopin.asp?id=<%=rs("id")%>')">查看</a>（3）新建頁面zhaopin.asp，創(chuàng)立表格9行2列的表格，合并第1行，輸入“-招聘信息〞，從第二行開始左側(cè)列依次輸入“招聘職位〞，“招聘人數(shù)〞，“招聘專業(yè)〞，“年齡要求〞，“學(xué)歷要求〞，“截止時間〞，“工作經(jīng)驗〞，“其他要求〞。（4）代碼編寫：<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><%id=request("id")%><%setrs=Server.CreateObject("adodb.recordset")%><%sql="select*fromzhaopinwhereid="&id%><%rs.opensql,conn,1,1%><html><head><title><%=rs("gongsi")%>-招聘信息</title></head><body><divalign="center"><tablewidth="400"border="1"cellpadding="0"cellspacing="0"bordercolor="#9966FF"><tralign="center"valign="middle"><tdcolspan="2"bgcolor="#9966FF"><%=rs("gongsi")%>-招聘信息</td></tr><tralign="center"valign="middle"><tdwidth="126"height="20">招聘職位:</td><tdwidth="268"height="20"><%=rs("zhiwei")%></td></tr><tralign="center"valign="middle"><tdheight="20">招聘人數(shù)：</td><tdheight="20"><%=rs("renshu")%></td></tr><tralign="center"valign="middle"><tdheight="20">招聘專業(yè)：</td><tdheight="20"><%=rs("zhuanye")%></td></tr><tralign="center"valign="middle"><tdheight="20">年齡要求：</td><tdheight="20"><%=rs("nianling")%></td></tr><tralign="center"valign="middle"><tdheight="20">學(xué)歷要求：</td><tdheight="20"><%=rs("xueli")%></td></tr><tralign="center"valign="middle"><tdheight="20">截止時間：</td><tdheight="20"><%=rs("jiezhitime")%></td></tr><tralign="center"valign="middle"><tdheight="20">工作經(jīng)驗：</td><tdheight="20"><%=rs("jingyan")%></td></tr><tralign="center"valign="middle"><tdheight="20">其它要求：</td><tdheight="20"><%=rs("qita")%></td></tr></table></div><%rs.Closesetrs=nothing%></body></html>4.3登錄驗證模塊1.頁面設(shè)計：在index.asp頁面中創(chuàng)立如上圖的用戶登錄框，要特別注意的是給每一個表單元素分別命名（賬號文本域為userid，密碼文本域為password，類型下拉列表為usertype），選中整個表單，在屬性欄中設(shè)置動作屬性為login.asp。2.數(shù)據(jù)庫設(shè)計：翻開database文件夾下的data.mdb數(shù)據(jù)庫，創(chuàng)立三個數(shù)據(jù)表如下：（1）student數(shù)據(jù)表（2）teacher數(shù)據(jù)表（3）admin數(shù)據(jù)表3.功能實現(xiàn)：新建頁面login.asp，進入代碼視圖，刪除自動生成的所有代碼，添加如下代碼用來實現(xiàn)登錄驗證功能。<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><%'用Request對象獲取表單的值userid=Trim(Request.Form("userid"))password=Trim(Request.Form("password"))usertype=Trim(Request.Form("usertype"))'判斷用戶名和密碼是否為空if(userid=""orpassword="")thenResponse.Write("<script>alert('用戶名或密碼不能為空')</script>")Response.Write("<script>history.go(-1)</script>")Response.endEndIf'創(chuàng)立記錄集setrs=Server.CreateObject("adodb.recordset")'判斷用戶類型（學(xué)生）if(usertype="student")then'書寫查詢語句，在student表中查找符合條件的記錄sql="select*fromstudentwheresid='"&userid&"'andspwd='"&password&"'"'只讀數(shù)據(jù)rs.opensql,conn,1,1'如果記錄指針移動到最后沒有查找到該記錄則說明用戶名或密碼錯誤If(rs.eof)ThenResponse.Write("<script>alert('用戶名或密碼錯誤')</script>")Response.Write("<script>history.go(-1)</script>")Response.endElse'用Session對象記錄用戶賬號和類型，以便控制用戶訪問權(quán)限session("userid")=useridsession("usertype")=usertype'轉(zhuǎn)到student.asp頁面，學(xué)生登錄成功Response.redirect("student.asp")EndifEndif'判斷用戶類型（教師）if(usertype="teacher")thensql="select*fromteacherwheretid='"&userid&"'andtpwd='"&password&"'"rs.opensql,conn,1,1If(rs.eof)ThenResponse.Write("<script>alert('用戶名或密碼錯誤錯誤')</script>")Response.Write("<script>history.go(-1)</script>")Response.endElsesession("userid")=useridsession("usertype")=usertypeResponse.redirect("teacher.asp")EndifEndif'判斷用戶類型（管理員）if(usertype="admin")thensql="select*fromadminwhereaid='"&userid&"'andapwd='"&password&"'"rs.opensql,conn,1,1If(rs.eof)ThenResponse.Write("<script>alert('錯誤')</script>")Response.Write("<script>history.go(-1)</script>")Response.endElsesession("userid")=useridsession("usertype")=usertypeResponse.redirect("admin.asp")EndifEndif%>4.其它頁面制作制作student.asp，teacher.asp和admin.asp頁面。4.4用戶注冊模塊1.頁面設(shè)計制作zhuce.asp頁面，表單元素命名：帳號文本域命名為userid，用戶名文本域為username，密碼文本域為password，確認密碼文本域為repassword，類型下拉列表為usertype。2.功能實現(xiàn)制作zhucesave.asp頁面，進入代碼視圖，刪除自動生成的所有代碼，添加如下代碼用來實現(xiàn)用戶注冊功能。<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><%userid=Trim(Request.Form("userid"))%><%username=Trim(Request.Form("username"))%><%password=Trim(Request.Form("password"))%><%repassword=Trim(Request.Form("repassword"))%><%usertype=Trim(Request.Form("usertype"))%><%Ifuserid=""orusername=""orpassword=""orrepassword=""ThenResponse.Write("<script>alert('請?zhí)顚懲暾?)</script>")Response.Write("<script>history.go(-1)</script>")Response.endEndIf%><%Iflen(userid)<6ThenResponse.Write("<script>alert('賬號不能小于六位')</script>")Response.Write("<script>history.go(-1)</script>")Response.endEndIf%><%Ifpassword<>repasswordThenResponse.Write("<script>alert('密碼和確認密碼不一致')</script>")Response.Write("<script>history.go(-1)</script>")Response.endEndIf%><%setrs=Server.CreateObject("adodb.recordset")%><%If(usertype="student")Thensql="select*fromstudentwheresid='"&userid&"'"rs.opensql,conn,1,3Ifrs.recordcount>=1ThenResponse.Write("<script>alert('此帳號已存在，請重新注冊！')</script>")Response.Write("<script>history.go(-1)</script>")Response.endEndIfrs.addnewrs("sid")=useridrs("sname")=usernamers("spwd")=passwordrs.updateEndIf%><%If(usertype="teacher")Thensql="select*fromteacherwheretid='"&userid&"'"rs.opensql,conn,1,3Ifrs.recordcount>=1ThenResponse.Write("<script>alert('此帳號已存在，請重新注冊！')</script>")Response.Write("<script>history.go(-1)</script>")Response.endEndIfrs.addnewrs("tid")=useridrs("tname")=usernamers("tpwd")=passwordrs.updateEndIf%><%If(usertype="admin")Thensql="select*fromadminwhereaid='"&userid&"'"rs.opensql,conn,1,3Ifrs.recordcount>=1ThenResponse.Write("<script>alert('此帳號已存在，請重新注冊！')</script>")Response.Write("<script>history.go(-1)</script>")Response.endEndIfrs.addnewrs("aid")=useridrs("aname")=usernamers("apwd")=passwordrs.updateEndIf%><%rs.closesetrs=nothing%><%Response.Write("注冊成功！")%>4.5信息管理模塊管理員登錄之后可以管理所有信息，在此以招聘管理為例，管理員具備四個權(quán)限，分別是查看、修改、添加和刪除，也是我們一直重點強調(diào)的四個步驟，制作方法如下：1.制作zhaopinguanli.asp頁面（1）嵌入文件（2）制作頁面編號公司招聘職位招聘人數(shù)發(fā)布時間招聘管理ASPASPASPASPASP查看|修改|刪除添加招聘信息設(shè)置超級鏈接查看：<ahref="javascript:winopen('zhaopin.asp?id=<%=rs("id")%>')">查看</a>修改：<ahref="javascript:winopen('zhaopinxiugai.asp?id=<%=rs("id")%>')">修改</a>添加：<ahref="javascript:winopen('zhaopintianjia.asp')">添加招聘信息</a>刪除：<ahref="zhaopindelete.asp?id=<%=rs("id")%>">刪除</a>（3）添加代碼參照分頁顯示信息的代碼。（4）具體代碼<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><html><head><metahttp-equiv="Content-Type"content="text/html;charset=gb2312"/><title>招聘管理</title><scriptlanguage="javascript"></script></head><body><%setrs=Server.CreateObject("adodb.recordset")%><%sql="select*fromzhaopinorderbyiddesc"%><%rs.opensql,conn,1,1%><%rs.PageSize=2'指示Recordset中一頁所包含的記錄數(shù)（數(shù)字可變）PageCount=rs.PageCount'用PageCount屬性確定Recordset對象中數(shù)據(jù)的頁數(shù)Page=int(request.QueryString("Page"))ifPage<=0orrequest.QueryString("Page")=""thenPage=1endifrs.AbsolutePage=Page'指定當前記錄所在的頁%><tablewidth="726"border="1"align="center"bordercolor="#0033FF"bgcolor="#CCFFFF"cellpadding="0"cellspacing="0"bordercolorlight="#0000dd"bordercolordark="#FFFFFF"><tralign="center"valign="middle"bgcolor="#0066FF"><tdwidth="50"class="a">編號</td><tdwidth="180"class="a">公司</td><tdwidth="180"class="a">招聘職位</td><tdwidth="62"class="a">招聘人數(shù)</td><tdwidth="140"class="a">發(fā)布時間</td><tdwidth="100"class="a">招聘管理</td></tr><%i=0dowhile(i<rs.PageSizeandnotrs.bofandnotrs.eof)%><tralign="center"valign="middle"><tdclass="a"><%=rs("id")%></td><tdclass="a"><%=rs("gongsi")%></td><tdclass="a"><%=rs("zhiwei")%></td><tdclass="a"><%=rs("renshu")%></td><tdclass="a"><%=rs("fabutime")%></td><td><ahref="javascript:winopen('zhaopin.asp?id=<%=rs("id")%>')">查看</a>|<ahref="javascript:winopen('zhaopinxiugai.asp?id=<%=rs("id")%>')">修改</a>|<ahref="zhaopindelete.asp?id=<%=rs("id")%>">刪除</a></td></tr><%rs.movenext()i=i+1 loop%></table><divalign="center"><%rs.Closesetrs=nothing%><%fori=1toPageCount%><ahref="zhaopinguanli.asp?Page=<%=i%>"><%=i%></a><%next%></div><tablewidth="726"border="0"align="center"cellpadding="0"cellspacing="0"><tr><tdwidth="726"height="20"align="center"valign="middle"><ahref="javascript:winopen('zhaopintianjia.asp')">添加招聘信息</a></td></tr></table></body></html>2.查看參照顯示信息的彈出的窗口，在頁面下面居中添加“關(guān)閉窗口〞并設(shè)置其鏈接到屬性為：javascript:self.close()3.修改單擊招聘管理頁面中的“修改〞，彈出修改招聘信息的窗口，在此需要注意的是要先給頁面添加表單，每項信息添加相應(yīng)的表單元素，并設(shè)置其“初始值〞屬性顯示數(shù)據(jù)庫中的具體數(shù)據(jù)。（1）zhaopinxiugai.asp頁面具體代碼：<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><%id=request("id")%><%Response.cookies("id")=id%><%setrs=Server.CreateObject("adodb.recordset")%><%sql="select*fromzhaopinwhereid="&id%><%rs.opensql,conn,2,3%><html><head><metahttp-equiv="Content-Type"content="text/html;charset=gb2312"/><title>修改招聘信息</title></head><body><divalign="center"><formid="form1"name="form1"method="post"action="zhaopinxiugaisave.asp"><tablewidth="400"border="1"cellpadding="0"cellspacing="0"bordercolor="#9966FF"><tralign="center"valign="middle"><tdcolspan="2"bgcolor="#9966FF">修改招聘信息</span></td></tr><tralign="center"valign="middle"><tdheight="20">招聘公司：</td><tdheight="20"><label><inputname="gongsi"type="text"id="gongsi"value="<%=rs("gongsi")%>"size="30"/></label></td></tr><tralign="center"valign="middle"><tdwidth="126"height="20">招聘職位：</td><tdwidth="268"height="20"><label><inputname="zhiwei"type="text"id="zhiwei"value="<%=rs("zhiwei")%>"size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">招聘人數(shù)：</td><tdheight="20"><label><inputname="renshu"type="text"id="renshu"value="<%=rs("renshu")%>"size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">招聘專業(yè)：</td><tdheight="20"><label><inputname="zhuanye"type="text"id="zhuanye"value="<%=rs("zhuanye")%>"size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">年齡要求：</td><tdheight="20"><label><inputname="nianling"type="text"id="nianling"value="<%=rs("nianling")%>"size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">學(xué)歷要求：</td><tdheight="20"><label><inputname="xueli"type="text"id="xueli"value="<%=rs("xueli")%>"size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">截止時間：</td><tdheight="20"><label><inputname="jiezhitime"type="text"id="jiezhitime"value="<%=rs("jiezhitime")%>"size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">工作經(jīng)驗：</td><tdheight="20"><label><inputname="jingyan"type="text"id="jingyan"value="<%=rs("jingyan")%>"size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">其它要求：</td><tdheight="20"><label><textareaname="qita"cols="28"rows="2"id="qita"><%=rs("qita")%></textarea></label></td></tr><tralign="center"valign="middle"><tdheight="20"colspan="2"><label><inputtype="submit"name="Submit"value="修改"/></label></td></tr></table></form></div><p><%rs.Closesetrs=nothing%></p><palign="center"><ahref="javascript:self.close()">關(guān)閉窗口</a></p></body></html>（2）zhaopinxiugaisave.asp頁面具體代碼：<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><%id=request.Cookies("id")%><%gongsi=Trim(Request.Form("gongsi"))%><%zhiwei=Trim(Request.Form("zhiwei"))%><%renshu=Trim(Request.Form("renshu"))%><%zhuanye=Trim(Request.Form("zhuanye"))%><%nianling=Trim(Request.Form("nianling"))%><%xueli=Trim(Request.Form("xueli"))%><%jiezhitime=Trim(Request.Form("jiezhitime"))%><%jingyan=Trim(Request.Form("jingyan"))%><%qita=Trim(Request.Form("qita"))%><%setrs=Server.CreateObject("adodb.recordset")%><%sql="select*fromzhaopinwhereid="&id%><%rs.opensql,conn,2,3%><%rs("gongsi")=gongsi%><%rs("zhiwei")=zhiwei%><%rs("renshu")=renshu%><%rs("zhuanye")=zhuanye%><%rs("nianling")=nianling%><%rs("xueli")=xueli%><%rs("jiezhitime")=jiezhitime%><%rs("jingyan")=jingyan%><%rs("qita")=qita%><%rs.Update%><%rs.Closesetrs=nothing%><%Response.Redirect("zhaopinguanli.asp")%>4.添加添加招聘信息類似于注冊頁面的創(chuàng)作，主要運用添加信息的步驟：（1）制作添加信息的頁面添加表單和表格，輸入相關(guān)的信息，添加相應(yīng)的表單元素，并給每一個表單元素命名，需要注意的是在最后的發(fā)布時間一項中設(shè)置文本域的默認值為：<%=Date()%>如果要具體到相應(yīng)的時間將文本域的默認值為：<%=Now()%>（1）zhaopintianjia.asp頁面代碼<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><html><head><metahttp-equiv="Content-Type"content="text/html;charset=gb2312"/><title>添加招聘信息</title></head><body><divalign="center"><formid="form1"name="form1"method="post"action="zhaopinsave.asp"><tablewidth="400"border="1"cellpadding="0"cellspacing="0"bordercolor="#9966FF"><tralign="center"valign="middle"><tdcolspan="2"bgcolor="#9966FF">添加招聘信息</td></tr><tralign="center"valign="middle"><tdheight="20">招聘公司：</td><tdheight="20"><label><inputname="gongsi"type="text"id="gongsi"size="30"/></label></td></tr><tralign="center"valign="middle"><tdwidth="126"height="20">招聘職位：</td><tdwidth="268"height="20"><label><inputname="zhiwei"type="text"id="zhiwei"value=""size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">招聘人數(shù)：</td><tdheight="20"><label><inputname="renshu"type="text"id="renshu"value=""size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">招聘專業(yè)：</td><tdheight="20"><label><inputname="zhuanye"type="text"id="zhuanye"value=""size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">年齡要求：</td><tdheight="20"><label><inputname="nianling"type="text"id="nianling"value=""size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">學(xué)歷要求：</td><tdheight="20"><label><inputname="xueli"type="text"id="xueli"value=""size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">截止時間：</td><tdheight="20"><label><inputname="jiezhitime"type="text"id="jiezhitime"value=""size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">工作經(jīng)驗：</td><tdheight="20"><label><inputname="jingyan"type="text"id="jingyan"value=""size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20">其它要求：</td><tdheight="20"><label><textareaname="qita"cols="28"rows="2"id="qita"></textarea></label></td></tr><tralign="center"valign="middle"><tdheight="20">發(fā)布時間：</td><tdheight="20"><label><inputname="fabutime"type="text"id="fabutime"value="<%=Date()%>"size="30"/></label></td></tr><tralign="center"valign="middle"><tdheight="20"colspan="2"><label><inputtype="submit"name="Submit"value="提交"/><inputtype="reset"name="Submit2"value="重置"/></label></td></tr></table></form></div></body></html>（2）zhaopinsave.asp頁面代碼<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><%gongsi=Trim(Request.Form("gongsi"))%><%zhiwei=Trim(Request.Form("zhiwei"))%><%renshu=Trim(Request.Form("renshu"))%><%zhuanye=Trim(Request.Form("zhuanye"))%><%nianling=Trim(Request.Form("nianling"))%><%xueli=Trim(Request.Form("xueli"))%><%jiezhitime=Trim(Request.Form("jiezhitime"))%><%jingyan=Trim(Request.Form("jingyan"))%><%qita=Trim(Request.Form("qita"))%><%fabutime=Trim(Request.Form("fabutime"))%><%setrs=Server.CreateObject("adodb.recordset")sql="select*fromzhaopin"rs.opensql,conn,1,3rs.addnewrs("gongsi")=gongsirs("zhiwei")=zhiweirs("renshu")=renshurs("zhuanye")=zhuanyers("nianling")=nianlingrs("xueli")=xuelirs("jiezhitime")=jiezhitimers("jingyan")=jingyanrs("qita")=qitars("fabutime")=fabutimers.update%><%rs.closesetrs=nothing%><%Response.redirect("zhaopinguanli.asp")%>5.刪除zhaopindelete.asp頁面的代碼<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><%id=request("id")%><%setrs=Server.CreateObject("adodb.recordset")%><%sql="select*fromzhaopinwhereid="&id%><%rs.opensql,conn,1,3%><%rs.delete%><%rs.update%><%rs.Closesetrs=nothing%><%Response.redirect("zhaopinguanli.asp")%>4.6文件上傳模塊附錄1HTML語言1.1HTML語言根本結(jié)構(gòu)<html>文檔標記<head>頭標記<title>

人人文庫> 全部分類> 教育資料 > 輔導(dǎo)培訓(xùn)

溫馨提示

1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
5. 人人文庫網(wǎng)僅提供信息存儲空間，僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理，對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對任何下載內(nèi)容負責。
6. 下載文件中如有侵權(quán)或不適當內(nèi)容，請與我們聯(lián)系，我們立即糾正。
7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

ASP動態(tài)網(wǎng)站開發(fā)的步驟

文檔簡介

溫馨提示

最新文檔

評論

ASP動態(tài)網(wǎng)站開發(fā)的步驟

文檔簡介

溫馨提示

最新文檔

評論

相關(guān)文檔