当前位置: 首页 > 图文教程 > 网络编程 > ASP > 可以近视替代remote script的代码

ASP
javascript css 三级目录(简单的)
asp下sql和access数据库随机取10条记录的代码newid()
新增加一个防垃圾评论的asp代码,鄙视垃圾
asp ADO GetString函数与用GetString来提高ASP的速度
windows2003下使用asp WScript.Shell的设置方法
asp UTF-8 乱码问题的解决方法小结
JavaScript面向对象的两种书写方法以及差别
响应对象 错误 ''ASP 0185 : 80020003'' 缺少默认属性
ASP生成伪参数程序设计技巧
asp中使用mysql数据库的注意实现
使用FSO修改文件夹的名称实现文件转移防盗链
asp下request.querystring("id")与request("id")区别
asp将全角的字符转变成半角字符,将半角转变成全角d的代码
asp创建表,复制表 字段类型附录
asp加密解密函数decrypt
asp获取当前网页地址的代码
asp下经常用到的代码
asp 的中文分词
修改正确的asp冒泡排序
rustysun同学ASP代码书写规范

ASP 中的 可以近视替代remote script的代码


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

  这个资料是以前收集的,希望能对你有所帮助。

1、page1.htm

<html>

<head>
</head>

<body>
    <form id=scr_Data>
        First Name: <input type=text id=s_FName value="none">
        <br>
        Last Name: <input type=text id=s_LName value="none">
        <br><br>
        <input type=hidden id=s_Hidden value="No VALUE assigned yet!">
        1. <input type=button id=btn_CallRemoteScripting0 onClick="alert('Before Remote Scripting: ' + scr_Data.s_Hidden.value)" value="Display HIDDEN TEXT BOX value"><br>
        2. <input type=button id=btn_CallRemoteScripting1 onClick="callRemoteScript1()" value="Change First Name, Last Name & Hidden Textbox values (calls an ASP page)"><br>
        3. <input type=button id=btn_CallRemoteScripting2 onClick="alert('After Remote Scripting: ' + scr_Data.s_Hidden.value)" value="Display HIDDEN TEXT BOX value (after Remote Scripting)"><br>
        4. <input type=button id=btn_CallRemoteScripting3 onClick="callRemoteScript2()" value="Clear First & Last Name values but Keep Hidden Text value (calls a HTML page)"><br>
    </form>
</body>

<script language=javascript>
//YOU CAN EITHER USE JAVASCRIPT OR VBSCRIPT...
//YOU CAN ALSO CALL AN ASP OR HTML PAGE...

var t = 'dialogLeft:1024;dialogTop:768;dialogHeight:0;dialogWidth:0;center:no;edge:raised;' +
        'help:no;show=no;resizable:no;status:no;scroll:no;unadorned:yes'

function callRemoteScript1()
{
    var s = "remotescript1.asp"

    /*
    t = Window Properties
    s = Page to call (ASP or HTML)
    scr_Data = Your FORM ID/NAME (*be sure to pass this parameter*)
    */
    self.showModalDialog(s, scr_Data, t);
}

function callRemoteScript2()
{
    var s = "remotescript2.htm"

    /*
    t = Window Properties
    s = Page to call (ASP or HTML)
    scr_Data = Your FORM ID/NAME (*be sure to pass this parameter*)
    */
    self.showModalDialog(s, scr_Data, t);
    alert('Neat eh?');
}
</script>

</html>

2、remotescript1.asp

<%@ Language=VBScript %>

<%
Dim asp_var_FName
Dim asp_var_s_LName

asp_var_FName = "John"
asp_var_LName = "Doe"
%>

<html>

<body>
</body>

<script language=vbscript>
Set f_Reference = window.dialogArguments
f_Reference.s_FName.value = "<%=asp_var_FName%>"
f_Reference.s_LName.value = "<%=asp_var_LName%>"
f_Reference.s_Hidden.value = "This is now the new value of the HIDDEN TEXTBOX"
self.close()
</script>

</html>

3、remotescript2.htm

<html>

<body>
</body>

<script language=vbscript>
Set f_Reference = window.dialogArguments
f_Reference.s_FName.value = ""
f_Reference.s_LName.value = ""
self.close()
</script>

</html>