aspクラシックでvbscriptを使用しています。FreeASPUploadクラスも使用しました。ローカルではなく、IPアドレスをパスとして使用してサーバーにファイルをアップロードしたいと思います。
ローカルでアップロードする場合に機能するコードは次のとおりです。
Dim uploadsDirVar
uploadsDirVar = Server.MapPath("../temp/")
Set Upload = New FreeASPUpload
Upload.Save(uploadsDirVar)
しかし、IPアドレスのあるパスにアップロードしたいと思います。以下は私が試したコードですが、HTTP500内部サーバーエラーが発生します。
Dim uploadsDirVar
uploadsDirVar = "\\123.45.6.789\DocFolder\"
Set Upload = New FreeASPUpload
Upload.Save(uploadsDirVar)
ログインのため、ローカルのフォルダ\ 123.45.6.789 \DocFolder\をすでにマップしました。クレデンシャル付きのコードも試しましたが、それでも同じエラーが発生します。以下を参照してください。
Dim ServerShare
Dim UserName
Dim Password
Dim NetworkObject
Dim FSO
ServerShare = "\\123.45.6.789\DocFolder\"
UserName = "domain\username"
Password = "password"
Set NetworkObject = CreateObject("WScript.Network")
Set FSO = CreateObject("Scripting.FileSystemObject")
NetworkObject.MapNetworkDrive "", ServerShare, False, UserName, Password
Dim uploadsDirVar
uploadsDirVar = "\\123.45.6.789\DocFolder\"
Set Upload = New FreeASPUpload
Upload.Save(uploadsDirVar)
それでも同じ結果..誰かが助けることができますか?私は、特にファイルのアップロードとその動作において、aspclassicとvbscriptを初めて使用します。ありがとう