/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Find
Fra : Ole J. Hansen


Dato : 26-10-03 17:30

Hej Alle derude.

Jeg har et spørgsmål jeg håber, at der er nogen der har svaret på,

With Me.Data1.Recordset
strBkMark = .Bookmark
.FindFirst "medlnr=" & varmedlnr
If .NoMatch = True Then
.Bookmark = strBkMark
MsgBox "Kan ikke finde medlnr " & varmedlnr & "", vbCritical,
"Fejl"
End If
End With

Denne søgefunktion virker fint når det er tal, men

With Me.Data1.Recordset
strBkMark = .Bookmark
.FindFirst "fornavn LIKE" & varfornavn
If .NoMatch = True Then
.Bookmark = strBkMark
MsgBox "Kan ikke finde medlnr [" & varfornavn & "]", vbCritical,
"Find Fejl"
End If
End With

denne søgefunktion virker ikke når det er tekst.
Hvad går jeg forkert ?

m.v.h.
Ole J. Hansen


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.530 / Virus Database: 325 - Release Date: 22-10-2003



 
 
Jan Vinten (26-10-2003)
Kommentar
Fra : Jan Vinten


Dato : 26-10-03 20:01

Hej Ole,

Det ser ud til, at du i din SQL sætning ikke får sat dine ' (plinger!) om
din variabel.

..FindFirst "fornavn LIKE '" & varfornavn & "'"

Det ville nok gøre en forskel!

/ Jan


"Ole J. Hansen" <ojhSLET@hansen.mail.dk> wrote in message
news:3f9bf67c$0$69992$edfadb0f@dread12.news.tele.dk...
> Hej Alle derude.
>
> Jeg har et spørgsmål jeg håber, at der er nogen der har svaret på,
>
> With Me.Data1.Recordset
> strBkMark = .Bookmark
> .FindFirst "medlnr=" & varmedlnr
> If .NoMatch = True Then
> .Bookmark = strBkMark
> MsgBox "Kan ikke finde medlnr " & varmedlnr & "", vbCritical,
> "Fejl"
> End If
> End With
>
> Denne søgefunktion virker fint når det er tal, men
>
> With Me.Data1.Recordset
> strBkMark = .Bookmark
> .FindFirst "fornavn LIKE" & varfornavn
> If .NoMatch = True Then
> .Bookmark = strBkMark
> MsgBox "Kan ikke finde medlnr [" & varfornavn & "]",
vbCritical,
> "Find Fejl"
> End If
> End With
>
> denne søgefunktion virker ikke når det er tekst.
> Hvad går jeg forkert ?
>
> m.v.h.
> Ole J. Hansen
>
>
> ---
> Outgoing mail is certified Virus Free.
> Checked by AVG anti-virus system (http://www.grisoft.com).
> Version: 6.0.530 / Virus Database: 325 - Release Date: 22-10-2003
>
>



Ole J. Hansen (26-10-2003)
Kommentar
Fra : Ole J. Hansen


Dato : 26-10-03 20:34

Hej Jan
Jeg har prøvet din model, det virker stadig ikke.
Andre gode forslag ?
m.v.h.
OJH
"Jan Vinten" <REMOVEnewsBIG@LETTERSvinten.orgnetUSE_.NET_ADRESS> skrev i en
meddelelse news:3f9c19ee$0$9832$edfadb0f@dread14.news.tele.dk...
> Hej Ole,
>
> Det ser ud til, at du i din SQL sætning ikke får sat dine ' (plinger!) om
> din variabel.
>
> .FindFirst "fornavn LIKE '" & varfornavn & "'"
>
> Det ville nok gøre en forskel!
>
> / Jan
>
>
> "Ole J. Hansen" <ojhSLET@hansen.mail.dk> wrote in message
> news:3f9bf67c$0$69992$edfadb0f@dread12.news.tele.dk...
> > Hej Alle derude.
> >
> > Jeg har et spørgsmål jeg håber, at der er nogen der har svaret på,
> >
> > With Me.Data1.Recordset
> > strBkMark = .Bookmark
> > .FindFirst "medlnr=" & varmedlnr
> > If .NoMatch = True Then
> > .Bookmark = strBkMark
> > MsgBox "Kan ikke finde medlnr " & varmedlnr & "",
vbCritical,
> > "Fejl"
> > End If
> > End With
> >
> > Denne søgefunktion virker fint når det er tal, men
> >
> > With Me.Data1.Recordset
> > strBkMark = .Bookmark
> > .FindFirst "fornavn LIKE" & varfornavn
> > If .NoMatch = True Then
> > .Bookmark = strBkMark
> > MsgBox "Kan ikke finde medlnr [" & varfornavn & "]",
> vbCritical,
> > "Find Fejl"
> > End If
> > End With
> >
> > denne søgefunktion virker ikke når det er tekst.
> > Hvad går jeg forkert ?
> >
> > m.v.h.
> > Ole J. Hansen
> >
> >
> > ---
> > Outgoing mail is certified Virus Free.
> > Checked by AVG anti-virus system (http://www.grisoft.com).
> > Version: 6.0.530 / Virus Database: 325 - Release Date: 22-10-2003
> >
> >
>
>


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.530 / Virus Database: 325 - Release Date: 22-10-2003



Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408924
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste