Private Sub Command1_Click()
Dim t As String, m As Long, id As String, n As Long
t = MeWebBrowser1LocationURL
' t = ">
t = Replace(t, "\", "/")
m = InStr(t, "id=")
If m > 0 Then
id = Right(t, Len(t) - m - 2)
n = InStr(id, "/")
If n > 0 Then
id = Left(id, n - 1)
End If
n = InStr(id, "&")
If n > 0 Then
id = Left(id, n - 1)
End If
MsgBox "ID 为：" & id
End If
End Sub
假设：
1、你的AHTM的FORM使用GET方法提交数据，且AHTM的FORM中只有一个INPUT的属性设置了值，类似于；
<form method="GET" action="ahtm">
CODE:<input name=code size="8">
<input type="submit" value="发送">
</form>
2、BHTM的IFRAME的id的值设为“abc”，类似于：
<iframe id="abc" src="about:blank" width="300" height="100">
3、JSP页面与BHTM位于同一目录下，且名称为：cjsp
那么BHTM中加入下面的内容，并将body的onload属性设为
<body onload="test1()">其他内容</body>
，即可达到你要的效果：
<script language="javascript">
function test1()
{
var str=documentlocationhref;
documentgetElementById("abc")src=
"Cjspcode="+(strsubstring(strindexOf("=")+1));
}
</script>
下面给出一个BHTM的简单样例：
====================================================
<html>
<head>
<script language="javascript">
function test1()
{
var str=documentlocationhref;
documentgetElementById("abc")src="bhtmcode="+(strsubstring(strindexOf("=")+1));
}
</script>
</head>
<body onload="test1()">
<iframe id="abc" src="about:blank" width="300" height="100">
</iframe>
</body>
</html>
=========================================================
祝你好运！
当一个url过来时，如：具体路径/hellojspname=john，在hellojsp页面，可以这样得到name的值：
<%String path = requestgetContextPath();
String basePath = requestgetScheme()+"://"+requestgetServerName()+":"+requestgetServerPort()+path+"/";
String name = requestgetParameter("name");//用request得到
%>
然后在<body>hello:<%=name%></body>中显示。
解释说明：
requestgetParameter是用来获取URL中的参数的
以上就是关于VB 获取网址参数值 高手进全部的内容，包括:VB 获取网址参数值 高手进、javascript如何取得页面传递参数、在jsp页面如何获得url参数等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）