Tak for hurtigt svar. Undersøger det såsnart jeg er på serveren. !!
mvh per
Mads Andreasen wrote:
> Hejsa
>
> "Per" <fam.pjlarsen@get2net.dk> wrote in message
> news:3A967E89.F0BACE36@get2net.dk...
> [CUT]
> > Private Sub cmdSearch_Click()
> > namequery = InputBox("Indtast Po nummer", "Name Query")
> > rs.MoveFirst
> > Set rs = db.Recordsets("SELECT item FROM dbo_serienumre WHERE po
> > =namequery")
> > orderno = rs.Fields("po")
>
> det er din SQL streng den er galt med. følgende burde virke: SELECT item, po
> FROM dbo_serienumre WHERE po=" & val(namequery)
>
> Det sidste val er jeg ikke helt sikker på kommer lidt an på datatypen
> (tal/streng) .
>
> > itemno = rs.Fields("Item")
> > End Sub
> >
> > file://*
> >
> > Men jeg får fejlen :
> >
> > 'Run-Time error '3265
> > 'Item not found in this collection
> >
>
> Jeg skulle mene den brokker sig over orderno=rs.Fields("po") men den har du
> ikke valgt at medtage i din SQL streng.
>
> > Hvad mangler jeg i VBkoden ?
> >
> >
> > Hilsen pjl
> >
> >
> >
>
> Jeg håber det løser problemet, ellers skriver du bare igen.
>
> --
> -Mads
> ---------------------------------------
> man@aub.dk
> ICQ: 17528869
> EmbedIT website:
http://www.aub.dk/~man