当前位置: 首页 > 图文教程 > 数据库 > MSSQL > win98+PWS环境下连接读取远程SQLServer

MSSQL
J2EE基础应用:J2EE中SQL语句自动构造方法
SQL Server asp.net 数据提供程序连接池
SQL Server的怪辟:异常与孤立事务
一个修改Oracle数据库用户密码的小诀窍
SQL和Oracle对数据库事务处理的差异性
SQL SERVER应用问题解答13例(三)
设置Proxy Server和SQL Server实现互联网上数据库的安全
SQL Server 7.0 入门(一)
SQL Server 7.0 入门(二)
SQL Server 7.0 入门(三)
SQL Server 7.0 入门(四)
SQL Server 7.0 入门(五)
SQL Server 7.0 入门(七)
SQL Server 7.0 入门(八)
SQL Server XML 和 Web 应用体系结构(一)8
SQL Server XML 和 Web 应用体系结构(二)
SQL Server同Exchange Server结合应用--SQL Mail2
使用SQL Server 7.0建立一个安全的数据库的最好方法是
分布式查询和分布式事务
在SQL Server的存储过程中调用Com组件

MSSQL 中的 win98+PWS环境下连接读取远程SQLServer


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-30   浏览: 84 ::
收藏到网摘: n/a

  from: http://www.planet-source-code.com/vb/scripts/ShowCode.asp?lngWId=4&txtCodeId=6518
Connect/Read Remote SQL server Using PWS in win 98


     I had to test Microsoft's Personal Webserver (PWS) in win 98 to access Remote SQL server 7.0
installed in a NT server. The clients to win 98 had LAN connections. Easy one , don't vote, have fun with
PWS. In fact I tested my connection with this script, before I created an out of process server demo with
VB.



  
  

code:
Can't Copy and Paste this?
Click here for a copy-and-paste friendly version of this code!


Terms of Agreement:   
By using this code, you agree to the following terms...   
1) You may use this code in your own programs (and may compile it into a program and distribute it in
compiled format for langauges that allow it) freely and with no charge.   
2) You MAY NOT redistribute this code (for example to a web site) without written permission from the
original author. Failure to do so is a violation of copyright laws.   
3) You may link to this code from another website, but ONLY if it is not wrapped in a frame.
4) You will abide by any additional copyright restrictions which the author may have placed in the code or
code's description.  


    '**************************************
    ' Name: Connect/Read Remote SQL server U
    '     sing PWS in win 98
    ' Description:I had to test Microsoft's
    '     Personal Webserver (PWS) in win 98 to ac
    '     cess Remote SQL server 7.0 installed in
    '     a NT server. The clients to win 98 had L
    '     AN connections. Easy one , don't vote, h
    '     ave fun with PWS. In fact I tested my co
    '     nnection with this script, before I crea
    '     ted an out of process server demo with V
    '     B.
    ' By: Manas Mukherjee
    '
    ' Assumes:Knowing Little bit of LAN woul
    '     d help , VPN, HTML, Creating Virtual dir
    '     ectory with PWS
    '
    'This code is copyrighted and has    ' limited warranties.Please see http://w
    '     ww.Planet-Source-Code.com/xq/ASP/txtCode
    '     Id.6518/lngWId.4/qx/vb/scripts/ShowCode.
    '     htm    'for details.    '**************************************
    
    <HTML><HEAD>
    <TITLE> ASP_PUBS/SQL Server In NT server</TITLE>
    </HEAD>
    <BODY><CENTER>
    <%
    Dim objConn, objRS, strQ, strOut, I
    Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial
Catalog=pubs;Data Source=\\URServerName"
    Set objRS = Server.CreateObject("ADODB.Recordset")
    strQ = "SELECT