Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > .NET Languages
You last visited: Today at 20:54

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Frage zu vb..../problem mit vb

Discussion on Frage zu vb..../problem mit vb within the .NET Languages forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
Frage zu vb..../problem mit vb

hi leuts,

Als ich habe folgendes problem ich habe etwas in vb geschrieben mit mysq...
also login + regi...

dann ahbe ich es an ein freund geschick bei dem folgends beim regiestrien kommt...


nun meine frage wie mache ich es das er es auch öffnen/benutzen kann?


MFG
Kingzuck
KingZuck is offline  
Old 02/24/2011, 20:12   #2
 
elite*gold: 0
Join Date: Jan 2011
Posts: 144
Received Thanks: 73
Hi,

ich würde sagen dein Freund hat die ODBC Verbindung nicht eingerichtet und oder er hat keinen aktuellen MySql Connector drauf, und verwendet eine ältere Version als du.
Ronox is offline  
Old 02/24/2011, 20:16   #3
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
das heißt jeder der das krigt muss ein mysql connectort drauf haben?
KingZuck is offline  
Old 02/24/2011, 21:16   #4
 
elite*gold: 0
Join Date: Jan 2011
Posts: 144
Received Thanks: 73
Theoretisch ja, praktisch kann es aber auch sein das es reicht wenn man die MySql.Data.dll mitgibt, und basierend auf dieser dann die ODBC Verbindung erstellt.
Ronox is offline  
Old 02/25/2011, 14:49   #5
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
hmm werde ich mal versuchen danke..
/edit geht nicht bzw habe nur die dll reingezogen reicht das?
KingZuck is offline  
Old 02/25/2011, 15:07   #6
 
elite*gold: 0
Join Date: Jan 2011
Posts: 144
Received Thanks: 73
Er muss natürlich noch die ODBC Verbindung einrichten, wenn es nicht klappen sollte musst du halt den MySQL Connector installieren.
Wenn beides nicht funktioniert solltest du vielleicht Quellcode Posten der Zeigt wie du das ganze implementiert hast.
Und hinzu kommt du musst doch wissen was du alles bei dir Eingerichtet hast um die Verbindung bei dir zum laufen zu bringen?
Ronox is offline  
Old 02/25/2011, 16:32   #7
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
also wie richte ich den die ODBC verbindung ein o.O?

hier mal der quellcode von meiner regi:
Code:
Imports MySql.Data.MySqlClient
Public Class Regi
    Dim mysqlconnection As MySqlConnection
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        LoginForm1.Close()
        Me.Close()

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox3.Text.Contains("@") Then

            'Dim mysqlquery1 = "INSERT INTO User (username, passwort, email, geburtsjahr) VALUES ('" & TextBox1.Text & "', '" & TextBox2.Text & "', '" & TextBox3.Text & "', '" & TextBox4.Text & "')" ';"

            Dim connection As MySqlConnection
            connection = New MySqlConnection
            connection.ConnectionString = "server=geheim;" & "user id= 	geheim;" & "password=geheim;" & "database=geheim;"
            Try
                connection.Open()
            Catch Errormeldung As Exception
                MsgBox("Fehler! Irgendetwas stimmt mit der Datenbank nicht: " & Errormeldung.Message.ToString)
            End Try

            Dim Apdapter As New MySqlDataAdapter
            Dim Abfrage As String = "Select * from user Where Benutzername='" + TextBox1.Text + "'" '
            Dim Command As New MySqlCommand
            Command.Connection = connection
            Command.CommandText = Abfrage

            Apdapter.SelectCommand = Command
            Dim Daten As MySqlDataReader
            Daten = Command.ExecuteReader

            If Daten.HasRows = 0 Then
                connection.Close()
                connection.Open()
                Dim registrierer As New MySqlDataAdapter
                Dim passwort As String = MD5Text(TextBox2.Text)
                Command.CommandText = "INSERT INTO user(Benutzername, Passwort, Email)" _
                                    & "VALUES('" & TextBox1.Text & "', '" & passwort & "', '" & TextBox3.Text & "')"
                Command.ExecuteNonQuery()
                MsgBox("Der Account " + TextBox1.Text + " wurde erfolgreich registriert!", MsgBoxStyle.Information)
                connection.Close()
            Else
                MsgBox("Dieser Account existiert bereits!", MsgBoxStyle.Critical)
            End If
        Else
            MsgBox("Ungültige Email-Adresse!", MsgBoxStyle.Critical)
        End If
    End Sub

    Private Sub Regi_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class
KingZuck is offline  
Old 02/25/2011, 16:53   #8
 
elite*gold: 0
Join Date: Jan 2011
Posts: 144
Received Thanks: 73


Da steht es, für soweit ich es gesehen habe alle Systeme.
Ich denke es gibt auch eine Möglichkeit die benötigten Dateien mit im Projekt einzulagern, aber bei dem Punkt kann ich dir leider nicht weiterhelfen, weil ich es selbst noch nie benötigt habe.

Ich würde dir auch Empfehlen den Aufbau der Datenverbindung in einer Funktion auszulagern, solltest aber auch darauf achten das beim Programm schließen diese getrennt wird.

Ein weiterer Tipp für deine E-Mail, Informiere dich mal über Regex, damit kannst du eine Abfrage einbauen die genauer Prüft ob diese E-Mail überhaupt Machbar ist. Jetzt könnte der Benutzer ja auch einfach @ eingeben in deiner TextBox3 und es wäre richtig.
Ronox is offline  
Reply


Similar Threads Similar Threads
[FRAGE/PROBLEM]
12/29/2010 - Metin2 Private Server - 2 Replies
Hallo Com ;) ich hab irgendwie nen Problem und zwar kann ich momentan nicht mir der Rasse Ninja einloggen ich weiß nicht worans liegt jemand ne idee? ich bekomm nachem ladebalken nen kick sprich fenster geht einfach zu würd mich sehr freun wenn eine rweiß worans liegt :D
Problem + Frage
12/20/2010 - Metin2 Private Server - 3 Replies
Hallo, mein Problem: Wenn ich ein gr2 Skill öffne erscheint nichts. Was mache ich falsch? Frage:
[FRAGE]bzw Problem
06/06/2010 - Metin2 Private Server - 8 Replies
Hallo Community Ich bins wieder ich hab ein Problem mit Profizockers seine SF ich kann mich nicht in die OX Map Telen weis einer warum wen ich schreibe /go ox steht dan da You warp to ( 896400,21500 ) Cannot find map command syntax: /goto >mapname< hoffe einer kann mir helfen
[Frage ]easy metin2 frage/problem
05/06/2010 - Metin2 Private Server - 1 Replies
also ich hab easy metin2 gestarted danach kamm der server auswahl wenn ich auf ein server oder irgenwo klicken will hängt es und dann kommt das : http://www.elitepvpers.com/forum/attachments/metin 2-hacks-bots-cheats-exploits-macros/47520d12731726 79t-release-easymetin2-lonely-de-version-released- levelbot-easy.jpg was soll ich jetzt machen
[Frage] Problem Mit Vpc
03/21/2010 - Metin2 Private Server - 5 Replies
Hallo Erstmal Ja Seit Ungefähr 4tagen Kommt dieses Prob http://i44.tinypic.com/r8xflw.jpg Wen Man Dann return eingibt kommt das http://i39.tinypic.com/v4rktf.jpg Es Läuft immer weiter mit der richtigen Uhrzeit da links Wer Mir Hilft Kriegt thx Wäre euch sehr dank bar... Sry Wusste nicht nach was ich sufu suchen sollte ...



All times are GMT +1. The time now is 20:55.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.