ASP入门学习(一)准备阶段
Asp動(dòng)態(tài)服務(wù)器頁(yè)面,是使用IIS部署運(yùn)行的腳本語(yǔ)言。開(kāi)發(fā)語(yǔ)言主要是VBScript語(yǔ)法。下面主要說(shuō)說(shuō)開(kāi)發(fā)asp程序需要注意的地方和與數(shù)據(jù)庫(kù)連接的基本代碼格式,inc包含文件,函數(shù),過(guò)程定義,頁(yè)面編碼格式設(shè)置等。
一 準(zhǔn)備工作
1.開(kāi)發(fā)asp IDE軟件:推薦使用ASP Studio 版本1.45
2.設(shè)置IE腳本調(diào)試模式,方便查詢IIS拋出的服務(wù)器端錯(cuò)誤信息,否則只會(huì)顯示簡(jiǎn)單的Http 500 服務(wù)器內(nèi)部錯(cuò)誤等。不方便程序的調(diào)試。
IE ->工具 ->Internet選項(xiàng) ->高級(jí) ->禁用腳本調(diào)試(Internet Explorer)不選(默認(rèn)是選擇狀態(tài))。
3.IIS安裝,推薦安裝版本6.0。
開(kāi)始 ->控制面板 ->添加或刪除程序 ->添加或刪除Windows組件 ->選擇Internet信息服務(wù)(IIS) ->下一步,直到安裝成功。
4.IIS設(shè)置。
開(kāi)始 ->控制面板 ->性能和維護(hù) ->管理工具 ->Internet 信息服務(wù)
1.創(chuàng)建虛擬目錄
?默認(rèn)網(wǎng)站 ->右擊 ->新建 虛擬目錄
2.設(shè)置根目錄
?默認(rèn)網(wǎng)站 ->屬性 ->主目錄(指定本地路徑)
?默認(rèn)網(wǎng)站 ->屬性 ->網(wǎng)站(指定IP地址,提供本地局域網(wǎng)測(cè)試使用,默認(rèn)為localhost,端口80)
3.瀏覽
?選擇需要瀏覽的頁(yè)面 ->右擊 ->瀏覽打開(kāi)。
二 場(chǎng)景分析
查詢顯示數(shù)據(jù)庫(kù)中大類型和小類型信息,已菜單的格式顯示出來(lái)。ASP+Access數(shù)據(jù)庫(kù)。
三 代碼開(kāi)發(fā)
inc.asp
<%'請(qǐng)?jiān)谶@里輸入您的ASP代碼response.Write("這一行是inc包含文件輸出的內(nèi)容!<br/>") %>conf.asp
<%'請(qǐng)?jiān)谶@里輸入您的ASP代碼'定義函數(shù)function TD_productsclass()TD_productsclass="這個(gè)是function函數(shù)定義返回值!<br/>"end function'定義過(guò)程sub ShowArticleContent()dim PaginationTypePaginationType=2select case PaginationTypecase 0 call DefaultPagination() '無(wú)內(nèi)容分頁(yè)格式case 1 call AutoPagination() '自動(dòng)內(nèi)容分頁(yè)case 2 call ManualPagination() '按定義分頁(yè)end selectend subsub DefaultPagination()response.Write("sub無(wú)內(nèi)容分頁(yè)格式<br/>")end subsub AutoPagination()response.Write("sub自動(dòng)內(nèi)容分頁(yè)<br/>")end subsub ManualPagination()response.Write("sub按定義分頁(yè)<br/>")end sub %>conn.asp
<% 'conn '準(zhǔn)備工作 dim conn dim connstr dim path path = server.mappath("\OneFCMS_Data\OneFCMS.mdb") response.Write(path & "<br/>") 'on error resume next connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&path set conn=server.createobject("ADODB.CONNECTION") conn.open connstr If Err Thenerr.ClearSet Conn = NothingResponse.Write "數(shù)據(jù)庫(kù)連接出錯(cuò),請(qǐng)檢查數(shù)據(jù)庫(kù)連接文件中的數(shù)據(jù)庫(kù)參數(shù)設(shè)置。"Response.End End If %>index.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <%Response.CodePage=65001%> <%Response.Charset="utf-8"%> <!--#include file="inc.asp"--> <!--#include file="conf.asp"--> <!--#include file="conn.asp"--> <HTML> <HEAD><Title>index.asp</Title><META http-equiv="Content-Type" content="text/html; charset=utf-8"><META name="Generator" content="Asp Studio 1.0"> </HEAD><BODY><!-- 請(qǐng)?jiān)谶@里輸入您的HTML代碼 --> <%=TD_productsclass%> <%call ShowArticleContent()%> <%'請(qǐng)?jiān)谶@里輸入您的ASP代碼dim BigClassID '不能直接賦予值BigClassID = 5if not isnumeric(BigClassID) thenResponse.Write "<script>alert('警告!請(qǐng)勿嘗試注入!');history.go(-1);</script>" Response.End()end if'第一步:創(chuàng)建對(duì)象set rs1=server.CreateObject("adodb.recordset")'第二步:打開(kāi)連接,執(zhí)行數(shù)據(jù)庫(kù)查詢語(yǔ)句rs1.open "select * from [bigClass] order by px_id asc",conn,1,1if rs1.eof and rs1.bof thenresponse.Write(" 暫無(wú)記錄 !")end if'第三步:判斷記錄集是否到達(dá)結(jié)尾if not rs1.eof then'第四步:數(shù)據(jù)的讀取和操作for i=1 to rs1.recordcount'查詢?cè)摯箢愊旅娴男☆?/span>set rs2=server.createobject("adodb.recordset") exec="select * from [smallclass] where BigClassID="&rs1("BigClassID")&" order by px_id asc " rs2.open exec,conn,1,1 response.Write("<br/><a href='xxx?bigId=" & rs1("BigClassID") & "' title=" & rs1("BigClassName") &">" &rs1("BigClassName") & "</a>")'循環(huán)輸出該小類的信息'#################################do while not rs2.eofresponse.Write("<br/>---<a href='xxx?smallId=" & rs2("SmallClassID") & "' title=" & rs2("SmallClassName") & ">" & rs2("SmallClassName")& "</a>")rs2.movenextlooprs2.closeset rs2=nothing'#################################'response.Write("<br/>") rs1.movenext '大類移動(dòng)到下一條。nextend if'第五步:數(shù)據(jù)庫(kù)對(duì)象的關(guān)閉和資源回收 rs1.closeset rs1=nothing %></BODY></HTML>?四 數(shù)據(jù)庫(kù)表
bigClass表
####################
1.BigClassID
2.BigClassName
3.px_id
####################
smallClass表
####################
1.SmallClassID
2.SmallClassName
3.BigClassID
4.px_id
####################
?
轉(zhuǎn)載于:https://www.cnblogs.com/simpledev/archive/2013/04/08/3006664.html
總結(jié)
以上是生活随笔為你收集整理的ASP入门学习(一)准备阶段的全部?jī)?nèi)容,希望文章能夠幫你解決所遇到的問(wèn)題。
- 上一篇: GitLab 发布全球开发者报告:开源仍
- 下一篇: 城市区号查询易语言代码