仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 582|回复: 8
打印 上一主题 下一主题

[学习教程] ASP网页编程之将毗连数据库的代码埋没在DLL中

[复制链接]
变相怪杰 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:09:47 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

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>只要你想学,就没什么优缺点,上面那位大哥已经把网上的评论说了,但我认为想学哪个都一样,不然它就不可能在当今时代数字艺术方面存活到今天
第二个灵魂 该用户已被删除
沙发
发表于 2015-1-20 07:44:23 | 只看该作者
兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的
admin 该用户已被删除
板凳
发表于 2015-1-27 07:30:39 | 只看该作者
以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。
简单生活 该用户已被删除
地板
发表于 2015-1-31 06:17:57 | 只看该作者
运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改,找出你觉得可以提高性能的地方,加上自己的设计,那就更上一个层次了,也就会真正地感到有所收获。
海妖 该用户已被删除
5#
发表于 2015-2-6 17:46:00 | 只看该作者
我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
谁可相欹 该用户已被删除
6#
发表于 2015-2-17 20:57:36 | 只看该作者
虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。
金色的骷髅 该用户已被删除
7#
发表于 2015-3-5 22:44:31 | 只看该作者
兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的
只想知道 该用户已被删除
8#
发表于 2015-3-12 16:35:26 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
再见西城 该用户已被删除
9#
发表于 2015-3-20 00:04:42 | 只看该作者
我们必须明确一个大方向,不要只是停留在因为学而去学,我们应有方向应有目标.
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-11-15 03:46

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表