繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 可以近视替代remote script的代码
- ASP
- 介绍一下GETROWS的用法
- 一个在vbscript中读取cookie的程序函数
- 用err.raise自定义错误信息
- 一段返回随机记录的代码
- 基于ACCESS数据库的纯asp论坛制作心得
- 不用Golobal.asa和session实现在线人数统计
- 在ASP里建表
- 结束ADOVB.INC的办法
- 存储过程分页
- 友情连接浏览器
- 怎样使用ASP实现Ping
- 用ASP读取Windows标准INI格式文件
- 使用ActiveX控件开发网页常见的问题
- 两个获取http页面的c#函数
- 将html源代码规范化，转换成XSL代码的asp工具
- 已调试好的asp程序在VB中转换为组件的技巧
- 关于如何动态地在同一页面实现两个互传
- 关于图片与文本同存在数据库中的具体思路
- 实现分页的例子-使用存储过程来实现分页
- 使用索引服务器- 使用索引服务器的对象
ASP 中的 可以近视替代remote script的代码
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 240 ::
收藏到网摘: 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>
评论 (0) All
