将 Javascript 中的 Return 值传递给 VBScript,反之亦然 ASP
Pass and Return value from Javascript to VBScript, Vice Versa in ASP
我的代码在下面,我想让它工作,因为我正在工作的现有网页主要使用 VBScript。我正在使用 ajax 来查询 SQL 的值。我不想更改大部分代码,所以我只是想知道是否可以像下面的代码一样将 return 值从 javascript 放回 vbscript。
<SCRIPT LANGUAGE="VBSCRIPT">
Sub check()
Dim a
Dim b
a = 1
b = retValue a
MsgBox b
End Sub
<SCRIPT LANGUAGE="JavaScript">
function retValue(a){
return a + 1;
}
</SCRIPT>
有可能。
您的脚本有 2 个问题。
- 您的 vbscript 脚本标签没有
</script>
- retValue 是一个函数。您需要使用 in ( )
传递参数
我试着打电话给 check
& 它显示了带有文本 2
的消息框
<SCRIPT LANGUAGE="VBSCRIPT">
Sub check()
Dim a
Dim b
a = 1
b = retValue(a)
MsgBox b
End Sub
</script>
<SCRIPT LANGUAGE="JavaScript">
function retValue(a){
return a + 1;
}
</SCRIPT>
我的代码在下面,我想让它工作,因为我正在工作的现有网页主要使用 VBScript。我正在使用 ajax 来查询 SQL 的值。我不想更改大部分代码,所以我只是想知道是否可以像下面的代码一样将 return 值从 javascript 放回 vbscript。
<SCRIPT LANGUAGE="VBSCRIPT">
Sub check()
Dim a
Dim b
a = 1
b = retValue a
MsgBox b
End Sub
<SCRIPT LANGUAGE="JavaScript">
function retValue(a){
return a + 1;
}
</SCRIPT>
有可能。
您的脚本有 2 个问题。
- 您的 vbscript 脚本标签没有
</script>
- retValue 是一个函数。您需要使用 in ( ) 传递参数
我试着打电话给 check
& 它显示了带有文本 2
<SCRIPT LANGUAGE="VBSCRIPT">
Sub check()
Dim a
Dim b
a = 1
b = retValue(a)
MsgBox b
End Sub
</script>
<SCRIPT LANGUAGE="JavaScript">
function retValue(a){
return a + 1;
}
</SCRIPT>