Verbinden mit der Datenbank
lima-city → Forum → Programmiersprachen → Programmieren mit .NET & Mono
austausch
benutzer
byte
code
datenbank
falsche daten
http
import
login
meldung
modul
programm
re
registrierung
server
string
system
text
url
verbindung
-
würde es gehen mit visual basic 2008 ein ref="/login" title="Login">login zu erstellen um damit auf die MySQL zuzugreiffen?
geht das hier? -
Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!
lima-city: Gratis werbefreier Webspace für deine eigene Homepage
-
Ja, Lima-City lässt es zu die DB's auch von lokalen Rechnern darauf zu zu greifen.
-
Hättest du dafür vielleicht noch den Code?
-
Ich sag nur eins *klick mich*...
Sry, aber passte grade gut.
Wie wär's den hiermit? *klick mich auch* -
Hier sollte alles wesentloche enthalten sein.
Beitrag zuletzt geändert: 27.2.2012 21:07:15 von harrybotter -
Ich habe zwar selber eine Source bloß bei der kommt immer eine Meldung "Keine Verbindung zur Datenbank...." obwohl die Daten richtig sind.
Man kann sogar bei den Datenbankinformationen falsche Daten angeben trotzdem kommt diese Meldung.
Imports System.Security.Cryptography Imports System.Text Imports MySql.Data.MySqlClient
Module md5 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 Module
Dim conn As MySqlConnection conn = New MySqlConnection conn.ConnectionString = "server=..." & "user id=...;" & "password=...;" & "database=..." Try Catch myerror As MySqlException MsgBox("Keine Verbindung zur Datenbank : " & myerror.Message.ToString) End Try Dim benutzer As String = MD5StringHash(txt_benutzer.Text) Dim passwort As String = MD5StringHash(txt_passwort.Text) Dim myAdapter As New MySqlDataAdapter Dim SQLAbfrage As String = "SELECT * FROM login WHERE Benutzername='" + Replace(benutzer, " ", "") + "' AND Passwort='" & Replace(passwort, " ", "") & "'" Dim myCommand As New MySqlCommand myCommand.Connection = conn myCommand.CommandText = SQLAbfrage myAdapter.SelectCommand = myCommand Dim myData As MySqlDataReader myData = myCommand.ExecuteReader() If myData.HasRows Then MsgBox("Einloggen erfolgreich !") conn.Close() conn.Open() Else MsgBox("Fehler Code 2 : Falsche Daten") End If -
Dann hast du dies:
Rokky schrieb: Und nicht vergessen ihr müsst Mysql für .NET installiert haben und
überlesen.
Imports MySql.Data.MySqlClient
importieren
Beitrag zuletzt geändert: 27.2.2012 21:13:01 von harrybotter -
nimm einfach nen Webbrowser, dann lädst du dort ne PHP datei auf den server den du brauchst und kannst alles abfragen über php
und musst denn nur noch den webbrowser auslesen -
Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!
lima-city: Gratis werbefreier Webspace für deine eigene Homepage
