asp网页远程连接 sql 2000 的问题！

Posted 2023-05-13

tags:

篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了asp网页远程连接 sql 2000 的问题！相关的知识，希望对你有一定的参考价值。

我觉得貌似是网页字符串的问题。但我不会怎么修改。。望大哥们帮我修改下。就只让字符串能支持远程连接数据库就行了。。sql2000



<%
On Error Resume Next
Response.Buffer = True
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "No-Cache"
dim pany,ConnStr
'修改以下信息以适合你的网站

'---------------------------------------------------------------------------
dbuid=(Application("dbuid")) '数据库登陆名/此为新版本,请修改Global.asa
dbpwd=(Application("dbpwd")) '数据库密码/此为新版本,请修改Global.asa
dbname=(Application("dbname")) '数据库名称/此为新版本,请修改Global.asa
dbip=(Application("dbip")) '数据库所在的IP地址，如果是本地数据库则为："(local)"/此为新版本,请修改Global.asa
'---------------------------------------------------------------------------
session.timeout=600
set conn=Server.CreateObject("adodb.Connection")
'conn.open "driver=sql server;server="&dbip&";uid="&dbuid&";password="&dbpwd&";database="&dbname&";"
ConnStr="driver=sql server;server="&dbip&";uid="&dbuid&";pwd="&dbpwd&";database="&dbname&""
conn.open ConnStr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，请检查连接字串。"
Response.End
End If

Set pany = Server.CreateObject("panynetcn.Myclass")
pany.domainname=get_domainname()
'pany.Lottery_panycheck()

%>

之后这源码对应的是在这里

<SCRIPT LANGUAGE="VBSCRIPT" RUNAT="SERVER">
Sub Application_onStart
Application("dbuid") = "sa" '数据库登陆名
Application("dbpwd") = "123456" '数据库密码
Application("dbname") = "dingding" '数据库名称
Application("dbip") = "127.0.0.1" '数据库所在的IP地址，如果是本地数据库则为："(local)"
Application("datauid") = "lottery" '前台数据库登陆名
Application("datapwd") = "lotterylottery" '前台数据库密码
End Sub
</Script>

我想应该主要是在第一个源码里面吧。。。。但是我不知道怎么修改。。。
那边数据库的话是开了远程的。。这个我用工具测试过。。没问题。。。

我在网上也查过。。查到下面这语句



<%

dim conn
dim connstr
'on error resume next

connstr = "DRIVER=SQL Server; SERVER=127.0.0.1; UID=sa; password=123456; DATABASE=dingding;"
set conn=server.createobject("ADODB.CONNECTION")

if err.number<>0 then
err.clear
set conn=nothing
response.write "数据库连接出错！"
Response.End
else
conn.open connstr
if err then
err.clear
set conn=nothing
response.write "数据库连接出错！"
Response.End
end if
end if

sub endConnection()
conn.close
set conn=nothing
end sub

%>

用了这个之后就可以连接了。。不过之后网页的很多功能不能使用。。所以我求求大家！！！

没事不要注释掉ON Error Resume Next，你连这句什么意思都不知道，怎么就一下子注释掉呢？

On Error Resume Next与其后的if..end if结构组成一个出错处理程序，也就是VBS/VB的例外处理机制。如果有On Error Resume Next则表示以下语句将接受控制，如有执行错误将错误写入到Err中去，err.number是错误号,err.description表示的是错误描述，如果没有这句，那么所有的语句将不受监控，所以err这个静态对象没有被写入东西，那么err.number一定会是0，不管你是否出错。没事注释掉这个语然，纯粹是胡闹。

字符连接串没有错误，不过以后记着使用SQL专用驱动是应该是:Driver=SQL Server;不要忘记加，这样可以不行的。而在使用OLEDB驱动时则不能加：Prodiver=SQLOLEDB;

我看到在连接时前后台的用户使用不同的连接用户，这样分权限是为了安全，如果你使用了前台用户名连接到后台去时就会出现问题，当然这样的安全设置要求你配置两个不同权限的数据库用户，如果你玩过SQL或者是差不多精通，看一下代码入知道问题出在哪儿了，当然，在连接数据库时这里是没有错误的！参考技术A connstr = "Provider=SQLOLEDB;server=127.0.0.1;uid=sa;pwd=123456;database=dingding;"
把连接串换成这个试下
如果还是有用不了的，那要看报错了。
把错误发上来看看。

无需公网IP，远程连接SQL Server数据库内网穿透

文章目录

1.前言

数据库的重要性相信大家都有所了解，作为各种数据的电子资料夹，其中可能包含了各种信息，从企业员工信息到网站访问或成交数据无所不包，甚至在某些场景下，数据库已经成为企业正常运行必不可少的条件之一。与企业的其他工作一样，数据库也需要进行必要的维护。但经过口罩时期的考验，为自家数据库做一个远程操作的设置显得很有必要。今天，笔者就为大家介绍，如何使用cpolar内网穿透，远程连接和操作SQL Server。

2.本地安装和设置SQL Server

Microsoft SQL Server算是比较知名的关系型数据库管理软件，虽然不算是应用最多的，但其作为微软出品，对自家的Windows系列操作系统有很好的兼容性，因此很适合应用在各种安装了Windows操作系统的硬件上，并承担起数据管理软件的责任。

2.1 SQL Server下载

由于SQL Server是微软出品，因此可以轻松的在微软的官网上找到下载（https://www.microsoft.com/en-us/sql-server/sql-server-downloads）

点击所需版本下载（笔者选择了Developer），双击下载好的.exe文件，就可以进行自动安装。

在安装模式选项中，同样选择所需的模式。在这里，笔者选择了基本安装模式。

接下来就是一路Next即可完成安装程序

2.2 SQL Server本地连接测试

完成安装后，SQL Server会自动转入操作界面，我们在这里点击下方的立即连接按钮。

这时会弹出SQLCMD命令行窗口，只要显示内容如下图所示，就说明我们本地的SQL Server安装完成。

2.3 Cpolar内网穿透的下载和安装

接下来，我们继续安装远程连接SQL Server的关键软件：Cpolar。与Microsoft SQL Server一样，我们可以登入Cpolar的官网（www.cpolar.com），点击首页上方的下载按钮，进入cpolar下载页面，下载所需版本的cpolar软件。当然，我们这里选择Windows版本进行下载。

Cpolar下载完成后，将下载的文件解压，点击.msi文件，就能进入cpolar自动安装程序，只要一路Next就能完成安装。

2.3 Cpolar内网穿透的注册

由于cpolar是以注册用户为区分，为每个用户（无论是免费还是付费）创建单独的数据隧道，辅以每个用户独立的密码和token码，以此保证用户的数据安全。因此我们在使用cpolar前，需要进行注册，注册的过程也非常简单，直接点击cpolar官网右上键的注册按钮，进入用户注册页面，再设置用户名、密码等几项简单信息，就能完成新用户的注册。

3.本地网页发布

这时我们在本地电脑上安装了SQL Server和cpolar，接下来我们就可以使用cpolar内网穿透，创建一条能够从公共互联网上直连本地SQL Server的数据隧道，达到远程访问SQL Server的目的。

需要注意的是，cpolar免费版设置的数据隧道地址以24小时为周期进行重置，VIP版则可以创建长期稳定不变化的数据隧道地址。但我们并不知道何时会需要远程连接数据库（笔者就因疫情临时管控吃过大亏），因此笔者将cpolar升级至VIP版，以便创建能够长期稳定的数据隧道。

3.1 Cpolar云端设置

首先，我们登录cpolar客户端，在仪表台页面左侧找到预留按钮，进入数据隧道的“预留”页面。

在cpolar的预留页面，我们找到保留的TCP地址栏位，为我们要连接的SQL Server设置一个公网地址，这个地址可以看做是数据隧道的入口，也可以理解为空白数据隧道（毕竟这里设置的隧道入口还没有关联本地软件的输出端口）。

在保留的TCP地址栏位，我们只要进行两项简单的设置:

地区：即服务器所在区域，我们就近选择即可
描述：可以看做这条数据隧道的注释，只要方便分辨即可

完成这两项设置后，就可以点击右侧的“保留”按钮，将这条数据隧道的入口固定下来。

这里我们需要将地址栏位的内容复制下来，在cpolar客户端进行设置时会需要到这个地址。当我们不再需要这条数据隧道时，还可以点击右侧的x将这条保留的隧道删除，节约珍贵的隧道名额。

免费版的临时数据隧道不需要进行cpolar云端设置，可直接进行cpolar客户端设置，但也就无法设置能够长期稳定存在的数据隧道。

3.2 Cpolar本地设置

接着，我们回到本地电脑上安装的cpolar客户端（可以从开始菜单点击快捷方式，也可以直接在浏览器输入localhost：9200访问）。在cpolar的客户端左侧，我们点击隧道管理项下的创建隧道按钮，进行本地数据隧道的设置，将cpolar云端创建的隧道入口与本地SQL Server连结起来。

当然了，想要创建数据隧道，仍需要进行一些设置，具体为：

隧道名称：该栏同样可以看做是数据隧道的备注，用于与其他本地创建的隧道进行区分，这里我们输入微软SQL；
协议：该栏是内网穿透的应用场景，如发布网页、数据传输、硬件互联等，本例中选择TCP协议；
本地地址：该栏需要填入SQL Server的输出端口号，即端口1433（SQL Server的默认端口号）；
端口类型：该栏主要是内网穿透数据隧道的持续时间，打算长期使用的点选固定TCP端口；若只是测试或临时使用，则选择随机临时TCP端口（需要注意的是，固定TCP端口需要将cpolar升级至专业版及以上）
预留的TCP地址：该栏位仅限于选择了“固定TCP端口”的用户，若勾选的是“随机临时TCP端口”选项，则不会出现该栏位。填写我们刚刚保留成功的固定TCP端口地址。