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

MSSQL
SQL server 随机数函数
SQLServer Top语句参数化方法
SQLServer EVENTDATA()函数来获取DDL 触发器信息
sql server 常用的几个数据类型
SQL Server 排序函数 ROW_NUMBER和RANK 用法总结
数据库Left join , Right Join, Inner Join 的相关内容,非常实用
MySql 安装时的1045错误
SQL Server 中查看SQL句子执行所用的时间
模糊查询的通用存储过程
sql 查询慢的原因分析
SQL Server 数据库优化
数据库 日期加减处理
sql 触发器使用例子
sql 刷新视图
提升SQL Server速度 整理索引碎片
恢复.mdf 数据库步骤
Sql 批量替换所有表中内容
Sql 批量查看字符所在的表及字段
SQLServer XML数据的五种基本操作
SQL Server使用Merge语句当源表数据集为空时,无法进行查询的问题

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


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