PHP-Quellcode
- <?php
- if (!isset($_SERVER['PHP_AUTH_USER'])) {
- header('WWW-Authenticate: Basic realm="blubb"');
- header('HTTP/1.0 401 Unauthorized');
- echo "<!DOCTYPE HTML><html><head><title>Access denied</title></head><body><h1>Access denied, not authorized</h1></body></html>";
- } else {
- $username = mysql_real_escape_string($_SERVER['PHP_AUTH_USER']);
- $password = md5(mysql_real_escape_string($_SERVER['PHP_AUTH_PW']);
- $connectionid = mysql_connect("localhost", "local", "host");
- $sql = "SELECT * FROM 'local'.'user' WHERE username = '$username' AND password = '$password'";
- $result = mysql_query($sql);
- if(!$result) {
- die('Error: ' . mysql_error());
- }
- if(!empty(mysql_num_rows($result))) {
- if(!empty($_FILES)) {
- print_r($_SERVER);
- } else {
- echo "No files specified";
- }
- } else {
- header('HTTP/1.0 401 Unauthorized');
- echo "Access denied, not authorized";
- }
- }
- ?>
VB.NET-Quellcode
- Dim wClient As New Net.WebClient()
- Private Sub UploadCompleted(ByVal sender As Object, ByVal e As Net.UploadFileCompletedEventArgs)
- 'Trace.WriteLine(e.Result)
- End Sub
- Private Sub UploadStatusChanged(ByVal sender As Object, ByVal e As Net.UploadProgressChangedEventArgs)
- Me.ProgressBar1.Value = CInt((e.BytesSent / e.TotalBytesToSend) * 100)
- End Sub
- Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click
- AddHandler wClient.UploadFileCompleted, AddressOf UploadCompleted
- AddHandler wClient.UploadProgressChanged, AddressOf UploadStatusChanged
- wClient.Headers.Add("Content-Type", "binary/octet-stream")
- wClient.Credentials = New Net.NetworkCredential("Beispieluser", "Beispielpasswort")
- Try
- wClient.UploadFileAsync(New Uri("http://wayne/example.php"), "POST", "C:\Users\Samus Aran\Music\becominginsane.ogg")
- Catch ex As Exception
- MessageBox.Show(ex.InnerException.Message)
- End Try
- End Sub
Die Datei wird beim Klick auf die Progressbar hochgeladen, dann erst krieg ich ne System.Net.WebException, in der angegeben wird, dass der Server nen Fehler 500 zurückgegeben hat.
Der Benutzer bei wClient.Credentials existiert, warum gibts da nen Fehler?