🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: free.it.visual-basic
Article #2155

effettuare una ricerca in un database.

#2155
From: Rocco
Date: Wed, 27 Aug 2003 08:18
19 lines
1803 bytes
aiuto, sto utilizzando l'oggetto data e devo effettuare una ricerca in un
database. come posso fare? sto utilizzando visual basic6
io ho fatto in questo modo ma mi da qst errore

'utente' non � un indice di questa tabella.esaminare l'insieme indexes
dell'oggetto tabledef e determinare i nomi di indici validi

il mio codice:
Dim user As String
user = InputBox$("Immettere il nome da ricercare:", "Ricerca nell'agenda")
If user <> "" Then
'Esegue la ricerca solo se � stato immesso un nome.
Data1.Recordset.Index = "utente"
Data1.Recordset.Seek "=", user
If Data1.Recordset.NoMatch Then
Data1.Recordset.MoveFirst
Data1.Refresh
'Il nome cercato non � stato trovato.
MsgBox "Nome non trovato.", vbInformation, Me.Caption
Technical Details
Message-ID: <vPZ2b.44219$zN5.1399493@news1.tin.it>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-01!sn-xit-08!supernews.com!pd2nf1so.cg.shawcable.net!residential.shaw.ca!in.100proofnews.com!in.100proofnews.com!nntp.infostrada.it!newsfeeder.edisontel.com!news-out.tin.it!news-in.tin.it!news1.tin.it.POSTED!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: ITALIAN,ASCII
X-Google-Thread: f94ee,4f10f3b780b0d066,start
X-Google-Attributes: gidf94ee,public
X-Google-ArrivalTime: 2003-08-27 01:20:12 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-01!sn-xit-08!supernews.com!pd2nf1so.cg.shawcable.net!residential.shaw.ca!in.100proofnews.com!in.100proofnews.com!nntp.infostrada.it!newsfeeder.edisontel.com!news-out.tin.it!news-in.tin.it!news1.tin.it.POSTED!not-for-mail
From: "Rocco" <rokko4ever@hotmail.com>
Newsgroups: free.it.visual-basic
Subject: effettuare una ricerca in un database.
Lines: 22
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.50.4807.1700
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4910.0300
Message-ID: <vPZ2b.44219$zN5.1399493@news1.tin.it>
Date: Wed, 27 Aug 2003 08:18:35 GMT
NNTP-Posting-Host: 213.45.169.130
X-Complaints-To: newsmaster@tin.it
X-Trace: news1.tin.it 1061972315 213.45.169.130 (Wed, 27 Aug 2003 10:18:35 MET DST)
NNTP-Posting-Date: Wed, 27 Aug 2003 10:18:35 MET DST
Organization: TIN