Avatar billede birgit68 Nybegynder
28. august 2003 - 12:29 Der er 5 kommentarer

recordset i textfelter

hejsa
jeg har lavet et lille program med en søgning der lister navne op i en listbox . nu kunne jeg så godt tænke mig at når jeg trykkede på et af disse navne resten af recordsettet endte i nogle textfelter jeg har lavet .kkan jeg det uden at skulle bruge sql koder ??
Håber på hurtig hjælp
Avatar billede martin_moth Mester
28. august 2003 - 12:33 #1
Du kan bruge _Click eventen sammen med det index der er registreret, der er klikket på. Og så kan du så fylde det du vil i textboxe - jeg forstår ikke helt hvad du mener med " resten af recordsettet endte i nogle textfelter jeg har lavet"
Avatar billede birgit68 Nybegynder
28. august 2003 - 13:09 #2
jeg mener at når jeg får resultatet af min søgning i listboksen der får jeg jo kun et felt af hele recordsettet når jeg så klikker på det navn jeg vælger skal alle informationerne sættes i tekstfeltet som jeg har lavet og bruger til at oprette og slette
Avatar billede martin_moth Mester
28. august 2003 - 14:33 #3
Du kan gå gennem dit recordsæt med MoveNext og MovePrevious. Så kan du nappe det du vil og sætte det ind i den textbox du vil...

Prøv at tænk på, at vi intet ved om dit program - så når du siger "all informationerne", "resultatet af min søgning" osv, er det ikke ret let at forstå. Resultaterne af hvilken søgning, f.eks.?

Et uddrag af din kode, og et mere struktureret/præcist spørgsmål vil hjælpe mig og andre med at hjælpe dig :o)
Avatar billede birgit68 Nybegynder
28. august 2003 - 19:43 #4
Private Sub Command3_Click()

End Sub
Dim sogefelt As String
sogefelt = InputBox("TAST Brancekode")
Data1.Recordset.MoveFirst
  list1.Clear
  Do While Data1.Recordset.EOF = False
  If Data1.Recordset("Branche kode") = sogefelt Then
  list1.AddItem Data1.Recordset("kontaktperson")
  Exit Sub
  End If
  Data1.Recordset.MoveNext
  Loop
  If list1.ListCount = 0 Then
    MsgBox "der er ikke nogen branche med den kode"
  End If
  End Sub
det er så der at jeg fylder noget i listfeltet og det virker jo meget godt
men har er det så sket jeg kan ikke få den til at vælge noget

der er i min db en masse informationer om firmaer bla.firmanavn og tlf .
da det ville praktisk hvis jeg kunne vælge et navn fra lisen klikke på det og få alle felterne vist (i det recordset)
hvis du har tid og lyst vil jeg gerne maile det til dig ......det skal jeg selvfølgelig nok give ekstra Points for ?
Avatar billede martin_moth Mester
28. august 2003 - 23:25 #5
Ikke for noget, men den kode du har vist virker vel ikke? Du mangler at definere din Sub - du har en End Sub, men ingen start...

Desuden vil du vist aldrig få mere end EN kontaktperson i din List1.

Og desuden har du en Command3, der ikke bliver brugt til noget

Men når du så klikker på den kontaktperson, kan du jo bare læse de tilhørende data ind, på samme måde som du henter kontaktpersonen

fx. Text1.Text = Data1.Recordset("telefonnr")

Den kode smider du i din _Click event for List1...
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester