2022年ASP连接数据库的全能代码源码精华教程.docx
-
资源ID：62181390
资源大小：11.47KB
全文页数：3页
- 资源格式： DOCX
下载积分：9.9金币
快捷下载
会员登录下载
微信登录下载
三方登录下载：
微信扫一扫登录
|
友情提示
2、PDF文件下载后，可能会被浏览器默认打开，此种情况可以点击浏览器菜单，保存网页到桌面，就可以正常下载了。
3、本站不支持迅雷下载，请使用电脑自带的IE浏览器，或者360浏览器、谷歌浏览器下载即可。
4、本站资源下载后的文档和图纸-无水印,预览文档经过压缩，下载后原文更清晰。
5、试题试卷类文档，如果标题没有明确说明有答案则都视为没有答案，请知晓。
|
2022年ASP连接数据库的全能代码源码精华教程.docx
2022年ASP连接数据库的全能代码源码精华教程'解决了ACCESS数据库路径的问题！'采纳DBType=0或DBType=1来区分AC库还是MSSQL库'详细采纳AC库时应留意的事项，请看程序说明-Dim DBType,Conn,StrConnDBType=0'0为Access数据库，1为MSSQL数据库If(DBType=0) Then'*ACCESS数据库*Dim DbFolderName,DbFolder_Path,SiteFolderDbFolderName=ArticleData '数据库所在文件夹名称DbFolder_Path = Server.MapPath(DbFolderName) '数据库所在路径SiteFolder=Article '系统所在根书目名称 If Session(RootDir) = Then Session(RootDir) = Mid(DbFolder_Path, 1, InStr(1,DbFolder_Path,SiteFolder,1) -1) SiteFolder End if Set Conn = Server.CreateObject(Adodb.Connection) StrConn = Driver={Microsoft Access Driver (*.mdb)}DBQ= Session(RootDir) DbFolderName Data.mdb '连接到数据库 Conn.Open StrConn '*ElseIf(DBType=1) Then'*MSSQL SERVER数据库* Dim DBUserID,DBPassWord,DBName,DBIP '修改以下信息以适合你的网站 DBUserID=sa '数据库登陆名 DBPassWord= '数据库密码 DBName=dbname '数据库名称 DBIP=local '数据库所在地址，假如是本地数据库则为：(local) Set Conn=Server.CreateObject(Adodb.Connection) StrConn = PROVIDER=SQLOLEDB.1;Data Source=DBIP;Initial Catalog=DBName;Persist Security Info=True;User ID=DBUserID;Password=DBPassWord;Connect Timeout=30 Conn.Open StrConn '*Else'*数据库设置错误* Response.Write数据库设置错误，请联系管理员！ Response.End End If'Response.Write StrConn（出处：
