Httprequestでシステムエラー?


Nagasaki  2003-10-17 10:41:45  No: 109203

こんばんわ!
どうしてもわからなくて質問です。
下記のソースで・・

Dim inCou As Integer, MbrDD As String, hen As String, MbrID As String
    
    For inCou = 0 To TelNo.ListCount - 1
        If TelNo.Selected(inCou) Then
            MbrDD = TelNo.List(inCou)
            Set Httprequest = CreateObject("Microsoft.XMLHTTP")
            Httprequest.Open "GET", "https://aries.kokode.ne.jp/cgi-bin/AddMbr?AID=N001A000000301&APW=2P654276&GID=100006125&MSID=DLP-09025837835&CRTPW=9333&PMSPW=9333&RFRPW=9333&MAIL=ny@qds.ne.jp", False
            Httprequest.send
            hen = Httprequest.responseText
            Myfil = "\\Mainserver\dlp\aaa.txt"
            intFileNo = FreeFile
            Open Myfil For Output As #intFileNo
                Print #intFileNo, hen
            Close #intFileNo
        End If
        Set Httprequest = Nothing
    Next

サーバーからデータを取得したいのですがエラーになります。
エラーメッセージは

実行時エラー  -1072896748(c00ce514)
システムエラー: -1072896748

というのがでるのですが・・
同じフォーム上で3個目のHttprequestです。
他の2個は確実に動作してファイルになるのですが・・
どこがおかしいのでしょうか?

よろしくお願いします。


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加