Avatar billede kagge Nybegynder
16. januar 2002 - 16:20 Der er 8 kommentarer og
1 løsning

Tekststreng

Hvordan søger man egentlig i en tekststreng.

Hvis jeg f.eks. har en dato som tekststreng: 16.01.02
liggende i en accessdatabase.

Nu vil jeg f.eks. have fat i den 5. karakter i datoen (1-tallet), for derefter at ligge den over i en variabel, som jeg så kan bruge til at sammenligne med en anden variabel.

Det skal bruges til at udskrive alle poster i databasen, som har et 1. tal som 5. karakter = januar
Avatar billede cool_casper Nybegynder
16. januar 2002 - 16:25 #1
variabel = \"16.01.02\"
variabel2 = Mid(variabel, 5, 1)
Så ligger 5 tallet i variabel2 !
Avatar billede cool_casper Nybegynder
16. januar 2002 - 16:27 #2
Så ligger det 5. tal i vaiabel2 ! Sorry....
Avatar billede kagge Nybegynder
16. januar 2002 - 16:38 #3
Lad os sige der er 400 forskellige poster i tabellen. Nu vil jeg så udskrive alle dem der har et 1-tal på karakter 5, da jeg vil udskrive alle poster fra januar måned f.eks.

Der hvor jeg har sat ? i nedenstående kode (det er her jeg vil have den til at checke værdien for karakter nr. 5)

Hvis du forstår.....

For i = 0 to recordset.Fields.Count -1
  if (recordset.Fields(1).????????.value bla bla...................
  end if
NEXT
Avatar billede cool_casper Nybegynder
16. januar 2002 - 16:49 #4
If variabel2 = \"1\" then
  For i = 0 to recordset.Fields.Count -1

  \'Her skal alle dine data udskrives!

  end if
  NEXT
End If
Avatar billede kagge Nybegynder
16. januar 2002 - 16:51 #5
Fint nok. Tak for hjælpen
Avatar billede cool_casper Nybegynder
16. januar 2002 - 16:52 #6
NP!
Avatar billede tmceu Praktikant
16. januar 2002 - 16:53 #7
Hvorfor ikke i stedet anvende dato funktionerne ?

Eks.

strDato = \"16.01.02\"

If Month(CDate(strDato)) = 1 Then
\' et eller andet
End if
Avatar billede kagge Nybegynder
16. januar 2002 - 16:56 #8
Jamen kan man godt bruge datofunktionerne når man skal ned i en kolonne i en tabel i en database??????

Hvis man kan det, så er det fint
Avatar billede tmceu Praktikant
16. januar 2002 - 17:02 #9
Ja da.

If Month(CDate(RS(\"DatoFelt\"))) = 1 Then
\' et eller andet
End if

Tager i stedet værdien fra RS(\"DatoFelt\")
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