Post 从href链接调用帖子的VBScript

我们的office团队使用VBScript维护和开发一个经典的ASP应用程序

我们遇到了一项涉及创建链接的技术任务。当点击链接时，我们希望我们的ASP页面调用帖子

文章应该由ASP.NET中的链接间接调用

以下是ASP页面中的VBScript代码和链接，用于调用最终将调用POST的VBScript子例程：

 <%dim whereFrom
 whereFrom = "RevSummary"
 dim critiqueID
 critiqueID = 389
 dim orignalCritiqueID
 orignalCritiqueID = 249
 %>


 <a href="#" onclick="<%=vbscript:showCritiqueDetailsInvocation( whereFrom, critiqueID, orignalCritiqueID )%>" class="TenPtList" target="_blank">
                            <font color="blue">
                               Critique Details
                            </font>
                            </a>

 <%
 Sub ShowCritiqueDetails(WhereFromArg, CritiqueIDArg, OrignalCritiqueIDArg )
dim DataToSend : DataToSend = "WhereFrom=" + WhereFromArg + "&CritID=" + CritiqueIDArg + "&OriginalCritID=" + OrignalCritiqueIDArg
dim servXmlHttp
dim urlOfInterest : urlOfInterest = Application("RAMSREVURL") + "CritiqueDetailsPopup.asp"
set servXmlHttp = server.Createobject("MSXML2.ServerXMLHTTP")
servXmlHttp.Open "POST", urlOfInterest ,false
servXmlHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
servXmlHttp.send DataToSend
Set servXmlHttp = nothing
End Sub
 %>

最终的要求是我们希望调用POST，然后我们希望导航到名为CritiveDetailsPopup.asp的页面

---

上述方法是否可行？此外，上述方法是否是一种良好的编程实践？

如果您希望从当前页面触发

帖子，您可以使用类似的方法



函数提交链接（方法）
'获取对触发事件的对象的引用
模糊对象
设置Obj=Window.Event.src元素
'传递方法（GET或POST）和要向其发送数据的URL。
模糊形式
Set Form=Document.getElementById（“form1”）
Form.Method=Method
'从Href属性中提取URL
Form.Action=Obj.Location.Href
调用表单。提交（）
“返回错误
SubmitLink=False
端函数



由于现在浏览器中对VBScript的支持有限（即使微软也不使用它），使用JavaScript，这段代码变得容易多了



函数提交链接（obj，方法）{
//Pass方法（GET或POST）和要向其发送数据的URL。
var form=Document.getElementById（“form1”）；
form.method=方法；
//从Href属性中提取URL
form.action=obj.location.Href；
表单提交（）；
返回false；
}


我的方法

<form  method="post" name="frm">
 <div class="formItem">
    <a href="" class="bidibidi" onclick="frm.submit();">submit</a>
</div>


@Freerider好的，是的，但上述方法有效吗？另外，上述方法是一种良好的编程实践吗？很抱歉@Freerider是什么？OP想要启动一个
POST
这是一个客户端任务，而不是服务器端任务。在一条注释中无法解释此代码的错误，因为尝试响应时，
将失败。请编写一个不是字符串的值。
“
”。在询问此问题之前，您是否确实尝试过运行此值？