Brauch dringend Hilfe für Php Login

speedy18122 · 25. Februar 2012, 12:47

Hallo,
ich wollste Fragen [VB 2010] Login/Registrierung über PHP mit MySql

wo man da sein password reinschreibt ?

Danke im vorraus

joschi240 · 25. Februar 2012, 12:55

wo kommste denn nicht klar? beim phpscript (login?!, registrierung?!, mysql?!) oder bei vb.(login oder registrierung)?

speedy18122 · 25. Februar 2012, 12:56

bei vb da steht immer fehler

no password

skype: speedy18122

Ziller · 26. Februar 2012, 01:02

Nabend,

<?php
$userpw = mysql_real_escape_string($_POST['pw']); // <--- Hier ist dein Passwort
$userid = mysql_real_escape_string($_POST['u']);
@mysql_connect('localhost', 'root', 'XXXXX') or die (mysql_error()); <----- XXXXX ist dein Passwort der Datenbank
@mysql_select_db('vb') or die (sqlerror(mysql_errno(), mysql_error()));
$query = "SELECT * FROM `user` WHERE `user`='$userid' AND `passwd`='$userpw'";
$result = mysql_query($query);
$resultcount = mysql_num_rows($result);
if ($resultcount == 0)
{
echo 'Login fehlgeschlagen';
}else {
echo 'Erfolgreich eingeloggt';
}
?>

Imports System.Collections.Specialized, System.Net, System.Text, System.Security.Cryptography
Public Class Form1
Dim nv As New NameValueCollection
Dim wc As New WebClient
Private Sub btn_login_Click(sender As System.Object, e As System.EventArgs) Handles btn_login.Click
nv.Clear()
nv.Add("u", log_usr.Text)
nv.Add("pw", MD5StringHash("hier pw")) 'Hier musst du dein PW eintragen
Dim result() As Byte = wc.UploadValues("http://localhost/login.php?", "POST", nv)
Dim resultstring As String = System.Text.Encoding.ASCII.GetString(result)
MessageBox.Show(resultstring)
End Sub
Public Function MD5StringHash(ByVal strString As String) As String
Dim MD5 As New MD5CryptoServiceProvider
Dim Data As Byte()
Dim Result As Byte()
Dim Res As String = ""
Dim Tmp As String = ""
Data = Encoding.ASCII.GetBytes(strString)
Result = MD5.ComputeHash(Data)
For i As Integer = 0 To Result.Length - 1
Tmp = Hex(Result(i))
If Len(Tmp) = 1 Then Tmp = "0" & Tmp
Res += Tmp
Next
Return Res
End Function
End Class

Ich hoffe ich konnte helfen.

Gruß