asp连接远程mssql数据库代码

当远程MSSQL数据库更改了端口号，所以连接的代码也要相应的改一下
<%
dim conn,connstr
set conn = server.createobject("adodb.connection")
connstr="Provider=sqloledb;Data Source=*.*.*.*,端口号;Network Library=DBMSSOCN;Initial Catalog=数据库名;User ID=用户名;Password=密码;" 
conn.open connstr
%>