<%

''***************************************

'日期：2015-2-23

'程序提供：八艾云    

'官网地址：http://www.8a.hk

'***************************************

%>

<%

'以下为建立connection对象连接数据库 

Dim SqlDatabaseName,SqlPassword,SqlUsername,SqlLocalName,ConnStr,Conn

SqlLocalName = "." 'SQL主机IP地址（服务器名）,默认为(.或者127.0.0.1)，如果使用的是原点互联云数据库，则是远程数据库的IP

SqlDatabaseName = "" 'SQL数据库名 

SqlUsername = "" 'SQL数据库用户名 

SqlPassword = "" 'SQL数据库用户密码 

ConnStr = " Password = "&SqlPassword&"; user id =" & SqlUsername&"; Initial Catalog ="&SqlDatabaseName&"; data source ="& SqlLocalName &";Provider = sqloledb;" 

Set conn = Server.CreateObject("ADODB.Connection") 

conn.open ConnStr 

If conn.state=2 Then 

Response.Write("正在连接") 

ElseIf conn.state=1 Then 

Response.Write("Success，数据库连接成功！") 

Else 

Response.Write("<font color=red>fail</font>，查询失败！") 

End If 

%>

1，下载该文件解压后，把YD_Mssql文件夹上传至FTP目录中

2，通过您的域名或者赠送的二级域名访问，如：http://xxx.xxx.com/YD_Mssql/yuandian_debug.asp，如出现：Success， 则说明成功查询！ 否则，查询失败！