Beiträge von [aRP]dope

Danke, werde mir das mal durchlesen.
Selber geschrieben. Nicht kopiert ;p

Zitat von He3lixxx

Ich habe ja keine Ahnnung von VB, aber bist Du Dir sicher, dass du mit

wirklich den Inhalt der Textdatei ausliest?

Bin beschäftige mich noch nicht lange mit Visual Basic. Ich kann jetzt schonmal die zweite Form aufrufen, jedoch möchte ich, das sich beim falschen Passwort das nicht öffnet.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim usr As String = TextBox1.Text
        Dim pass As String = TextBox2.Text


        If usr = "" Then
            MsgBox("Bitte wähle einen Benutzernamen!", MsgBoxStyle.Critical, Title:="Error!")
        Else
            If pass = "" Then
                MsgBox("Bitte wähle ein Passwort!", MsgBoxStyle.Critical, Title:="Error!")
            Else
                If My.Computer.FileSystem.DirectoryExists("C:\login\" & usr) = False Then
                    MsgBox("Dieser Benutzername ist nicht in der Datenbank", MsgBoxStyle.Critical, Title:="Error!")
                Else
                    Dim baixar_pass As String = My.Computer.FileSystem.DirectoryExists("C:\login\" & usr & "\pass.txt")
                    If pass = baixar_pass Then
                        'MsgBox("Erfolgreich eingeloggt!")
                        'Me.Close()
                        'Projekt.Show()
                    Else
                        Projekt.Show()
                        MsgBox("Erfolgreich eingeloggt!", MsgBoxStyle.Information, Title:="LOGIN")
                    End If
            End If
        End If
        End If
    End Sub

Hey Community,

ich habe vor ein kleines Programm zu schreiben, jedoch loggt er sich nicht ein.

Der einloggen Button

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim usr As String = TextBox1.Text
        Dim pass As String = TextBox2.Text


        If usr = "" Then
            MsgBox("Bitte wähle einen Benutzernamen!", MsgBoxStyle.Critical, Title:="Error!")
        Else
            If pass = "" Then
                MsgBox("Bitte wähle ein Passwort!", MsgBoxStyle.Critical, Title:="Error!")
            Else
                If My.Computer.FileSystem.DirectoryExists("C:\login\" & usr) = False Then
                    MsgBox("Dieser Benutzername ist nicht in der Datenbank", MsgBoxStyle.Critical, Title:="Error!")
                Else
                    Dim passcorrect As String = My.Computer.FileSystem.DirectoryExists("C:\login\" & usr & "\pass.txt")
                    If pass = passcorrect Then
                        MsgBox("Erfolgreich eingeloggt!")
                        Me.Close()
                        Projekt.Show()
                    End If
                End If
            End If
        End If
    End Sub
End Class

Der registrieren Button

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim usr As String = TextBox1.Text
        Dim pass As String = TextBox2.Text


        If usr = "" Then
            MsgBox("Wähle einen Benutzernamen", MsgBoxStyle.Critical, Title:="ERROR!")
        Else
            If pass = "" Then
                MsgBox("Wähle ein Passwort!", MsgBoxStyle.Critical, Title:="ERROR!")
            Else
                If My.Computer.FileSystem.DirectoryExists("C:\login\" & usr) Then
                    MsgBox("Der Benutzername exestierts bereits!", MsgBoxStyle.Critical, Title:="ERROR!")
                Else
                    If My.Computer.FileSystem.DirectoryExists("C:\login\") = False Then
                        MkDir("C:\login")
                    End If
                    MkDir("C:\login\" & usr)


                    Dim escrever_pass As New System.IO.StreamWriter("C:\login\" & usr & "\pass.txt")
                    escrever_pass.Write(pass)
                    escrever_pass.Close()
                    MsgBox("Dein Account wurde erfolgreich erstellt!", MsgBoxStyle.OkOnly, Title:="Datenbank")
                End If
            End If
        End If
    End Sub

Das registrieren klappt, jedoch nicht das einloggen.

Zitat von Downi

weil ich das Forum nicht benütze.. und Warscheinlich sind alle schon nicht mehr aktiv...
Das Forum hatte vor 2 tagen keine Ordner.. keiner konnte etwas schreiben?
kann auch daran liegen... xD

Ganz ehrlich, verar***en kann ich mich selber.
Wieso sollten sich User in einem Forum registrieren, wenn sie davon nichtmal "Registrieren/Anmelden" verstehen?

Das heißt außerdem nicht benütze sondern benutze.
Das heißt ebenfalls mehr und nicht Meer. Ein Meer ist was mit Wasser, das kann man anfassen und drin schwimmen.

@Blackjack: Woher willste es wissen ob es bei S4Y gehostet ist?

Kann mal der ganzen Projekt Ordner hochgeladen werden?

Zitat von SleY

Da hier ja einige lügen, möchte ich auchmal erzählen, was ich mir eben gekauft habe.

Mein neues Auto.

Sehr witzig. Naja, nur weil sich andere bestimmte Dinge gönnen, sind es direkt lügen?

Zitat von i3easT

Nein, ich meinte das Samsung wirklich Apple Nachmacht! Samsung wurde sogar schon deswegen von Apple angezeigt!

Ich meinte damit [DT]Sniper Bin selber Besitzer mehrere Apple Produkte (iMac, iPhone 3-5, MacBookPro und iPad)

Zitat von [DT]Sniper

@rynN: meinst du jetzt mich????

Ja.

Zitat von lovelins12

Ich hab mir son Mist gekauft:

http://far-cry.ubi.com/fc3blooddragon/de-DE/home/index.aspx

Und, wie ist es?

Und den Samsung Galaxy S3 als Arbeitshandy, falls es mal kaputt geht, ist es nicht so schlimm...

Zitat von [DT]Sniper

Dann ist Apple aber nen Apklatsch von BlackBerry, den die hatten die ersten Internetfähigen Handys..
Das ist mal wieder die Beste Begründung.

Achso, als ob das Samsung nicht zuerst gemacht hat. Dein Beispiel, ist das dümmste was ich je gesehen hab. Klar das jede Firma mithalten will, also entwickelt sie das auch.
Wie bei einem Autohaus. Sagen wir Peugot hatte das erste Autos, heißt das, wenn Porsche auch ein Autohaus nachmacht, das es abklatsch ist? Wobei es 2 verschiedene Marken geschweige denn Produkte sind.

Zitat von XeroX

Samsung alles andere ist rausgeschmissenes Geld Meine Meinung

/sign

Apple...
Alle in der Schule haben ein Samsung, maßlos Probleme. Ich noch nie.

Wenn du dich jetzt doch schlussendlich zum Apple Produkt entschieden hast, Samsung ist der größte kack aller Zeiten.

Heute ein zweites Paket von Planet Sports. Enthalten war folgendes:

• 2x Kalender
• 1x Mütze
• 1x Rotes T-Shirt
• 2x Sticker mit dem Motto "Dog on Board"
• 1x Duftbaum - Geruch: Vanille
• 2x Blaue Schlüsselanhänger
• 6x Sticker von Planet Sports (jeweils Schwarz und Rot)
• 2x Sticker mit einem Surfboard und der Wüste
• 3x Cola Lollipops
• 1x Streichholz

Spoiler anzeigen

   

Dann kam heute noch eins von Paysafecard

• 2x Sticker vom Firmenlogo

Spoiler anzeigen

  

Ist ein russischer MW2 Key?

Ich will die Map | Fuer second-roleplay.net

Zitat von Gredsoft

Oh, dann entschuldige mich.
Es kommt jedoch öfters vor, dass die Anfänger mit "dem benutzer sagen" meinen, dem Programm eine Anweisung zu geben, etwas zu tun.
Somit habe ich ihn missverstanden. <.<

("wie kann ich dem benutzer sagen, dass er dateien von a nach b kopieren soll?" - Traurig, ist aber so..)

Das hast du schon richtig verstanden

Nochmal für He3lixxx...
Das Programm (Visual Basic Express 2010) soll einen bestimmten Befehl ausführen, dieser das jeweilige Programm startet und sich automatisch mit dem Server verbindet.

Zitat von Ditti

Das siehst du vollkommen richtig, doch das exakt gleiche kann jeder Person widerfahren, auch deinen Eltern. Also lieber selbst so lang wie möglich überleben.

Man man man, wie kommt so ein Schwachsinn ins Gehirn? Du kannst nicht einfach so Menschen überfahren. Kapierst du das nicht? Du fährst nicht einfach weiter als währe nichts gewesen? Kommt das bei dir an? DAS GEHT NICHT!
Seidenn du bist Psychisch krank im Kopf ^^.

Zitat von BrainstormFPS

Warum sollte ich denn mit meinen jungen Jahren mich Opfern?
Ich habe das ganze Leben noch vor mir.

Achso. Heißt das, jeder der älter ist, darf überfahren werden? Nach dem Motto "höhö, ich bin aber wichtiger, und jünger."
Gehen wir davon aus, du bist in der Situation, fährst du nicht den Mensch um, vorallem weil du mit deinen 12 Jahren noch kein Auto fahren kannst/darfst.
Demnach wirst du auch anders entscheiden, da Kinder meist noch dumme Entscheidungen treffen.
Ausserdem, durch wen bist du auf der Welt? Der dank dafür ist, das du deine Eltern umbringst.
Mein Kumpel hat einen menschen angefahren.. Bis heute hat dieser noch diese Gedanken, das er einen umfährt.
Sein Leben lang wird ihn ein schlechtes Gewissen verfolgen. Seh der reallität ins Auge!

Zitat von AGIDA

Das bin ich.

Oh man. Jetzt muss ich mir eine Ausrede einfallen lassen

Zitat von Ditti

Ja, tatsächlich auch bei meiner Familie. Im Endeffekt sind wir alle Tiere und wir wollen alle so lang wie möglich überleben.
Wir stellen die Frage etwas um: jemand drückt dir eine Desert Eagle in die Hand und sagt "Du oder deine Mutter". Was tust du? Und ich möchte eine ganz ehrliche Antwort.

Vielleicht sich selber? Wieso sollte man für so nen crap andere Menschen Opfern, vorallem die Familie...

Zitat von BrainstormFPS

Ich halt drauf.

Ich wette, wenn es in der echten Situation nicht so ist. Laber kein Müll, überleg dir vorher was du schreibst.
Du hast auch die menschliche Schutzfunktion.
Das echte Leben, ist nicht wie GTA...

Zitat von iReAcTzz

@ryNN: an welche Firma haste geschrieben? und mit welchem Text?

adjgroup.eu

Mit folgendem Text

Sehr geehrte Damen und Herren,

ich bin großer Fan und interessiere mich sehr für Ihr Unternehmen.
Um ihr Unternehmen optimal zu promoten und sie bekannter zu machen,
währe ich ihnen sehr dankbar, sofern sie mir einige Werbeartikel wie z.B.
T-Shirts(L), Sticker, Poster, Schlüsselanhänger o.ä. zukommen lassen könnten.

Mit freundlichen Grüßen

Max XXXX

Anschrift:

Max XXXXX
XXXXXXXX
XXXXXXXXXX 13
Deutschland