Beiträge von robbi2304

<?php
	/**
	 * Created by PhpStorm.
	 * User: Fabian Kramer
	 * Date: 25.12.2016
	 * Time: 18:15
	 */
	error_reporting(E_ALL);
	ini_set("display_errors", 1);
	define('Dir',__DIR__);
	require_once(Dir.'/PDO.Class.php');
	define("HOST", "localhost");
	define("USER", "drb");
	define("PASSWORD",  "zensiert");
	define("DATABASE", "drb");
	if(isset($_POST["Username"], $_POST["Password"]))
	{
		Connection::Connect(HOST, USER, PASSWORD, DATABASE);
		$Query = "SELECT COUNT(*) as Counter FROM benutzer WHERE Benutzername= :User AND Passwort= :Password";
		$Params = array(':User' => $_POST["Username"], ':Password' => $_POST["Password"]);
		$Result = Connection::Execute($Query, $Params);
		if($Result[0]["Counter"] == 0) echo "Fehler";
		else echo "Login Erfolgreich";
	}else echo "Keine Daten empfangen";

<?php
 /**
 * Created by PhpStorm 9.0.1
 * User: Fabian
 * Date: 21.02.2016
 * Time: 11:47
 * Project: D3 Page
 * Filename: PDO.Class.php
  */
class Connection{
	/**
	 * Protected damit diese Variabele nicht von außen Manipulierbar ist.
	 * Wird später zu einem Instanz-Object was von der Vordefinierten PDO-PHP Klasse kommt.
	 */
	protected static $Database;
	public static function Connect($Host, $User, $Password, $database = null){
		try{
			/**
			 * Wenn die $database übergeben wurde, dann wird beim Herstellen der Verbindung
			 * auch gleich die Datenbank ausgewählt.
			 *
			 * $database = (wenn) ? dann : sonst;
			 */
			$database = ($database) ? ';dbname=' . $database : '';
			/**
			 * Neue Instanz der vordefinierten PDO-PHP-Klasse
			 *
			 * @params
			 *
			 * Parameter werden Ãœbergeben:
			 * Parameter1: Host und Optional der Datenbanknam
			 * Parameter2: Benutzername
			 * Parameter3: Passwort
			 */
			self::$Database = new PDO('mysql:host=' . $Host . $database, $User, $Password);
			/**
			 * Beim erstellen ist nichts Schief gelaufen.
			 * Denn bei einem Fehler hätte die Klasse eine Exception ausgeführt.
			 * Die Verbindung wurde Hergestellt.
			 */
			return;
		}catch (PDOException $e){
			/**
			 * Beim Erstellen einer neien Instanz der Klasse ist ein Fehler aufgetreten.
			 *
			 * Abfragen der Daten aus dem Speicher:
			 *
			 * Error Message: $e->getMessage()
			 * Error Code: $e->getCode()
			 * Error File: $e->getFile()
			 * Error Line: $e->getLine()
			 *
			 *
			 * Wir haben die Fehlermeldung abgefangen mit der (Exception || Catch) Methode und werfen Sie nach "draußen"
			 */
			SystemException::ShowException($e);
		}
	}
	public static function Disconnect(){
		/**
		 * Wir setzen die Datenbank auf NULL wodurch der __destruct() der PHP Klasse ausgeführt wird.
		 */
		self::$Database = null;
	}
	public static function Execute($SQL, $Params = null){
		/**
		 * Parameter:
		 *
		 * $SQL: (String) irgendeine SQL Abfrage! Multiple Queries werden von PDO nicht Unterstützt.
		 * $Params: (Array) enthält die in der SQL-Query verwendeten Platzhalter und deren Werte.
		 * Beispiel: $Params = array("name" => "Fabian", "limit" => 1)
		 *
		 * Hier erstellen wir eine Kopie von $Params. Die Kopie wird später für Fehler genutzt
		 */
		$Params_Copy = $Params;
		/**
		 * Die SQL-Query wird Vorbereitet.
		 */
		$Connection = self::$Database->prepare($SQL);
		/**
		 * Die vordefinierte Query steckt nun als Object in der Variable $Connection.
		 * Für genaueres Siehe: http://php.net/manual/de/pdo,prepare.php
		 *
		 * $Bind_Param: Momentan nur um Platzhalter bei einem Limit nutzen zu können.
		 * Platzhalter: wie z.B. LIMIT : X, :Y müssen Gebunden werden.
		 *
		 * Grund:
		 *
		 * Die SQL-Anweisung LIMIT erwartet einen Integer(Ganzzahl) ohne bindParam() wird aber ein String in die Query (an dessen Platzhalter) eingefügt.
		 * Wir würden also einen Fehler bekommen, da LIMIT "1", "10" nicht valid ist.
		 * Für genaueres Siehe: http://php.net/manual/de/pdostatement.bindparam.php
		 *
		 * $Bind_Param = (wenn) ? Dann : Sonst;
		 */
		$Bind_Param = ($Params !== null and (strpos($SQL, ' LIMIT :') !== false or strpos($SQL, ' limit :') !== false)) ? true : false;
		/**
		 * Wenn der Array §Params übergeben wurde wird er auf True gesetzt
		 */
		if($Bind_Param and is_array($Params)){
			/**
			 * Für jedes in $Params als $Key => &$val
			 * (& bewirkt, das wir $Val als Referenz übernehmen)
			 * Genaueres zum Thema PDO:: Konstanten Siehe: Http://php.net/manual/de/pdo.constants.php
			 */
			foreach($Params as $Key => &$Val){
				if(is_string($Val))
					$Connection->bindParam($Key, $Val, PDO::PARAM_STR);
				elseif(is_bool($Val))
					$Connection->bindParam($Key, $Val, PDO::PARAM_BOOL);
				elseif (is_null($Val))
					$Connection->bindParam($Key, $Val, PDO::PARAM_NULL);
				elseif (is_numeric($Val))
					$Connection->bindParam($Key, $Val, PDO::PARAM_INT);
			}
			/**
			 * $Params wird nicht mehr Gebraucht
			 */
			$Params = null;
		}
		/**
		 * Ausführen der SQL-Anweisung
		 * $Params ist Entwerder ein Array oder NULL.
		 * Ãœbergabe von NULL zu ->execute() kommt keinem mitgegeben Parameter gleich
		 */
		if(!$Connection->execute($Params)){
			/**
			 * Beim Ausführen ist ein Fehler aufgetreten
			 * Der Fehler Steckt in $Connection->errorInfo()
			 * $Connection->errorInfo() gibt ein Array zurück, Siehe: http://php.net/manual/de/pdo.errorinfo.php
			 *
			 * 0 | SQLSTAT error code ( a five characters aplhanumeric identifier defined in the ANSI SQL standard)
			 * 1 | Driver-specific error code.
			 * 2 | Driver-specific error message.
			 *
			 *
			 * Es wird ein String gesetzt, der diesen Array auseinander nimmt.
			 */
			$Error_Info = $Connection->errorInfo();
			$SQL_State = $Error_Info[0];
			$ErrorCode = $Error_Info[1];
			$ErrorMessage = $Error_Info[2];
			/**
			 * Um mit dem Fehler etwas anfangen zu können, Bezeichen wir diese Werte im String
			 */
			$SQL_State = '(SQLSTATE:' . $SQL_State . ')';
			$ErrorCode = '(ErrorCode:' . $ErrorCode . ')';
			$ErrorMessage = '(ErrorMessage:' . $ErrorMessage . ')';
			/**
			 * ErrorCode zusammenfügen
			 */
			$Error = $SQL_State . '|' . $ErrorCode . '|' . $ErrorMessage;
			/**
			 * Um Später auch zu Wissen, bei welcher Query dieser Fehler auftrat, setzen wir-
			 * die $SQL und $ParaCopy hinten dran.
			 *
			 * Überflüssige Leerzeilen in der SQL Entfernen
			 */
			$SQL = preg_replace('/\s+/', ' ', $SQL);
			/**
			 * Aus dem Array $Params_Copy einen String erstellen
			 */
			$Params_String = '';
			if($Params_Copy){
				foreach($Params_Copy as $K => $v){
					$Params_String .=($Params_String === '') ? '' : '; ';
					$Params_String .=((strpos($K, ':') !== False) ? '' : ':') . $K . ' => ' . $v;
				}
			}
			$Error .= 'Query: ' . $SQL . 'Params: ' .$Params_String;
			/**
			 * Jetzt geben wir den Fehler aus.
			 * ACHTUNG! in den Parametern §Params könnten Benutzerdaten wie Passwörter enthalten sein!
			 * Daher sollte der Hier ertellte und Ausgegebene Error-String nicht ausgegeben Werden!
			 */
			SystemException::ShowCustomException($SQL_State, $ErrorCode, $ErrorMessage);
		}
		/**
		 * Beim Ausführen von ->execute() trat kein Fehler auf.
		 * Jetzt holen wir uns alle Datensätze (Zeilen) die wir bekommen können.
		 * Dabei setzen wir $result ersteinmla auf NULL.
		 * Wenn nichts zu holen gab (Wir waren nicht in derh While-Schleife, dann gibt er NULL aus)
		 */
		$result = null;
		while($row = $Connection->fetch(PDO::FETCH_ASSOC)){
			/**
			 * Beim Ersten durchlauf setzen wir $result als Array
			 */
			if($result === null)
				$result = array();
			/**
			 * Sammeln wir die Daten im Array $result
			 */
			$result[] = $row;
		}
		/**
		 * Hier setzen wir $Connection auf null (Nicht unbedingt Notwendig)
		 */
		$Connection = null;
		/**
		 * Fertig; Wir geben §result nun als Array zurück.
		 */
		return $result;
	}
	public static function LasInsertID(){
		/**
		 * Hier stellen wir die Vordefinierte Klasse von PDO zur verfügung.
		 */
		return self::$Database->lastInsertId();
	}
}

Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Try
            nv.Clear()
            nv.Add("Username", benutzer.Text)
            nv.Add("Password", password.Text)
            Dim byteresult() As Byte = wc.UploadValues("http://samp-gaming.de/Response.php?", "POST", nv)
            Dim result As String = System.Text.Encoding.ASCII.GetString(byteresult)
            If result = "Fehler" Then
                MsgBox("Fehler")
            ElseIf result = "Login Erfolgreich" Then




            ElseIf result = "Keine Daten empfangen" Then
                MsgBox("Keine Daten Empfangen")
            End If
        Catch ex As Exception
            MsgBox(ex.ToString())
        End Try
    End Sub

************** Ausnahmetext **************
System.InvalidCastException: Ungültige Konvertierung von der Zeichenfolge  in Typ Double. ---> System.FormatException: Die Eingabezeichenfolge hat das falsche Format.
   bei Microsoft.VisualBasic.CompilerServices.Conversions.ParseDouble(String Value, NumberFormatInfo NumberFormat)
   bei Microsoft.VisualBasic.CompilerServices.Conversions.ToDouble(String Value, NumberFormatInfo NumberFormat)
   --- Ende der internen Ausnahmestapelüberwachung ---
   bei Microsoft.VisualBasic.CompilerServices.Conversions.ToDouble(String Value, NumberFormatInfo NumberFormat)
   bei Microsoft.VisualBasic.CompilerServices.Conversions.ToDouble(String Value)
   bei Deutschland__RegiBus.kundenanzeigen.Timer1_Tick(Object sender, EventArgs e) in C:\Users\Hauptrechner\DRB\vb2\Deutschland  RegiBus\Deutschland  RegiBus\kundenanzeigen.vb:Zeile 22.
   bei System.Windows.Forms.Timer.OnTick(EventArgs e)
   bei System.Windows.Forms.Timer.TimerNativeWindow.WndProc(Message& m)
   bei System.Windows.Forms.NativeWindow.Callback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)

SA-MP 0.3.7
Exception At Address: 0x0040FB80
Base: 0x03E30000


Registers:
EAX: 0x044210B0	EBX: 0x0443B7D0	ECX: 0x00000000	EDX: 0x00000000
ESI: 0x03FA8C68	EDI: 0x0443B7D0	EBP: 0x00000118	ESP: 0x0028FC90
EFLAGS: 0x00210202


Stack:
+0000: 0x004C6DC5   0x00000030   0x0443B7D0   0x0443B7D0
+0010: 0x03FA8C68   0x00000118   0x00001500   0x0028FCF0
+0020: 0x0028FCF0   0x044210B0   0x03FA8C68   0x01676D40
+0030: 0x0028FCF0   0x008A62EC   0x008A62EC   0x03FA8C68
+0040: 0x00001500   0x004C549D   0x01676C78   0x004C52F0
+0050: 0x0028FCF0   0x0443B7D0   0x03FA8C68   0x0028FF78
+0060: 0x0083BC8B   0xFFFFFFFF   0x004C7369   0x0443B7D0
+0070: 0x0443B7D0   0x03FA8C68   0x005373CF   0x0443B7D0
+0080: 0x008E48AC   0x00000118   0x03FA8C68   0x000015E0
+0090: 0x0040C814   0x008E48AC   0x03FA8C68   0x000015E0
+00A0: 0x00000118   0x00000000   0x008E4A60   0x1CD026CB
+00B0: 0x0D970800   0x00012000   0x76971194   0x000001A8
+00C0: 0xFFFFFFFF   0x00000000   0x01810FA0   0x0040E2CA
+00D0: 0x0D970800   0xFFFFFFFF   0x00000000   0x00000008
+00E0: 0x00000000   0x76686C30   0x00000000   0x00000000
+00F0: 0x00000024   0x0040EAC8   0x00000000   0x00000001
+0100: 0x00000000   0x00863B10   0x005BA263   0x00000000
+0110: 0x00863A6C   0x0086A578   0x00000000   0x0053BCAB
+0120: 0x00863B10   0x00863B10   0x00863A90   0x00863B10
+0130: 0x0000000A   0x0053E593   0x00863B10   0x00748D50
+0140: 0x76971245   0x00000000   0x0028FF88   0x7EFDE000
+0150: 0x01670000   0x00000008   0x01674F98   0x00000008
+0160: 0x00000100   0x00000008   0x00000102   0x43C80000
+0170: 0x43960000   0x00000000   0x00000000   0x00000320
+0180: 0x00000258   0x00000000   0x0028FE54   0x00130136
+0190: 0x00000200   0x00000000   0x012C0190   0x0A2B57F4
+01A0: 0x00000190   0x0000012C   0x0000002C   0x0028FE2C
+01B0: 0x00825EE4   0x76971245   0x00000000   0x7EFDE000
+01C0: 0xFFFFFFFF   0x00821D57   0x00000065   0x00000065
+01D0: 0x0028FF88   0x00824731   0x00400000   0x00000000
+01E0: 0x01793270   0x0000000A   0x00000094   0x00000005
+01F0: 0x00000001   0x00000A28   0x00000002   0x76726553
+0200: 0x20656369   0x6B636150   0x00003320   0x00000000
+0210: 0x00000000   0x00000000   0x00000000   0x00000000
+0220: 0x00000000   0x00000000   0x00000000   0x00000000
+0230: 0x00000000   0x00000000   0x00000000   0x00000000
+0240: 0x00000000   0x00000000   0x00000000   0x00000000
+0250: 0x00000000   0x00000000   0x00000000   0x00000000
+0260: 0x00000000   0x00000000   0x00000000   0x00000000
+0270: 0x00000000   0x00000000   0x008245C8   0x00000000


SCM Op: 0x0, lDbg: 0 LastRendObj: 0


Game Version: EU 1.0