帝国软件
  设为首页 加入收藏 关于我们
 
解密帝国网站管理系统
栏 目:
 
您的位置:首页 > 技术文档 > ASP编程
可以近视替代remote script的代码
作者:东方蜘蛛 发布时间:2005-03-12 来源:chinaasp.com
这个资料是以前收集的,希望能对你有所帮助。

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>

  
评论】【加入收藏夹】【 】【打印】【关闭
※ 相关链接
 ·控制输出字符串的长度,可以区别  (2005-03-12)
 ·发送带附件的HTML格式邮件例程可  (2005-03-12)
 ·怎么样可以把 phpinfo()屏蔽掉?  (2005-03-11)

   栏目导行
  PHP编程
  ASP编程
  ASP.NET编程
  JAVA编程
   站点最新
·致合作伙伴的欢迎信
·媒体报道
·帝国软件合作伙伴计划协议
·DiscuzX2.5会员整合通行证发布
·帝国CMS 7.0版本功能建议收集
·帝国网站管理系统2012年授权购买说
·PHPWind8.7会员整合通行证发布
·[官方插件]帝国CMS-访问统计插件
·[官方插件]帝国CMS-sitemap插件
·[官方插件]帝国CMS内容页评论AJAX分
   类别最新
·在ASP中使用数据库
·使用ASP脚本技术
·通过启动脚本来感受ASP的力量
·学习使用ASP对象和组件
·解析asp的脚本语言
·初看ASP-针对初学者
·ASP开发10条经验总结
·ASP之对象总结
·ASP与数据库应用(给初学者)
·关于学习ASP和编程的28个观点
 
关于帝国 | 广告服务 | 联系我们 | 程序开发 | 网站地图 | 留言板 帝国网站管理系统