Sehr Geehrte Leser,
ich Arbeite an nem UCP und habe ein sehr großes Problem. Das komplette System passiert auf einem PHP Login und weiteres ist natürlich auch in PHP
Problem: Ich weiß nicht wie ich in Form2 die user Variablen nutzen kann
Frage: Wie mache ich das?
Code der PHP Daten:
- Login:
<?php
session_start();
$dbhost = "s";
$dbname = "s";
$dbuser = "s";
$dbpass = "";
$dbname = "s";
$dbuser = "s";
$dbpass = "";
$user = $_GET['username'];
$pass = $_GET['password'];
$pass = $_GET['password'];
mysql_connect($dbhost, $dbuser, $dbpass)or die("Could not connect: ".mysql_error());
$verb = mysql_select_db($dbname);
$verb = mysql_select_db($dbname);
if ($verb)
{
$sql = "SELECT Name, Passwort FROM accounts WHERE Name = '".$user."'";
$quer = mysql_query($sql) or die(mysql_error());
$num = mysql_num_rows($quer);
if ($num == 0)
{
echo("User does not exist");
exit();
}
else
{
while($row = mysql_fetch_assoc($quer))
{
$dbname = $row['Name'];
$dbpassword = $row['Passwort'];
}
if($user == $dbname && $pass == $dbpassword)
{
echo("success");
$_SESSION['na'] = $user;
}
}
}
{
$sql = "SELECT Name, Passwort FROM accounts WHERE Name = '".$user."'";
$quer = mysql_query($sql) or die(mysql_error());
$num = mysql_num_rows($quer);
if ($num == 0)
{
echo("User does not exist");
exit();
}
else
{
while($row = mysql_fetch_assoc($quer))
{
$dbname = $row['Name'];
$dbpassword = $row['Passwort'];
}
if($user == $dbname && $pass == $dbpassword)
{
echo("success");
$_SESSION['na'] = $user;
}
}
}
- Dort werden die Items vom UCP ausgelesen (test.php)
$dbhost = "localhost";
$dbname = "testdb";
$dbuser = "root";
$dbpass = "";
mysql_connect($dbhost, $dbuser, $dbpass)or die("Could not connect: ".mysql_error());
$verb = mysql_select_db($dbname);
$verb = mysql_select_db($dbname);
if ($verb)
{
{
$query = mysql_query("SELECT * FROM accounts WHERE name = '".$user."'");
while($row = mysql_fetch_assoc($query))
{
$test = $row['Name'];
}
}
?>
while($row = mysql_fetch_assoc($query))
{
$test = $row['Name'];
}
}
?>
- VB
Dim Updateme As New System.Net.WebClient
Dim Result As String = Updateme.DownloadString("http://localhost/test.php")
Label1.Text = Result
Dim Result As String = Updateme.DownloadString("http://localhost/test.php")
Label1.Text = Result
mfg