vb problem igen

hur ska jag sätta ihop dom här två så att dom funkar korekt. för som det är nu så funkar ingen av dom bra. dom funkar när dom är för sig. men inte så som dom står nu. hoppas att ni förstår och att ni kan hjälpa till.

Private Sub cmdOk_Click()
If Form1.txtLösen = sLösen Then
Form1.txtLösen = sNyttlösen
txtGL = ""
txtNytt = ""
txtBekräfta = ""
Bytlösen.Hide
Else
MsgBox ("Du har matat in fel lösenord")
Bytlösen.Show
txtGL = ""
txtGL.SetFocus
End If

If txtNytt = txtBekräfta Then
Bytlösen.Hide
Else
MsgBox ("Du har bekräftat med fel lösenord")
Bytlösen.Show
txtNytt = ""
txtBekräfta = ""
txtNytt.SetFocus
End If
End Sub

Förmodligen kan du inte ha svenska tecken i variabelnamn. Så är det iaf i de flesta andra programmeringsspråk.

nu har jag lite andra frågor.

först hur gör för att skicka och spara innehållet i 4 olika txtboxar till en txt fil?
där det är
förnamn
efternamn
login
lösenord

hur kopplar jag en listbox till txt'filen så att det står vad loginen är i den.
och sen ska jag helst kunna söka på alla olika inmatningar som finns i txtboxarna. för och efternamn login och lösen alltså.

och så ska jag också kunna ta bort dom kontona som sparas.

tacksam för alla svar.

Orkade inte läsa hela inlägget men för att jobba med filer så kan du använda FileSystemObject som har de metoder du behöver för att fixa med filer.

Ser att du vill ha sökningar etc och spara datat strukturerat så därför är det bättre om du kopplar in en enkel databas gjord i ex. Microsoft Access.

Tycker du skall köra med en databas.

Isåfall använder du ADO-objekten för dataåtkomst och lite härlig SQL.

Kanske ett trappsteg, men helt klart värt mödan att sätta sig in de där bitarna om du inte redan har gjort det.

det har jag inte gjort. grejen är ju den om ni inte har förstått det att jag läser det i skolan. så det är lite tids press. det är inlämning. vilket också bidrar till att jag kanske helst ska jobba i vb6.

Oki, vad står det i uppgiften att du skall göra?

Ett inloggningssytem av något slag?

Om du vill ha textfiler så är det FileSystemObject som är det lättaste att jobba med.

Är det VB 6.0 ni jobbar med?

Hänger inte riktigt med i dina formuleringar...

men genom att öppna textfilerna med programmet och läsa dem rad för rad så kan du söka dig fram till det du vill ha.

Om du vill ta bort något så är det enklaste om du läser upp hela filen i minnet och sedan raderar den. Efter det så skapar du en ny fil och skriver ner den information du vill ha kvar.

Enklaste sättet att strukturera filen är att ha block om fyra rader där raderna är

förnamn1
efternamn1
login1
lösenord1
förnamn2
efternamn2
login2
lösenord2
o.s.v.

Egentligen borde du kryptera lösenorden lite, men det är nog överkurs.

det är vb6 ja
och det är ett program som man kan skapa konton i.
så när jag skriver in förnamn efternamn så får man en inloggning och lösenord. sen så ska man kunna spara uppgifterna i någon fil förr att dom sedan ska laddas automatiskt när programmet körs igång igen. och då ska dom finnas i en listbox eller combobox

tyvär så vet jag inte änns vad FileSystemObject är. antar att det är elementert.

hur skickar jag sedan när det ska sparas i txt filen då?

om txt filen heter konton (vilket den gör)

kontontxt.förnamn1 = txtFörnamn

eller?

och hur gör jag för att nästa som skrivs in i så fall ska sparas till förnamn2 osv.

Nja, tänkte mer att du bara skriver ner grejerna i filen.
D.v.s när du får ett login nummer 2 så fyller du bara på i filen.

Sedan läser du fyra rader åt gången och rad 1 är namn, rad 2 är efternamn .... rad 5 är namn, rad 6 är efternamn.... o.s.v.

Alltså en loop:

Öppna fil
Start Loop
läs 1 rad = förnamn
läs 1 rad = efternamn
läs 1 rad = login
läs 1 rad = lösen
Loopa tills filen är slut.
Stäng fil.

jag löste det att spara till txt filen så här
Dim Förnamn As String
Dim Efternamn As String
Dim login As String
Dim Lösen As String
Open "förnamn.txt" For Output As #1
Förnamn = txtFörnamn
Print #1, Förnamn
Close #1
Open "efternamn.txt" For Output As #2
Efternamn = txtEfternamn
Print #2, Efternamn
Close #2
Open "login.txt" For Output As #3
login = txtLogin
Print #3, login
Close #3
Open "lösen.txt" For Output As #4
Lösen = txtLösen
Print #4, Lösen
Close #4
End Sub

fast då är ju några andra problem. del att det bara går att ha ett konto =).. för den skriver över det gamla.
sen kanske det går att öppna så att allt hamnar i samma. fast hur är det med listboxen. alla kontona ska ju ligga där också. så att det ligger tex. kt, jh, ap, ol, och alla andra konton, så när man klickar på ett av dom så ska informationen , namn och allt det andra dyka upp i txtboxarna.

Oh, snyggt jobbat!
Det där funkar lika bra!

Om du lägger till en loop så kan du ha flera konton.

Fast jag tycker att du skall skriva till en och samma fil hela tiden istället för att ha fyra olika.

Då vet du att rad 1, 5, 10, 15, 20, 25, osv är förnamn.
2, 6, 11, 16, osv är efternamn.
osv.

Sedan kan du skapa 4 arrayer med "Dim", en för förnamn, en för efternamn osv för att lagra det du läst från filen i minnet.
Ta till med 1000 som dimension så klarar du dig ett tag.

Kolla i hjälpfilen efter Dim så ser du.

Då fyller du listboxen, mha en loop med den array du vill, ex.vis Login.
När man då klickar på ex.vis login nummer 3 så fyller du textboxarna med det som står i de andra arrayerna som har index 3.

Lite rörigt förklarat kanske, det är sen klocka nu, men hoppas du hajar.