试试下面这个程序:
saveip.asp
<%
Server.Scripttimeout = 1000
On Error Resume Next
strSQLDSN = "xxxx"
strSQLUsername = "sa"
strSQLPassword = ""
' 定义SQL信息
Set adoConn = Server.CreateObject("ADODB.Connection")
' 连接数据库
ConnectionString = "dsn=" & strSQLDSN & ";uid=" & strSQLUsername & ";pwd=" & strSQLPassword & ""
adoConn.Open ConnectionString
'Set adoRS = Server.CreateObject("ADODB.Recordset")
Set fso = Server.Createobject("Scripting.FilesystemObject")
If fso.Fileexists(Server.Mappath("ip.txt")) then
' 从ip.txt得到SQL
Set a = fso.OpenTextFile(Server.Mappath("ip.txt"), 1, False)
Do While a.AtEndOfStream <> True
sql = a.readline
adoConn.Execute (sql)
Loop
a.close
set a = nothing
Else
Response.Write "噢,文件没找到!"
Response.End
End if
Set fso = Nothing
If err.number <> 0 then
' 错误控制
strMsg = strMsg ------------------------------------------------------------------------ vbcrlf
strMsg = strMsg + "错误时间:" + CStr(Now()) + vbcrlf
strMsg = strMsg + "错误类型:Err错误" + vbcrlf
strMsg = strMsg + "错误号 :" + CStr(Err.Number) + vbcrlf
strMsg = strMsg + "错误源 :" + Err.Source + vbcrlf
strMsg = strMsg + "错误描述:" + Err.Description + vbcrlf
strMsg = strMsg ---------------------------------------------------------------------- vbcrlf
strLogMsg = strLogMsg ---------------------------------------------------------------vbcrlf
strLogMsg = strLogMsg + "错误时间:" + CStr(Now()) + vbcrlf
strLogMsg = strLogMsg + "错误类型:Err错误" + vbcrlf
strLogMsg = strLogMsg + "错误号 :" + CStr(Err.Number) + vbcrlf
strLogMsg = strLogMsg + "错误源 :" + Err.Source + vbcrlf
strLogMsg = strLogMsg + "错误描述:" + Err.Description + vbcrlf
strMsg = strMsg -------------------------------------------------------------------------vbcrlf
Response.Write strMsg
End If
%>
分享到:
相关推荐
如何把IP表存到SQL数据库里去 ASP+SQLserver
ASP技术问题解答,希望对你有帮助。
3.利用SQL Server配置管理器配置进行SQL Server 2005网络配置,启用默认实例和命名实例的TCP/IP协议。 4.利用SQL Server外围配置器配置数据库引擎的服务及远程连接,设置为“本地连接和远程连接”,选择“同时使用...
3个文件到 mysql安装目录\data\相应数据库文件夹 下. 2,如果你需要不同的编码或是需要对表结构进行修改,可以修改并依次执行 ip表结构.sql, ip表数据.sql 两个文件 3,另外,本数据包另附转化好的 纯真ip数据...
本文分析了使用IP地址连接SQL Server数据库的速度慢的原因,介绍了获取最新的Microsoft SQL Server 2000 Service Pack、最新的Microsoft Data Access Components 2.6 Service Pack来解决此问题。
本程序用于SQL修复数据库置疑问题而导致无法启动的问题,需要输入服务器IP及操作员口令。本工具针对SQLServer数据库置疑的检测和修复,数据库支持版本:MSDE\SQL2000\SQL2005\SQL2008。当SQLSERVER数据库因各种原因...
可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新...
动网的IP数据库由AC数据库转成SQL数据库.
可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新的全球IP数据库SQL可动态更新...
连接你的SQL数据库,进行 1.建立,删除,修改数据表 2.建立,删除,修改每个表的字段操作 3.SQL语句执行容器,可以执行所有的SQL语句,包括存储过程,也可以检索、插入、更新、删除记录等操作 4.进行数据库的备份 目前该...
3.利用SQL Server配置管理器配置进行SQL Server 2005网络配置,启用默认实例和命名实例的TCP/IP协议。 4.利用SQL Server外围配置器配置数据库引擎的服务及远程连接,设置为“本地连接和远程连接”,选择“同时使用...
3.利用SQL Server配置管理器配置进行SQL Server 2005网络配置,启用默认实例和命名实例的TCP/IP协议。 4.利用SQL Server外围配置器配置数据库引擎的服务及远程连接,设置为“本地连接和远程连接”,选择“同时使用...
3.利用SQL Server配置管理器配置进行SQL Server 2005网络配置,启用默认实例和命名实例的TCP/IP协议。 4.利用SQL Server外围配置器配置数据库引擎的服务及远程连接,设置为“本地连接和远程连接”,选择“同时使用...
3.利用SQL Server配置管理器配置进行SQL Server 2005网络配置,启用默认实例和命名实例的TCP/IP协议。 4.利用SQL Server外围配置器配置数据库引擎的服务及远程连接,设置为“本地连接和远程连接”,选择“同时使用...
截止到2011年12月15日的详细IP数据库文件,从MYSQL导出,文件类型:.sql ;用途:你懂的,不懂就不要下了,希望多多支持
这是一个TCP/IP的程序,通过ONRECEIVE接收客户端连接,接收数据进行显示,并且能够显示到界面上,把符合条件的数据保存到SQLSERVER数据库中。其中,还有LISTBOX的横向滚动条的显示的内容,每次接收的内容滚动到控件...
国内最新IP地址数据库,可导入MYSQL,SQL查询方法: 首先把ip地址转换为整型数值,PHP可使用ip2long函数, SQL语句如下: SELECT * FROM `ip2city` WHERE '{转换后的ip整型数值}' BETWEEN `start_ip` AND `end_ip` ...
PHP版ip数据库,比sql更好,更快 好不好,自己说了才算 IP数据到:20081009
纯真IP 数据库 转化成sql 数据库脚本,可以在你的数据库里面执行建立 地域与IP对于的数据库表。
VB开发的SQLSERVER数据库工具集,适用于Windows Xp、Windows 2000、Windows ... 软件功能:搜索并列出局域网内的所有的Sql Server服务器及数据库、数据表、并对数据库进行表操作:删除、查询、运行SQL查找、编辑等。