ASP動態(tài)網站開發(fā)的步驟_第1頁
ASP動態(tài)網站開發(fā)的步驟_第2頁
ASP動態(tài)網站開發(fā)的步驟_第3頁
ASP動態(tài)網站開發(fā)的步驟_第4頁
ASP動態(tài)網站開發(fā)的步驟_第5頁
已閱讀5頁，還剩30頁未讀， 繼續(xù)免費閱讀

下載本文檔

版權說明：本文檔由用戶提供并上傳，收益歸屬內容提供方，若內容存在侵權，請進行舉報或認領

文檔簡介

/第1章ASP基礎MicrosoftActiveServerPages即我們所稱的ASP，是一套微軟開發(fā)的效勞器端腳本環(huán)境，通過ASP我們可以結合HTML網頁、ASP指令和ActiveX元件建立動態(tài)、交互且高效的WEB效勞器應用程序。有了ASP你就不必擔憂客戶的瀏覽器是否能運行你所編寫的代碼，因為所有的程序都將在效勞器端執(zhí)行，包括所有嵌在普通HTML中的腳本程序。當程序執(zhí)行完畢后，效勞器僅將執(zhí)行的結果返回給客戶瀏覽器，這樣也就減輕了客戶端瀏覽器的負擔，大大提高了交互的速度。本章節(jié)重點介紹ASP的特點、文件結構、根本語法、創(chuàng)作方法以及運行方式。1.1ASP的特點使用VBScript、JavaScript等簡單易懂的腳本語言，結合HTML代碼，即可快速地完成網站的應用程序。無須compile編譯，容易編寫，可在效勞器端直接執(zhí)行。使用普通的文本編輯器，如Windows的記事本，即可進行編輯設計。當然我們使用Dreamweaver作為開發(fā)工具。與瀏覽器無關,用戶端只要使用可執(zhí)行HTML碼的瀏覽器，即可瀏覽ASP所設計的網頁內容。ASP所使用的腳本語言(VBScript、JavaScript)均在WEB效勞器端執(zhí)行，用戶端的瀏覽器不需要能夠執(zhí)行這些腳本語言。5.ASP的源程序，不會被傳到客戶瀏覽器，因而可以防止所寫的源程序被他人剽竊，也提高了程序的平安性。6.運行ASP所需的環(huán)境簡單，要求的配置低，單機只需安裝IIS。如上所述，與一般的程序不同，ASP程序無須編譯，ASP程序的控制部份，是使用VBScript、JavaScript等腳本語言來設計的，當執(zhí)行ASP程序時，腳本程序將一整套命令發(fā)送給腳本解釋器(即腳本引擎)，由腳本解釋器進行翻譯并將其轉換成效勞器所能執(zhí)行的命令。當然，同其他編程語言一樣，ASP程序的編寫也遵循一定的規(guī)則，如果你想使用你所喜愛的腳本語言編寫ASP程序，那么你的效勞器上必須要有能解釋這種腳本語言的腳本解釋器。當你安裝ASP時，系統(tǒng)提供了兩種腳本語言：VBsrcipt和JavaScript，而VBscript則被作為系統(tǒng)默認的腳本語言。ASP本身并不是一種腳本語言，它只是提供了一種使鑲嵌在HTML頁面中的腳本程序得以運行的環(huán)境。ASP程序其實是以擴展名為.asp的純文本形式存在于WEB效勞器上的，你可以用任何文本編輯器翻開它，ASP程序中可以包含純文本、HTML標記以及腳本命令。其實我們在此要說的是，用ASP程序實現(xiàn)的是一系列*.asp的文本文件，只需要將這些文本文件存儲到效勞器的相應位置，然后通過日常上網瀏覽網頁的方式，由效勞器端解釋執(zhí)行ASP程序，將用戶請求的信息發(fā)送到客戶瀏覽器，實現(xiàn)我們經常所說的B/S（瀏覽器/效勞器）模式。這與其他程序設計有所區(qū)別，無需對編寫的程序進行打包，形成可執(zhí)行文件。1.2ASP文件結構ASP的文件包括：文本、HTML標記、ASP對象、ActiveX組件、Java小程序、客戶端腳本、效勞器端腳本。1.ASP文件結構<%@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ū)分字母的大小寫，但務必記住ASP代碼中用到的標點符號必須是輸入法英文狀態(tài)下的。1.3ASP創(chuàng)作方法任何一個文本編輯器都可以用來編寫ASP文件，如記事本，對于程序設計水平較高者可以采用記事本的方式來編寫，這樣能夠加深對程序的印象，提高對程序的敏感度，但對于大多數(shù)人還是通過一個方便的工具來編寫ASP代碼，會更簡單容易。我們經常用的工具是Dreamweaver，這是網頁三劍客之一，中文解釋“為夢幻編織〞，這是我們制作網頁最常用的工具。詳細介紹見附錄2。1.4ASP運行方式ASP文件的運行方式比較簡單，我們用ASP創(chuàng)立的是動態(tài)網站，因此，為我們運行的方式也就是訪問網站的方式，我們可以用以下兩種方式來訪問網站：1.單機運行在我們創(chuàng)作網站的過程中我們一般采用單機運行的方式來瀏覽我們的網站，瀏覽ASP動態(tài)網站不像瀏覽靜態(tài)網頁那么簡單，靜態(tài)網頁文件以.html或.htm為后綴名，直接在IE瀏覽器中翻開即可瀏覽，而ASP動態(tài)網站的瀏覽需安裝IIS（Internet信息效勞）（1）配置IIS=1\*GB3①單擊“開始〞按鈕，選擇“設置〞命令，再選擇“控制面板〞命令。=2\*GB3②選擇“添加/刪除程序〞選項，翻開“添加/刪除程序〞窗口.=3\*GB3③單擊“添加/刪除Windows組件〞圖標，看到有很多相關的Windows組件可以安裝。=4\*GB3④在“組件〞列表框中選擇“Internet信息效勞(IIS)〞選項。在網上下載一個適合于本計算機操作系統(tǒng)的IIS安裝包（例如適合于windowsxp的IIS5.0），解壓縮之后，將文件夾命名為i386存入優(yōu)盤中，安裝過程中將提示的文件所在路徑修改為優(yōu)盤所在路徑，例如：G:\i386或者H:\i386等。=5\*GB3⑤完成IIS的安裝。（2）瀏覽網站將網站文件夾復制到C:\Inetpub\目錄下。單擊“開始〞按鈕，選擇“設置〞命令，再選擇“控制面板〞命令，在控制面板中選擇“管理工具〞，雙擊“Internet信息效勞〞，出現(xiàn)以下操作界面：按上圖所指位置單擊，在彈出的子目錄中選擇“網站〞，再單擊“網站〞，右擊彈出的“默認網站〞子目錄，選擇“屬性〞，彈出“默認網站〞屬性對話框，我們在此需要修改的有“主目錄〞和“文檔〞屬性，單擊主目錄得到以下對話框：按上圖所示，要將我們要運行的網站設置為主目錄，單擊“瀏覽〞，找到我們復制到C:\Inetpub\目錄下的網站文件夾。對于“文檔〞屬性選項卡，如果“啟用文檔中〞沒有index.asp，需要添加上，因為我們的ASP主頁默認為index.asp。在IE瀏覽器地址欄中輸入HYPERLINK或HYPERLINK即可瀏覽網站。2.網站上傳將網站上傳到自己申請的網站空間中，然后在IE瀏覽器的地址欄中輸入相應的網址即可瀏覽網站?，F(xiàn)在有好多網站提供免費的動態(tài)網站空間，比方HYPERLINK，我們可以很方便的在此網站上申請免費申請動態(tài)網站空間。課后作業(yè)：1.練習IIS安裝和配置。2.申請免費網站空間，編寫一個簡單的ASP程序，上傳到自己申請的網站空間中。第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ù)庫時，在相應頁面的代碼區(qū)域嵌入此頁面，通常使用以下代碼：<!--#includefile="conn.asp"-->這一般是我們進行動態(tài)網站開發(fā)的第一步，也是最關鍵的一步。課后作業(yè)：用ACCESS創(chuàng)立一個數(shù)據(jù)庫，命名為data.mdb，分別用以上兩種方法實現(xiàn)連接數(shù)據(jù)庫。第3章ASP動態(tài)網站開發(fā)的步驟3.1顯示信息的步驟1.簡單顯示信息（顯示一條記錄）（1）確定腳本語言：<%@LANGUAGE="VBSCRIPT"%>注：這句代碼不需要掌握，在用Dreamweaver創(chuàng)立一動態(tài)頁面時，Dreamweaver默認的腳本語言就是VBSCRIPT，因此，在新建頁面的代碼區(qū)域第一行便是如下代碼：<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%>（2）連接數(shù)據(jù)庫：<!--#includefile="conn.asp"-->（3）創(chuàng)立記錄集：<%setrs=Server.CreateObject("adodb.recordset")%>（4）書寫SQL語句：<%sql="select*from表名where條件"%>（5）執(zhí)行SQL語句：<%rs.opensql,conn,1,1%>（6）顯示信息：<%=rs("字段名")%>注：在進行顯示信息時，一般用表格來布局，插入相應行列的表格，在相應的單元格的代碼區(qū)域添加代碼：<%=rs("字段名")%>。（7）關閉記錄集：<%rs.Closesetrs=nothing%>2.分頁顯示信息（顯示多條記錄）（1）確定腳本語言：<%@LANGUAGE="VBSCRIPT"%>（2）連接數(shù)據(jù)庫：<!--#includefile="conn.asp"-->（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)的是表格的某一行。在相應的單元格的代碼區(qū)域添加代碼：<%=rs("字段名")%>④循環(huán)語句結束：<%rs.movenext()i=i+1 loop%>（7）關閉記錄集：<%rs.Closesetrs=nothing%>（8）設置頁碼超級鏈接：<%fori=1toPageCount%><ahref="信息顯示頁面.asp?Page=<%=i%>"><%=i%></a><%next%>3.2添加信息的步驟（1）確定腳本語言：<%@LANGUAGE="VBSCRIPT"%>（2）獲取要插入的數(shù)據(jù)：用Request對象（2）連接數(shù)據(jù)庫：<!--#includefile="conn.asp"-->（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）關閉記錄集：<%rs.Closesetrs=nothing%>3.3修改信息的步驟（1）確定腳本語言：<%@LANGUAGE="VBSCRIPT"%>（2）獲取要修改的數(shù)據(jù)：用Request對象（2）連接數(shù)據(jù)庫：<!--#includefile="conn.asp"-->（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）關閉記錄集：<%rs.Closesetrs=nothing%>3.4刪除信息的步驟（1）確定腳本語言：<%@LANGUAGE="VBSCRIPT"%>（2）獲取要刪除的數(shù)據(jù)：用Request對象（2）連接數(shù)據(jù)庫：<!--#includefile="conn.asp"-->（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）關閉記錄集：<%rs.Closesetrs=nothing%>課后作業(yè)：在數(shù)據(jù)庫data.mdb中創(chuàng)立數(shù)據(jù)表student，字段名稱為：編號id（自動編號），學號sid（文本），姓名sname（文本），年級sgrade（文本），專業(yè)sspeciality（文本），電話sphone（文本）。添加相應信息如：20060201，張三，2006，計算機信息管理，?！?.編寫ASP代碼實現(xiàn)在網頁中顯示學號為20060201所有信息。2.編寫ASP代碼實現(xiàn)通過網頁向數(shù)據(jù)表student中添加信息：20060202，里斯，2006，計算機信息管理，3.分頁顯示所有學生記錄信息，每頁顯示1條記錄信息。4.學號為20060202的同學轉入計算機及應用，編寫程序實現(xiàn)將學號為20060202的同學的專業(yè)修改為計算機及應用。5.學號為20060202的同學轉入其他班級，編寫程序實現(xiàn)刪除該同學的記錄信息。第4章功能實現(xiàn)經常上網的同學會發(fā)現(xiàn)，在我們使用一個網站提供的資源時，網站提供應我們的是這樣一些操作功能，比方我們可以瀏覽網站提供應我們的一些公用資源，直接復制網頁當中提供的資料即可，再比方有一些重要的資料設定了訪問權限，需要我們注冊為網站的用戶，在登錄網站之后即可執(zhí)行相應的操作……在我們學習網站開發(fā)時，我們首先做一些根本的約定，我們制作的網頁都存放在自己命名的網站文件夾中（本教材以xinxiguanli為例），在xinxiguanli文件夾中建立images文件夾用來存放制作網頁用的圖片資料，建立database文件夾用來存放數(shù)據(jù)庫文件，建立include文件夾用來存放嵌入文件，建立file文件夾用來存放一些可供下載的文件，建立upfile文件夾用來存放用戶上傳的文件。4.1網站公用模塊在我們上網瀏覽網站時，我們經常會發(fā)現(xiàn)網頁的某些局部在整個網站所有頁面中始終不變，例如網頁的頂端或底端在網站中始終是不變的，解決這一問題我們經常采用嵌入文件的方法，將網站的公用模塊單獨設置為幾個獨立的網頁，然后用以下命令將其嵌入即可：<!--#includefile="網頁文件路徑及名稱"-->例題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列的表格，設置其邊框為0，在表格內居中插入圖像index.jpg，設置圖像尺寸，寬726px高150px。（3）居中插入一寬度為726px，1行8列的表格，設置其邊框為1，背景顏色為#99FFFF，邊框顏色為#FFFFFF，均勻設置各列的寬度，依次輸入首頁、系部介紹、專業(yè)介紹、課程設置、考試信息、校園新聞、就業(yè)指導、招聘信息，并設置字號為12px。（4）居中插入一寬度為726px，1行1列的表格，設置其邊框為0，在表格內居中插入圖像bar.gif，設置表格的背景圖像為bar.gif。3.制作主頁及其它網頁：新建一動態(tài)頁面，將其保存到xinxiguanli文件夾下，并命名為index.asp，切換到代碼視圖，在代碼<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%>之下添加代碼：<!--#includefile="include/head.asp"-->（如果感到代碼多了很亂的話，可以刪除這兩句代碼以下的所有HTML代碼）依照以上操作制作其它網頁：xibujieshao.asp、zhuanyejieshao.asp、kechengshezhi.asp、kaoshixinxi.asp、xiaoyuanxinwen.asp、jiuyezhidao.asp、zhaopinxinxi.asp。4.制作超級鏈接：切換到head.asp頁面的設計視圖，以制作首頁的超級鏈接為例，選定“首頁〞兩個字，在屬性欄的鏈接處輸入index.asp，或者單擊鏈接右邊的文件夾圖標，查找相應的頁面，即可完成相應的操作。其它文字的超級鏈接都可按照以上方法完成。在IE瀏覽器中輸入網址HYPERLINK即可瀏覽操作的結果。4.2顯示信息模塊我們上網瀏覽網頁時，經常會發(fā)現(xiàn)網站首頁會提供應我們一些最新的通知或重要信息，而且這些信息大多數(shù)以時間倒序排列，也就是說最新的消息或通知總是顯示在頁面的最上面，當我們點擊此標題時，會彈出相應的詳細信息。然而這些信息的標題是提前被存儲在數(shù)據(jù)庫相應的數(shù)據(jù)表中，我們首先要做的是顯示數(shù)據(jù)庫中的信息，再采用網址傳遞參數(shù)的方式在另外的頁面中顯示此標題的詳細內容。 網址傳遞參數(shù)是動態(tài)網站開發(fā)的重要方法，運用此方法可以大大減少網站維護的工作量，網址傳遞參數(shù)的根本格式是：網址？參數(shù)名=參數(shù)值。例題4.2操作要求：在zhaopinxinxi.asp頁面中顯示數(shù)據(jù)庫data.mdb中數(shù)據(jù)表zhaopin的有關內容，要求運用表格布局頁面，倒序顯示編號、公司名稱、招聘職位、招聘人數(shù)、發(fā)布時間等信息，并在沒一行的最后用戶點擊查看即可彈出瀏覽器窗口，查看該招聘的詳細要求。操作步驟：1.建立數(shù)據(jù)庫：在網站文件夾xinxiguanli中新建文件夾database，翻開ACCESS創(chuàng)立數(shù)據(jù)庫data.mdb，并保存到database文件夾中，在數(shù)據(jù)庫中創(chuàng)立數(shù)據(jù)表zhaopin，表格結構及信息如以下圖：2.頁面設計：用Dreamweaver翻開zhaopinxinxi.asp頁面，在頁面中插入2行6列的表格，表格寬度設置為726px，在第1行依次輸入編號、公司名稱、招聘職位、招聘人數(shù)、發(fā)布時間和招聘要求，在第2行最后一欄輸入“查看〞兩個字，并設置表格和單元格屬性為居中。3.代碼編寫：<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><!--#includefile="include/head.asp"--><!--#includefile="conn.asp"--><html><head><title>招聘信息</title><scriptlanguage="javascript"><!--functionwinopen(url){window.open(url,"search","toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=yes,width=600,height=500,top=200,left=100");}//--></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"><!--functionwinopen(url){window.open(url,"search","toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=yes,width=600,height=500,top=200,left=100");}//--></script>（2）在設計視圖中選擇“查看〞，在屬性欄“鏈接到〞添加如下代碼：javascript:winopen('zhaopin.asp?id=<%=rs("id")%>')在代碼視圖中將看到以下代碼：<ahref="javascript:winopen('zhaopin.asp?id=<%=rs("id")%>')">查看</a>（3）新建頁面zhaopin.asp，創(chuàng)立表格9行2列的表格，合并第1行，輸入“-招聘信息〞，從第二行開始左側列依次輸入“招聘職位〞，“招聘人數(shù)〞，“招聘專業(yè)〞，“年齡要求〞，“學歷要求〞，“截止時間〞，“工作經驗〞，“其他要求〞。（4）代碼編寫：<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><!--#includefile="conn.asp"--><%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">學歷要求：</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">工作經驗：</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.頁面設計：在index.asp頁面中創(chuàng)立如上圖的用戶登錄框，要特別注意的是給每一個表單元素分別命名（賬號文本域為userid，密碼文本域為password，類型下拉列表為usertype），選中整個表單，在屬性欄中設置動作屬性為login.asp。2.數(shù)據(jù)庫設計：翻開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"%><!--#includefile="conn.asp"--><%'用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")'判斷用戶類型（學生）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對象記錄用戶賬號和類型，以便控制用戶訪問權限session("userid")=useridsession("usertype")=usertype'轉到student.asp頁面，學生登錄成功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.頁面設計制作zhuce.asp頁面，表單元素命名：帳號文本域命名為userid，用戶名文本域為username，密碼文本域為password，確認密碼文本域為repassword，類型下拉列表為usertype。2.功能實現(xiàn)制作zhucesave.asp頁面，進入代碼視圖，刪除自動生成的所有代碼，添加如下代碼用來實現(xiàn)用戶注冊功能。<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><!--#includefile="conn.asp"--><%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信息管理模塊管理員登錄之后可以管理所有信息，在此以招聘管理為例，管理員具備四個權限，分別是查看、修改、添加和刪除，也是我們一直重點強調的四個步驟，制作方法如下：1.制作zhaopinguanli.asp頁面（1）嵌入文件<!--#includefile="include/head1.asp"-->（2）制作頁面編號公司招聘職位招聘人數(shù)發(fā)布時間招聘管理ASPASPASPASPASP查看|修改|刪除添加招聘信息設置超級鏈接查看：<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"%><!--#includefile="conn.asp"--><!--#includefile="include/head1.asp"--><html><head><metahttp-equiv="Content-Type"content="text/html;charset=gb2312"/><title>招聘管理</title><scriptlanguage="javascript"><!--functionwinopen(url){window.open(url,"search","toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=yes,width=600,height=500,top=200,left=100");}//--></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"><!--DWLayoutTable--><tr><tdwidth="726"height="20"align="center"valign="middle"><ahref="javascript:winopen('zhaopintianjia.asp')">添加招聘信息</a></td></tr></table></body></html>2.查看參照顯示信息的彈出的窗口，在頁面下面居中添加“關閉窗口〞并設置其鏈接到屬性為：javascript:self.close()3.修改單擊招聘管理頁面中的“修改〞，彈出修改招聘信息的窗口，在此需要注意的是要先給頁面添加表單，每項信息添加相應的表單元素，并設置其“初始值〞屬性顯示數(shù)據(jù)庫中的具體數(shù)據(jù)。（1）zhaopinxiugai.asp頁面具體代碼：<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><!--#includefile="conn.asp"--><%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">學歷要求：</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">工作經驗：</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()">關閉窗口</a></p></body></html>（2）zhaopinxiugaisave.asp頁面具體代碼：<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%><!--#includefile="conn.asp"--><%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）制作添加信息的頁面添加表單和表格，輸入相關的信息，添加相應的表單元素，并給每一個表單元素命名，需要注意的是在最后的發(fā)布時間一項中設置文本域的默認值為：<%=Date()%>如果要具體到相應的時間將文本域的默認值為：<%=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">學歷要求：</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">工作經驗：</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"%><!--#includefile="conn.asp"--><%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"%><!--#includefile="conn.asp"--><%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語言根本結構<html>文檔標記<head>頭標記<title>

溫馨提示

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

評論

0/150

提交評論