将 server.createobject 从经典 ASP 转换为 ASP.NET答案

【问题标题】：Convert server.createobject from classic ASP to ASP.NET将 server.createobject 从经典 ASP 转换为 ASP.NET
【发布时间】：2023-03-14 08:06:01
【问题描述】：

您好，我有一个在 ASP 经典中创建的函数，并且想要在 ASP.NET Vb 中转换该函数。下面是经典 ASP 中使用的代码

Function chargeIt(CARD_NUM, EX_MONTH, EX_YEAR, AMOUNT, COMMENT)    
url = "https://secure.authorize.net/gateway/transact.dll"
set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP") 
xmlhttp.open "POST", url, false 
xmlhttp.send "x_description=""Violation Payment For "&COMMENT&"""&x_Version=3.1&x_Delim_Data=True&x_Login=xnxx&x_Tran_Key= 9&x_Amount="&amount&"&x_Card_Num="&card_num&"&x_Exp_Date="&ex_month&ex_year&"&x_Type=AUTH_CAPTURE"
    Dim arrContents(150,0)

    contents=split(xmlhttp.responseText,",")
    'response.write(xmlhttp.responseText)
    i=0
    for each value in contents
    arrContents(i,0)=value
    i=i+1
    next
    SELECT CASE arrContents(0,0)
    CASE "1"
        status="Approved"
    END SELECT

    chargeIt=status
end function

【问题讨论】：

这看起来像一个支付网关。您是否看过他们是否提供 ASP.net API 代码？如果他们的示例使用 C#，则可以使用免费的转换工具。 C# 转 VB 通常比其他方式效果更好，主要是因为 VB 不区分大小写
我们可以帮助您编写代码，但我们不会只是重写它。 Authorize.net 在 vb.net 中有示例代码：developer.authorize.net/downloads/samplecode
ASP.NET 没有自己的发送 HTTP 请求的类吗？ msdn.microsoft.com/en-us/library/…

标签： asp.net vb.net vbscript asp-classic

【解决方案1】：

您可以改用 System.Net.WebRequest 类。它是 .NET Framework 的一部分。

例如：

Dim strURL
Dim objXML As WebRequest
Dim strResponse As WebResponse

objXML = WebRequest.Create(strURL)
strResponse = objXML.GetResponse()

objXML = Nothing
strResponse.Close()

Google 在 WebRequest VB.NET 上，你应该可以开始了......

【讨论】：