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

MSSQL
巧用SQL链接服务器访问远程Access数据库
SQL Server如何删除群集实例
安装SQL 2005中的AdventureWorks数据库
SQL Server 2008中有关XML的新功能
SQL Server注入大全及防御
Sql Server 2000视图中小心使用*符号
Sql Server导出指定条件的数据
SQL Server 2008的在线事务处理
介绍SQL Server 2008的四项新特性
SQL Server 2008在数据仓库方面的一些优点
触发器对SQL Server数据库进行备份
设置在Access项目中检索的记录数
SQL Server关于SQL Agent使用技巧
把sql server所有表的所有者改为dbo
IIS、SQL Server和ASP.NET安全设置解决方案
SQL Server 2005日志文件损坏怎么办?
SQL Server数据库字典SQL语句
临时表在SQL Server和MySql中创建的方法
SQL Server数据库查询优化3种技巧
SQL Server数据库开发10个问题

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-30   浏览: 111 ::
收藏到网摘: 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