ASP网页设计一个基于ASP的题目告白办理体系(二)
由于ASP还是一种Script语言所没除了大量使用组件外,没有办法提高其工作效率。它必须面对即时编绎的时间考验,同时我们还不知其背后的组件会是一个什么样的状况;告白 2、办理功效办理部分共有12个asp文件,这些剧本的次要功效分离以下:
BannerAdminLogin.asp:办理功效的登录页面。默许的用户称号是“ADMINUSER”,暗码是“PASSWORD”。
CheckBannerAdministrationPassword.asp:反省利用办理功效的用户的暗码。
NotLoggedIn.asp:“没有登录”提醒页面,假如在登录之前会见办理页面,则显现该页面。
BannerAdministration.asp:这是办理功效的主界面,列出了一切的告白,并供应两个按钮。这两个按钮分离用于新增告白和新增告白客户。点击告白客户名字能够编纂该告白客户,点击告白文本能够编纂该告白。
Advertisement.asp:输出新告白的信息,或编纂以后告白信息,或挪用DeleteAdvertisement.asp删除以后告白。
Advertiser.asp:输出新告白客户的信息,或编纂以后告白客户信息,或挪用
DeleteAdvertiser.asp删除以后告白客户。
AddAdvertisement.asp:新增告白纪录,从Advertisement.asp表单猎取信息,存储到数据库。
AddAdvertiser.asp:新增告白客户纪录,从Advertiser.asp表单猎取信息,存储到数据库。
UpdateAdvertisement.asp:从Advertisement.asp表单猎取信息,更新数据库中与以后告白具有不异AdvertisementID的纪录。
UpdateAdvertiser.asp:猎取Advertiser.asp表单信息,更新数据库中与以后告白客户具有不异AdvertiserID的纪录。
DeleteAdvertisement.asp:依据以后选中告白的AdvertisementID,删除数据库中的响应纪录。注重:删除并前往办理主界面后偶然必要从头革新。
DeleteAdvertiser.asp:依据以后选中告白客户的AdvertiserID,删除响应的数据库纪录。
【】
完全代码请从本文前面下载。假定一切文件均在inetpubScripts目次下,则登录办理功效的URL为:http://localhost/scripts/BannerAdminLogin.asp。一切其他功效都可今后入手下手会见。
接上去我们先容办理功效剧本中的一些关头成绩。
㈠ 平安
年夜多半实行办理功效的页面受暗码回护,这些页面在实行其义务之前城市反省一个SESSION变量以确认用户已乐成地登录。反省代码以下所示:
反省用户是不是已登录
IfSESSION("LoggedIn")trueThen
Response.Redirect("NotLoggedIn.asp")
EndIf
这里所接纳的平安机制较为复杂,更多的申明拜见《在ASP使用中考证用户身份》。
㈡ 列出一切的告白
BannerAdministration.asp页面启动时会列出数据库中的一切告白纪录。这部分功效经由过程一个复杂的查询和一个纪录集工具完成,以下所示:
列出数据库中的一切告白
Setcn=Server.CreateObject("ADODB.Connection")
cn.Open"BannerBuddy"
Setrs=Server.CreateObject("ADODB.RECORDSET")
Setrs2=Server.CreateObject("ADODB.RECORDSET")
strSql="SELECT*FROMAdvertisement"
rs.OpenstrSql,cn
strCRLF=Chr(13)+Chr(10)
Whilenotrs.EOFandnotrs.BOF
依据告白客户编号(AdvertiserID)查找客户称号
strSql="SELECTNameFromAdvertiserwhereAdvertiserID="+_
CStr(rs.Fields("AdvertiserID"))
rs2.OpenstrSql,cn
strAdvertiser=""
Ifnotrs2.EOFandnotrs2.BOFThen
strAdvertiser=rs2.Fields("Name")
EndIf
Response.Write("</tr>"+strCRLF)
rs2.Close
rs.MoveNext
Wend
体系假定命据库db.mdb的ODBCDSN为BannerBuddy,因而在运转程序之前必须设置好这个DSN。有关数据库毗连和操纵的更多申明,拜见《ASP使用中数据库纪录的拔取与过滤》。
在告白清单中,单击告白客户名字能够编纂该告白客户的信息,单击“文本/图形”栏中的文本能够编纂该告白的信息,单击图片链接能够检察图片。
㈢ 新增、修正告白和告白客户
AddAdvertisement.asp和AddAdvertiser.asp这两个剧本的义务是猎取提交给它们的表双数据,创立告白客户或告白数据库纪录。上面的代码用于新增告白纪录,新增告白客户(AddAdvertiser.asp)的代码也相似,此处略。
毗连到数据库,创立纪录集工具rs,略...
strStartDate=Request.Form("StartMonth")+"/"+_
Request.Form("StartDay")+"/"+_
Request.Form("Startyear")
strEndDate=Request.Form("EndMonth")+"/"+_
Request.Form("EndDay")+"/"+_
Request.Form("Endyear")
nStatus=1
IfUCase(Request.Form("Status"))="INACTIVE"Then
nStatus=0
EndIf
依据所选择的告白客户名字,猎取其编号
nAdvertiserID=1
strSql="selectAdvertiserIDfromAdvertiserwhereName="+_
Request.Form("Advertiser")+""
rs.OpenstrSql,cn
Ifnotrs.EOFandnotrs.BOFThen
nAdvertiserID=rs.Fields("AdvertiserID")
IfIsNull(nAdvertiserID)Then
nAdvertiserID=1
EndIf
EndIf
天生一个新的告白编号
nAdvertisementID=1
strSql="selectAdID=Max(AdID)fromAdvertisement"
rs.Close
rs.OpenstrSql,cn
Ifnotrs.EOFandnotrs.BOFThen
nAdvertisementID=rs.Fields("AdID")+1
IfIsNull(nAdvertisementID)Then
nAdvertisementID=1
EndIf
EndIf
拔出新告白纪录的SQL命令
strSql="insertintoAdvertisement"+_
"(AdvertiserID,Status,ImageURL,"+_
"ImageWidth,ImageHeight,Link,"+_
"AltText,Weight,StartDate,EndDate,"+_
"ViewLimit,ClicksLimit,AdID)Values("
strSql=strSql+CStr(nAdvertiserID)+","
加上其他字段值,略...
strSql=strSql+CStr(nAd</p>SQLServer是基于服务器端的中型的数据库,可以适合大容量数据的应用,在功能上管理上也要比Access要强得多。在处理海量数据的效率,后台开发的灵活性,可扩展性等方面强大。 ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。 ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题: 还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。 ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。 不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍 另外因为asp需要使用组件,所以了解一点组件的知识(ADODB也是组件) 不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍 Session:这个存储跟客户端会话过程的数据,默认20分钟失效 我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
页:
[1]