<!--#include file="../database_type.asp"-->
<style>
.cancelX{ position:absolute; right:3px; top:-7px; *top:5px; font-size:12px; color:#000; cursor:pointer; font-family:Verdana; font-weight:bold;}
</style>
<script language="javascript" src="../js/close.js"></script>
<%
if SqlDatabaseName <>"" and SqlPassword <> "" and SqlUsername <>"" and SqlLocalName <>"" then
sqlname=SqlLocalName
sqluser=SqlUsername
sqlpwd=SqlPassword
dase=SqlDatabaseName
	CoonStr1="driver={SQL Server};server="&sqlname&";uid="&sqluser&";pwd="&sqlpwd&";database="&dase&";"	
	
	Set coon = Server.CreateObject("ADODB.Connection")
		coon.commandtimeout=20
		coon.open CoonStr1
  else
  Set Coon = Nothing
Response.Write"<br><br><br><br><br><br><br><div align='center' >数据库连接出错!请检查连接数据库是否是Microsoft SQL Server 2000数据库！<br><span class='cancelX' title='取消登录[ESC]' onclick='CancelLogin()'>×</span></div>"
		Response.End
	End If
%>
