我的一亩三分地 我就喜欢!
13fen  设为主页
 收藏本站
 
当前位置: > 一亩三分地:首页 > 网络学院 > 网络编程 > ASP专区 > Asp组件/脚本 > Remote Script问题已经解决,帖出来大家共享!!!
热门文章排行
热门文章排行 手推车”功能的实现(10-07)
八大法则防范ASP网站漏洞(10-23)
ASP教程十一、调试ASP脚本(10-23)
在JSP中访问数据库大全(10-23)
虚机服务中常见Asp.Net低级错误一览(03-21)
精采文章排行
精采文章排行 ASP.NET实现抓取网页中的链接(11-15)
ASP连接数据库的11种方法(11-10)
如何动态创建网页的RSS内容摘要(11-10)
ASP网站漏洞及入侵防范方法(11-10)
ASP自定义函数:对字符串正则替换(11-10)
技术专题推荐
网管论坛交流
 

Remote Script问题已经解决,帖出来大家共享!!! 

作者:佚名   来源:一亩三分地   点击:   日期:2007-03-28

在batman基础上改进的,谢谢batman大哥 :-).用的是access2000自带的数据库---nwind.mdb, odbc---NW.

index.html

<HTML>
<HEAD>
<TITLE>RS技术的实现例子</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
td.head {background-color:#3366cc;color:#ffffff}
</style>
</HEAD>

<BODY bgColor=LightGoldenrodYellow>
<script language="JavaScript" src="http://3344net/_ScriptLibrary/rs.htm"></script>
<script language="JavaScript">
RSEnableRemoteScripting("http://3344net/_ScriptLibrary");
</script>
<h1>客户信息</h1>
<hr>
<form name="MyForm">
   <p><input type="text" name="state" size="20"> <input type=button value="提   交" name=btnExecute onclick="execAsynch(state.value)"></p>
</form>
<div id=num></div>
<div id=change></div>
<hr>
<SCRIPT LANGUAGE="JScript">
    var serverURL = "http://3344net";
        var pageURL   = "/rs/Data.asp";

    function refreshPage(co)
    {
        if (co.status != 0) {
                alert("发生异常错误\n" +  
                      message);
            }
            strText = co.return_value.split("|");    
        if (strText == "") {
            document.all.change.innerHTML="<table><tr><td class=head>没有找到!!!</td></tr></table>";}
       else{
            document.all.num.innerHTML="共找到" +strText[0]+ "纪录<br>";
            document.all.change.innerHTML="<table border=1 cellpadding=0 cellspacing=0 width=473><tr><td width=197 class=head><p align=center><b>客户</b></td><td width=276 height=24 class=head><p align=center><b>地址</b></td></tr>"+strText[1]+"</table>";     
           }
     }
    function execAsynch(state)
    {
        RSExecute(serverURL+pageURL, "GetEmpInfoAsArray", state, refreshPage);
    }
     
</SCRIPT>
</BODY>
</HTML>


data.asp

<%@ LANGUAGE=VBSCRIPT %>
<% RSDispatch %>

<SCRIPT RUNAT=SERVER Language=javascript>
<!--#INCLUDE VIRTUAL="/_ScriptLibrary/RS.ASP"-->

    function Description()
    {
           this.GetEmpInfoAsArray = DoGetData;
    }
    public_description = new Description();


    function DoGetData(getstate)
    {
            var objConn = Server.CreateObject("ADODB.Connection");
            objConn.Open("dsn=NW;Network=3344net");
            var rst = Server.CreateObject("ADODB.Recordset");
            rst.Open("SELECT 公司名称,地址 FROM 客户 Where [地区]='" + getstate + "'", objConn, 1, 1);
            count = rst.RecordCount;
            strText = count + "|";
            
            for (var j=0;j<count;j++)  
            {
              strText += "<tr><td>" + rst("公司名称") + "<td>" + rst("地址");
              rst.MoveNext();
            }
            objConn.Close();
      
            return strText;
           
    }
</SCRIPT>


文章评论】 【收藏本文】 【推荐好友】 【打印本文】 【论坛讨论

   相关文章:
·ASP中巧用Response属性 ·第六课:ASP脚本循环语句
·在 Web 页上使用条件数值格式 ·连接数据库查询手册(不仅仅适用于asp)
·警惕"给你的FileSystemObject对象加把锁" ·用ASP做全文检索

   文章评论:(条)
  
 请留名: 匿名评论   点击查看所有评论 网管论坛
 

  责任编辑:一分  声明:刊登此文章是为了传递更多信息,文章内容仅供参考,转载请注明出处。