首页 > 其他 > 详细

可以近视替代remote script的代码

时间:2014-05-10 04:53:58      阅读:340      评论:0      收藏:0      [点我收藏+]

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

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> 

可以近视替代remote script的代码,布布扣,bubuko.com

可以近视替代remote script的代码

原文:http://blog.csdn.net/hrnaozmg/article/details/25428209

(0)
(0)
   
举报
评论 一句话评论(0
关于我们 - 联系我们 - 留言反馈 - 联系我们:wmxa8@hotmail.com
© 2014 bubuko.com 版权所有
打开技术之扣,分享程序人生!