版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進(jìn)行舉報或認(rèn)領(lǐng)
文檔簡介
7.1Web上常用的編程語言7.2Web數(shù)據(jù)庫概述
7.3ASP編程
習(xí)題7
本節(jié)知識點
JavaScript腳本語言
VBScript腳本語言
ASP(ActiveServerPages,動態(tài)服務(wù)器頁)
JSP(JavaServerPages,Java服務(wù)器頁)
PHP(HypertextPreprocessor,超級文本預(yù)處理語言)7.1Web上常用的編程語言7.1.1JavaScript腳本語言
JavaScript是一種由Netscape的LiveScript發(fā)展而來的原型化繼承的面向?qū)ο蟮膭討B(tài)類型的區(qū)分大小寫的客戶端腳本語言,主要目的是解決服務(wù)器端語言(比如Perl)遺留的速度問題,為客戶提供更流暢的瀏覽效果。7.1.2VBScript腳本語言
VBScript的全稱為MicrosoftVisualBasicScriptingEdition,是MicrosoftVisualBasic語言的一個子集,它并不是一個完整的程序設(shè)計語言,僅包含語言中的一些基本功能。VBScript的最大優(yōu)點是:用純文本建立;直接包含在HTML文檔中;編輯和修改都十分便利。
VBScript是由微軟公司開發(fā)的一種通用的Web腳本語言(其基本語法與Basic語言類似),但它只能被IE瀏覽器所支持。在HTML文檔中插入VBScript的標(biāo)記是:
<html>
<head>
<title>客戶端腳本舉例</title>
<SCRIPTLANGUAGE="VBScript">
<!--
MsgBox"世界你好!"&VbCrLf&"今天是:"&Date
-->
</SCRIPT>
</head>
<body></body></html>7.1.3ASP
ASP是ActiveServerPage的縮寫,意為“動態(tài)服務(wù)器頁”。ASP是微軟公司開發(fā)的代替CGI腳本程序的一種應(yīng)用,它可以與數(shù)據(jù)庫和其他程序進(jìn)行交互,是一種簡單、方便的編程工具。ASP網(wǎng)頁文件的格式是?.asp,現(xiàn)在常用于各種動態(tài)網(wǎng)站中。7.1.4JSP
JSP(JavaServerPages,Java服務(wù)器頁)是由SunMicrosystems公司倡導(dǎo)、許多公司參與一起建立的一種動態(tài)網(wǎng)頁技術(shù)標(biāo)準(zhǔn)。JSP技術(shù)有點類似于ASP技術(shù),它是在傳統(tǒng)的網(wǎng)頁HTML文件(*.htm和*.html)中插入Java程序段(scriptlet)和JSP標(biāo)記(tag),從而形成JSP文件(*.jsp)。7.1.5PHP
PHP是HypertextPreprocessor(超級文本預(yù)處理語言)的縮寫。PHP是一種HTML內(nèi)嵌式的語言,是一種在服務(wù)器端執(zhí)行的嵌入HTML文檔的腳本語言,語言的風(fēng)格有點類似于C語言,現(xiàn)在被很多的網(wǎng)站編程人員廣泛運(yùn)用。
本節(jié)知識點
常用的Web后臺數(shù)據(jù)庫
建立后臺連接的方法7.2Web數(shù)據(jù)庫概述7.2.1常用的Web后臺數(shù)據(jù)庫
1.MicrosoftSQLServer
2.Oracle
3.MicrosoftAccess
(1)?MicrosoftSQLServer需要Windows操作系統(tǒng)支持,適合不太大的系統(tǒng)。
(2)?Oracle可以跨平臺運(yùn)行,適合大型系統(tǒng),使用比較復(fù)雜。
(3)?MicrosoftAccess需要Windows操作系統(tǒng)支持,適合小型系統(tǒng),使用比較簡單。7.2.2建立后臺連接的方法
1.Access連接方法
(1)對Access數(shù)據(jù)庫可以直接寫代碼進(jìn)行連接:
connstr="DBQ="+server.mappath("abcd.mdb")+";DefaultDir=;DRIVER={MicrosoftAccess
Driver(*.mdb)}
setmycon=server.CreateObject("ADODB.Connection")
(2)?Access數(shù)據(jù)庫的DSN-less連接方法:
setadocon=Server.Createobject(“adodb.connection”)
adoconn.Open“Driver={MicrosoftAccessDriver(*.mdb)};DBQ=”&_
Server.MapPath(“數(shù)據(jù)庫所在路徑”)
(3)?AccessOLEDB連接方法:
setadocon=Server.Createobject("adodb.connection")
adocon.open"Provider=Microsoft.Jet.OLEDB.4.0;"&_
"DataSource="&Server.MapPath("數(shù)據(jù)庫所在路徑")2.SQLServer連接方法
(1)?SQLServer連接方法:
setadocon=Server.Createobject("adodb.recordset")
adocon.Open"Driver={SQLServer};Server=(Local);UID=***;PWD=***;"&_
"database=數(shù)據(jù)庫名;"(2)?SQLServerOLEDB連接方法:
setadocon=Server.Createobject("adodb.connection")
adocon.open"provider=SQLOLEDB.1;DataSource=RITANT4;"&_
"userID=***;Password=***;"&_
"initalCatalog=數(shù)據(jù)庫名"3.Oracle連接方法
(1)?OracleADODB連接方法:
setadocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoftodbcfor
oracle};server=oraclesever.world;uid=admin;pwd=pass;"
(2)?OracleOLEDB連接方法:
setadocon=Server.Createobject("adodb.connection")
adocon.open"Provider=OraOLEDB.Oracle;datasource
=dbname;userid=admin;password=pass;"
4.ODBC連接方法
首先設(shè)計好數(shù)據(jù)庫,然后通過控制面板中的ODBC數(shù)據(jù)源進(jìn)行配置,在系統(tǒng)DNS中添加所需要讀取的數(shù)據(jù)庫,可以設(shè)置用戶名和密碼。
<%setmycon=server.CreateObject("ADODB.Connection")
mycon.Open"ODBC數(shù)據(jù)源名","用戶名","密碼"
%>
本節(jié)知識點
用戶注冊(瀏覽器端)
用戶注冊(服務(wù)器端)
加帖子(瀏覽器端)
加帖子(服務(wù)器端)
帖子具體內(nèi)容的顯示和回復(fù)
所有帖子的顯示7.3ASP編程該BBS主要由用戶注冊(瀏覽器端)、用戶注冊(服務(wù)器端)、加帖子(瀏覽器端)、加帖子(服務(wù)器端)、帖子具體內(nèi)容的顯示和回復(fù)以及所有帖子的顯示六個部分組成,其中用戶信息存放在數(shù)據(jù)庫Users.mdb中,帖子存放在數(shù)據(jù)庫bbs.mdb中。它們均為Access數(shù)據(jù)庫,結(jié)構(gòu)分別如表7-1和表7-2所示。表7-1Users.mdb表7-2bbs.mdb
1.用戶注冊(瀏覽器端)login.htm
由用戶輸入相關(guān)信息,通過表單傳送到服務(wù)器中。具體代碼如下:
<html>
<head><title>
register
a
new
user</title><head>
<body>
<FORM
METHOD="POST"
ACTION="/hosp/asp/register.asp"><P>
<H2>請您注冊一個用戶名稱</H2>
用戶:<INPUT
TYPE="TEXT"
name="name"
SIZE="24"><P>
密碼:<INPUT
TYPE="password"
name="password"
SIZE="24"><P>
<INPUT
TYPE=SUBMIT
VALUE="注
冊">
<INPUT
TYPE=RESET
VALUE="清
除">
<a
href="/hosp/asp/dispbbs.asp">返回論壇</a><P>
</body>
</html>
2.用戶注冊(服務(wù)器端)register.asp
利用REQUEST.FORM("表單名")接收表單信息,采用ADO技術(shù)與數(shù)據(jù)庫Users.mdb連接,并將表單信息存入Users.mdb中。具體代碼如下:
<html>
<head><title>
存儲用戶信息
</title></head>
<body>
<!—讀取客戶瀏覽器輸入的用戶名和密碼
-->
<%
name=REQUEST.FORM("name")
code=REQUEST.FORM("password")
<!--
與Users.mdb連接
-->
Set
Connection=Server.CreateObject("ADODB.Connection")
Connection.Open
"Users"
Set
RS=Connection.Execute("SELECT
*
FROM
Users")
<!--
如果該用戶名已存在,請重新輸入,否則存入數(shù)據(jù)庫
-->
If
Not
RS.EOF
Then
%>
該用戶名已被注冊,請您重新注冊新用戶名!
<%
Else
Connection.Execute("INSERT
INTO
Users(Username,password)
Values('"
&name&
"','"
&code&
"')")
RS.Close
Connection.Close
%>
<CENTER><B><%
=name
%></B>
注冊成功!<P>
<a
href="/hosp/asp/dispbbs.asp">返回論壇</a></CENTER>
<%
End
If
%>
</body>
</html>
3.加帖子(瀏覽器端)bbs_add.htm
由用戶輸入待加入帖子的相關(guān)信息,并傳到服務(wù)器中。具體代碼如下:
<html>
<head><title>
a
sample
form
</title></head>
<body
background="/hosp/images/backgrnd.gif">
<FORM
METHOD="POST"
ACTION="/hosp/asp/bbs.asp"><P>
姓名:
<INPUT
NAME="name"
SIZE="28">
密碼:
<INPUT
TYPE="password"
NAME
="code"
SIZE="28"><P>
主題:<INPUT
NAME="subject"
SIZE="66"><P>
內(nèi)容:<P>
<TEXTAREA
NAME="content"
ROWS=20
COLS=72></TEXTAREA><P>
<CENTER><INPUT
TYPE=SUBMIT
VALUE="發(fā)布信息">
<INPUT
TYPE=RESET
VALUE="清除信息"></CENTER>
</FORM>
</body>
</html>
4.加帖子(服務(wù)器端)bbs.asp
接收帖子內(nèi)容,并存入bbs.mdb中。具體代碼如下:
<html>
<head><title>bbs.asp</title></head>
<body>
<%
name=REQUEST.FORM("name")
code=REQUEST.FORM("code")
subject=REQUEST.FORM("subject")
content=REQUEST.FORM("content")
curdate=Date
curtime=Time
<!--
與Users.mdb連接
-->
Set
Connection
=
Server.CreateObject("ADODB.Connection")
Connection.Open
"Users"
Set
RS
=
Connection.Execute("SELECT
*
FROM
author
WHERE
Username='"
&name&
"'
AND
password='"
&code&
"'")
<!--
判斷用戶名與密碼是否正確和匹配
-->
If
Not
RS.EOF
Then
<!--
打開數(shù)據(jù)文件,讀取該文件存放帖子的編號,每加一個帖子,編號加1
-->
Set
FileObject
=
Server.CreateObject("Scripting.FileSystemObject")
Set
InStream
=
FileObject.OpenTextFile
("c:inetpubwwwroothospaspdata.id",
1,
False,
False)
number
=
Cstr(InStream.Readline+1)
Set
OutStream
=
FileObject.CreateTextFile
("c:inetpubwwwroothospaspdata.id",
True,
False)
OutStream.WriteLine
number
If
Request.QueryString("ID")=""
Then
manswernum=number
Else
manswernum=Request.QueryString("ID")
End
If
If
Request.QueryString("topnum")=""
Then
mtopnum=number
Else
mtopnum=Request.QueryString("topnum")
End
If
Set
OutStream
=
Nothing
<!--
與bbs.mdb連接,將帖子信息存入數(shù)據(jù)庫中
-->
Set
Connbbs
=
Server.CreateObject("ADODB.Connection")
Connbbs.Open
"bbs"
Connbbs.Execute("INSERT
INTO
bbs(ID,Username,subject,content,adddate,addtime,answernum,
topnum,visitnum)
Values('"
&number&
"','"
&name&
"','"
&subject&
"','"
&content&
"','"
&curdate&
"','"
&curtime&
"','"
&manswernum&
"',
'"
&mtopnum&
"',0)")
Connbbs.Close
%>
<%
=curdate
&
"
"
%><%
=curtime
&
"
添加貼子
"
%>
<a
href="http://nt-server/hosp/asp/dispbbs.asp">返回論壇</a><P>
姓名:<%
=name
%><P>
主題:<%
=subject
%><P>
內(nèi)容:<%
=content
%><P>
<%
Else
%>
您的用戶名或密碼出錯,請您重新輸入!
<%
End
If
RS.Close
Connection.Close
%>
</body>
</html>
5.帖子具體內(nèi)容的顯示和回復(fù)detail.asp
具體代碼如下:
<html>
<head><title>bbs.asp</title></head>
<bodybackground="/hosp/images/backgrnd.gif">
<%idnum=Request.QueryString("ID")
SetConnection=Server.CreateObject("ADODB.Connection")
Connection.Open"bbs"SetRS=Connection.Execute("SELECT*FROMbbsWHEREID='"&idnum&"'")%>
姓名:<%=RS(1)%><p>
主題:<%=RS(2)%><p>
內(nèi)容:<%=RS(3)%><p>
<!
--形成回復(fù)列表
-->
<%
resub="Re:"
&
RS(2)
mtopnum=RS(8)
RS.Close
Connection.Close
%>
<FORM
METHOD="POST"
ACTION="/hosp/asp/bbs.asp?ID=<%
=idnum
%>&topnum=<%
=
mtopnum
%>">
<P>姓名:<INPUTNAME="name"SIZE="28">密碼:<INPUTTYPE="password"NAME="code"
SIZE="28"><P>
主題:<INPUT
NAME="subject"
SIZE="66"
VALUE="<%
=resub
%>"><P>
內(nèi)容:<P>
<TEXTAREA
NAME="content"
ROWS=20
COLS=72></TEXTAREA><P>
<CENTER><INPUT
TYPE=SUBMIT
VALUE="信息回復(fù)">
<INPUT
TYPE=RESET
VALUE="清除信息"></CENTER>
</FORM>
<a
href="http://nt-server/hosp/asp/dispbbs.asp">返回論壇</a>
</body>
</html>
6.所有帖子的顯示dispbbs.asp
列出所有帖子的主題、作者、時間、訪問人數(shù)等信息。具體代碼如下:
<html>
<head><title>dispbbs.asp</title></head>
<body
background="/hosp/images/backgrnd.gif">
<CENTER><IMG
SRC="/hosp/images/luntan.gif"
BORDER=0></CENTER><P>
<CENTER><A
HREF="/hosp/login.htm"><IMG
SRC="/hosp/images/zhuce.gif"
BORDER=0></A>
<A
HREF="/hosp/bbs_add.htm"><IMG
SRC="/hosp/images/jiatz.gif"
BORDER=0></A>
<A
HREF="/hosp/default.htm"><IMG
SRC="/hosp/images/return.gif"
BORDER=0></A>
</CENTER><P>
<%
Set
Connection=Server.CreateObject("ADODB.Connection")
Connection.Open
"bbs"
Set
RS=Connection.Execute("SELECT
*
FROM
bbs
WHERE
ID=answernum
ORDER
BY
ID
DESC")
Set
Conn=Server.CreateObject("ADODB.Connection")
Conn.Open
"bbs"
Set
RSNEXT=Conn.Execute("SELECT
*
FROM
bbs")
Do
While
not
RS.EOF
%>
<%
=RS(0)
%>
<a
href="/hosp/asp/detail.asp?ID=<%
=RS(0)
%>"><%
=RS(2)
%></a>
-
<FONT
SIZE="4"><B><%
=RS(1)
%></B></FONT>
<%
=RS(4)
&"
"
%><%
=RS(7)
%>(<%
=RS(5)
%>)<P>
<%
Set
RSNEXT=Conn.Execute("SELECT
*
FROM
bbs
WHERE
topnum<>ID
AND
opnum=
'"
&RS(0)&
"'
ORDER
BY
ID
AS
溫馨提示
- 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)方式做保護(hù)處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 保傘工安全管理測試考核試卷含答案
- 聚酯薄膜拉幅工QC管理能力考核試卷含答案
- 老年梗阻性腦積水內(nèi)鏡手術(shù)的圍手術(shù)期風(fēng)險
- 2025秋季望謨縣赴省內(nèi)外高校引進(jìn)高層次人才和急需緊缺人才13人備考題庫及答案詳解(易錯題)
- 軟件開發(fā)流程優(yōu)化討論
- 深度學(xué)習(xí)模型訓(xùn)練優(yōu)化
- 五年級上冊語文《-即景》習(xí)作指導(dǎo)課教學(xué)設(shè)計
- 老年慢性阻塞性肺疾病患者新冠加強(qiáng)免疫接種方案
- 2026年及未來5年市場數(shù)據(jù)中國保險行業(yè)呼叫中心行業(yè)發(fā)展運(yùn)行現(xiàn)狀及投資戰(zhàn)略規(guī)劃報告
- 老年慢性病疼痛管理教育
- 物業(yè)管理經(jīng)理培訓(xùn)課件
- 員工解除競業(yè)協(xié)議通知書
- 【語文】太原市小學(xué)一年級上冊期末試題(含答案)
- 儲能電站員工轉(zhuǎn)正述職報告
- DB3301∕T 0165-2018 城市照明設(shè)施養(yǎng)護(hù)維修服務(wù)標(biāo)準(zhǔn)
- 不銹鋼護(hù)欄施工方案范文
- 商業(yè)地產(chǎn)物業(yè)管理運(yùn)營手冊
- 百人公司年會策劃方案
- 青少年法律知識競賽試題及答案
- 焦?fàn)t安全生產(chǎn)規(guī)程講解
- 鏈?zhǔn)捷斔蜋C(jī)傳動系統(tǒng)設(shè)計
評論
0/150
提交評論