繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 可以近视替代remote script的代码
- ASP
- 用ASP发 WAP MAIL(-)
- 使用纯粹的asp+语言制作的栏目管理(一)
- 使用ASP方便的建立自己网站的每日更新
- 中文虚拟域名实现(1) (环境：中文NT)
- 中文虚拟域名实现(2) (环境：中文NT)
- 中文虚拟域名实现(3) (环境：中文NT)
- 最简单的ASP聊天室（附源码）
- Win2k IIS 远程执行命令漏洞
- 搜索按钮(客户端表单)
- 转换字符串带有http://的超级链接字符串为真正的超级链接(源码)
- 第一个ASP组件:设置服务器日期时间组件
- 虹雨的功能较全的计数程序
- 下拉框连动的小例子（数据库版）
- 下拉框连动的小例子（.htm版）
- 纯ASP上传图像文件到数据库的最佳例子
- 数组数据排序的程序例子
- 网络精英计数器源程序
- 全文本检索的应用(1)
- 全文本检索的应用(2)
- 全文本检索的应用(3)
ASP 中的 可以近视替代remote script的代码
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 213 ::
收藏到网摘: 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
