|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。实在,人人在誊写asp程序时,最忧虑的大概就是数据库的毗连信息,会被一些人看到,举行一些损坏。上面我们用vb6.0来做一个静态链接库(.dll)来埋没数据库的毗连信息。
启动vb6.0,新建-->Activedll工程。单击"工程"-->援用,选择"microsoftactiveserverpagesobjectlibrary"
和"microsoftactiveXdataobjects2.1library"两项。将类模块的称号改成dCSS.将工程的称号改成yygwy.保留工程文件yygwy.vbp和类文件dcss.cls。
在dcss.cls中写进:
PrivatemyscriptingcontextAsScriptingContext
PrivatemyapplicationAsApplication
PrivatemyrequestAsRequest
PrivatemyresponseAsResponse
PrivatemyserverAsServer
PrivatemysessionAsSessionPublicSubonstartpage(passedscriptingcontextAsScriptingContext)
Setmyscriptingcontext=passedscriptingcontext
Setmyapplication=myscriptingcontext.Application
Setmyrequest=myscriptingcontext.Request
Setmyresponse=myscriptingcontext.Response
Setmyserver=myscriptingcontext.Server
Setmysession=myscriptingcontext.Session
EndSub
PublicSubonendpage()
Setmyscriptingcontext=Nothing
Setmyapplication=Nothing
Setmyrequest=Nothing
Setmyresponse=Nothing
Setmyserver=Nothing
Setmysession=Nothing
EndSub
以上语句是必需的。
界说两个私有函数
PublicFunctiondatasource()AsVariant
datasource="driver={sqlserver};server=yang;uid=sa;pwd=;database=dcss"
EndFunction
编译天生dcss.dll文件。注册regsvr32路径dcss.dll。
用visualinterdev翻开global.asa文件.固然了,你也能够在别的文件中利用。
setdcss=server.CreateObject("yygwy.dcss")
oconn=dcss.datasource()
application("strconn")=oconn
在别的的页面中以下挪用便可:
setobjConn=Server.CreateObject("ADODB.Connection")
objConn.Openapplication("strconn")
转自:静态网制造指南www.ckuyun.com专业性的服务。有的ASP商提供垂直型的应用服务,针对某一特定行业提供应用服务。 |
|