求助用VB通过互联网实现访问远程SQL服务器

把VB代码里把原先指向本地SQLServer服务器的地方修改为指向你需要访问的目的SQLServer服务器。
另外还需要做一点。。就是你的目的数据库服务器在Internet上有没有固定IP。。如果没有的话。是没办法访问的。必须在公网上能够访问。。我的建议就是在你们公司的网关上装个SQLServer，因为我想这台机器在公网上有分配好的IP。所以外网可以访问。这样在VB代码里稍微做些修改（把原先指向本地SQLServer服务器的地方修改为指向你需要访问的目的SQLServer服务器。）就可以了。。
如果有什么不明白的话。继续解答。。

方法1：（和你的基本相同）
<%
if request("userid")="happy" and request("password")="2222" then
responsrwrite "Y"
else
responsrwrite "N"
end if
%>
方法2：
<table>
<%
USE=request("userid")
PASS=request("password")
If USE="happy" And PASS="2222" Then
%>
<tr><td>Y</td></tr>
<%
ELSE
%>
<tr><td>N</td></tr>
<%
END IF
%>
</table>

---