Re: ricerca su campo data

Article View: free.it.visual-basic

Article #1852

Back to free.it.visual-basic Previous Next

#1852

From: ricy
Date: Sun, 11 Jan 2004 17:14

22 lines
1958 bytes

Private Sub Command8_Click()
    Dim DataBolla, TmpG, TmpM As Variant
    DataBolla = InputBox("Inserisci la data della bolla da cercare",
"Inserimento ricerca per data di bolla")
    TmpG = Left(DataBolla, 3)
    TmpM = Mid(DataBolla, 4, 3)
    DataBolla = TmpM + TmpG + Right(DataBolla, 2)
    If DataBolla = "" Or DataBolla = Null Then Exit Sub
    Set Data3.Recordset = Data3.Database.OpenRecordset("SELECT * FROM
[tblScarico] WHERE tblScarico.Data = #" & DataBolla & "#")
    Data3.Refresh
End Sub

"Terlizzi Mario" <terlimar@libero.it> ha scritto nel messaggio
news:9ViDb.190793$e6.7200400@twister2.libero.it...
> Premetto che sono un principiante e pure autodidatta.
> Non riesco a fare una ricerca nel database sul campo 'data' n� con
controllo
> data n� con controllo adodc. Devo prima convertire la variabile immessa o
> c'� una sintassi particolare? Insomma come si fa? Grazie a tutti.
>
>

Technical Details

Message-ID: <hwfMb.93441$_P.3535000@news4.tin.it>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news2.google.com!news.maxwell.syr.edu!newsfeed.media.kyoto-u.ac.jp!newsfeed.icl.net!newsfeed.fjserv.net!news.mailgate.org!nntp.infostrada.it!news-out.tin.it!news-in.tin.it!news4.tin.it.POSTED!not-for-mail

References: <9ViDb.190793$e6.7200400@twister2.libero.it>

Show Full Headers

Complete Article Headers

X-Google-Language: ITALIAN,ASCII
X-Google-Thread: f94ee,5e42cff411df1207
X-Google-Attributes: gidf94ee,public
X-Google-ArrivalTime: 2004-01-11 09:14:54 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news2.google.com!news.maxwell.syr.edu!newsfeed.media.kyoto-u.ac.jp!newsfeed.icl.net!newsfeed.fjserv.net!news.mailgate.org!nntp.infostrada.it!news-out.tin.it!news-in.tin.it!news4.tin.it.POSTED!not-for-mail
From: "ricy" <ricy@aruba.it>
Newsgroups: free.it.visual-basic
References: <9ViDb.190793$e6.7200400@twister2.libero.it>
Subject: Re: ricerca su campo data
Lines: 24
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1106
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2800.1106
Message-ID: <hwfMb.93441$_P.3535000@news4.tin.it>
Date: Sun, 11 Jan 2004 17:14:53 GMT
NNTP-Posting-Host: 80.182.105.151
X-Complaints-To: newsmaster@tin.it
X-Trace: news4.tin.it 1073841293 80.182.105.151 (Sun, 11 Jan 2004 18:14:53 MET)
NNTP-Posting-Date: Sun, 11 Jan 2004 18:14:53 MET
Organization: TIN

Reply to Parent Message