VB のクラスの 1 つでメソッドに以下を実装しようとしていますが、ビルド エラーが発生します。
Public Sub sendMessage()
Dim sUrl As String
Dim sAPI_ID, sPassword, sUsername, sMobileNo, sText As String
Dim oXMLHTTP, sPostData, sResult
sUrl = "http://api.clickatell.com/http/sendmsg"
sAPI_ID = "xxxx"
sPassword = "xxxx"
sUsername = "xxxx"
sMobileNo = "xxxx"
sText = "This is an example message"
sPostData = "api_id=" & sAPI_ID
sPostData = sPostData & "&user=" & sUsername
sPostData = sPostData & "&password=" & sPassword
sPostData = sPostData & "&to=" & sMobileNo
sPostData = sPostData & "&text=" & sText
oXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP")
oXMLHTTP.Open("POST", sUrl, False)
oXMLHTTP.SetRequestHeader("Content-Type", "application/x-www-form-urlencoded")
oXMLHTTP.Send(sPostData)
sResult = oXMLHTTP.responseText
oXMLHTTP = Nothing
Response.Write(sResult)
End Sub
次の 2 行に下線が引かれていますが、インポートが欠落していると思います。
oXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP")
と
Response.Write(sResult)
インポートする必要があるもの、または不足しているものを誰か教えてもらえますか?