|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
当然了,现在国内CRM厂商的产品与其说是CRM,但从至少从我的角度分析上来看,充其量只是一个大型的进销存而已了,了解尚浅,不够胆详评,这里只提技术问题毗连数据库实在,人人在誊写asp程序时,最忧虑的大概就是数据库的毗连信息,会被一些人看到,举行一些损坏。上面我们用vb6.0来做一个静态链接库(.dll)来埋没数据库的毗连信息。
启动vb6.0,新建-->Activedll工程。单击"工程"-->援用,选择"microsoftactiveserverpagesobjectlibrary"
和"microsoftactiveXdataobjects2.1library"两项。将类模块的称号改成dCSS.将工程的称号改成yygwy.保留工程文件yygwy.vbp和类文件dcss.cls。
在dcss.cls中写进:
PrivatemyscriptingcontextAsScriptingContext
PrivatemyapplicationAsApplication
PrivatemyrequestAsRequest
PrivatemyresponseAsResponse
PrivatemyserverAsServer
PrivatemysessionAsSession
PublicSubonstartpage(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
以上语句是必需的。
界说两个私有函数
PublicFunctionrsresult(strsqlAsString)AsRecordset
DimmycnnAsConnection
DimmysetAsRecordset
DimstrconnstringAsString
strconnstring="provider=sqloledb.1;
password=;"&"userid=sa;"&"initialcatalog=vlog;"&"datasource=hpe60;
connecttimeout=15"
strconnstring="driver={sqlserver};server=yang;uid=sa;pwd=;
database=dcss"
mycnn.ConnectionString=strconnstring
mycnn.Openstrconnstring
myset.ActiveConnection=mycnn
myset.Openstrsql,mycnn,3,adCmdText
Setrsresult=myset
EndFunction
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")
</p>只要你想学,就没什么优缺点,上面那位大哥已经把网上的评论说了,但我认为想学哪个都一样,不然它就不可能在当今时代数字艺术方面存活到今天 |
|