上传文件并在Visual Basic 2010 Express上接收响应

我知道如何将文件上传到PHP脚本以将文件存储到网络服务器，并且PHP脚本会生成唯一的文件名。然后我想使用VB脚本中的响应，就像读取响应一样。我的代码是：上传文件并在Visual Basic 2010 Express上接收响应

的Visual Basic：

Sub uploadfile() 
    For Each fPath In FilePath 
     My.Computer.Network.UploadFile(fPath, "http://mydomain.com/upload.php") 
     MsgBox(fPath) 
    Next 

End Sub

PHP：

<?php 
$temp = explode(".", $_FILES["file"]["name"]); 
$extension = end($temp); 
if ($_FILES["file"]["error"] > 0){ 
    echo "Error"; 
}else{ 
    $newfile = uniqid("image_").".".$extension; 
    move_uploaded_file($_FILES["file"]["tmp_name"], "Images/" . $newfile); 
} 
?>

来源

2014-01-11 Josh Luke Blease

学习VB没什么问题。无论您如何看待其语法，您的A级课程都会让您失望，因为它没有涵盖支持众多企业的语言。 – peterG

我找到了解决自己：

For Each fPath In FilePath 
    Dim client As New WebClient() 
    Dim responseBinary As Byte() 
    responseBinary = client.UploadFile("http://example.com/upload.php", fPath) 
    Dim response As String 
    response = Encoding.UTF8.GetString(responseBinary) 
    MsgBox(response) 
Next

来源

2014-01-11 14:32:26

研究者您必须使用使用

For Each fPath In FilePath 
    Using client As New WebClient() 
     Dim responseBinary As Byte() 
     responseBinary = client.UploadFile("http://example.com/upload.php", fPath) 
     Dim response As String 
     response = Encoding.UTF8.GetString(responseBinary) 
     MsgBox(response) 
    End Using 
Next

来源

2015-08-29 08:00:53

上传文件并在Visual Basic 2010 Express上接收响应

回答

相关问题