Newsgroup: it.comp.lang.visual-basic
Titolo: DBGrid DBGrid e ancora DBGrid!!!

Io ci riprovo, può darsi che qualcuno si degnerà di darmi una mano:
Risalve, grazie per l'ultimo consiglio, ma appresso me ne servirebbe un
altro, siccome le dbgrid le ho scoperte solo scrivendo quest'ultima
applicazione mi domandavo, avendo fatto la ricerca e avendo ora il
recordset rstfound (o che dir si voglia), come faccio a metterlo in una
dbgrid pronto da contemplare??? Dovrei prima inserire un controllo data
ma a lui come lo associo il recordset???? Poi un'altra cosa che mi
assilla da tempo, come faccio a prelevare una parte determinata di testo
racchiusa tra due parole da un unico immenso file e metterla in un
textbox o un richtextbox???
Grazie anticipatamente se mi vorrete rispondere preferibilmente in mail
Ciaoooooooooooo!
;D
-- 
 _____________________________________________________________________
 See now the Sinkha power
 MailMe: 
reveng...@pn.itnet.it
 Visit here 
http://www.geocities.com/area51/dimension/9972
 _____________________________________________________________________
|                                                                     |
|               _\\\///_                                              |
|             _/        \_                                            |
|           /  __      __  \           The trust is out there         |
|           | /  \    /  \ |                                          |
|           \ \___\  /___/ /                 TrustNo1                 |
|            \_    ..    _/                                           |
|              \   __   /                     Leo2012                 |
|               \______/                                              |
|        o000o           o000o                                        |
|________°000°___________°000°________________________________________|

Ciao. Intanto se qualcuno ha una risposta è opportuno che lo faccia qui e
non via e-mail, a limite risponde sia al NG sia all'autore.
Per il tuo problema, mi sembra di capire che hai un recordset sul quale hai
fatto un SQL. Per farlo vedere alla DBGrid devi fare lo stesso SQL sul
controllo Data associato alla DBGrid.
Supponi di aver fatto:
Dim Db as Database
Dim Rk as Recordset
Set DB=OpenDataBase(Path)
Set Rk=DB.OpenRecordset("SELECT  * FROM TABELLA WHERE COD=1  ORDER BY
DEX",dbOpenDynaset)
per farlo vedere alla DbGrid devi mettere sul form un controllo data,
associarlo alla DbGrid e nella tua Sub
' Codice da sosituire al precedente.
Data1.DatabaseName=Path
Data1.RecordSource="SELECT  * FROM TABELLA WHERE COD=1  ORDER BY DEX"
Data1.Refresh
Sulla DBGrid vedrai il risultato dell'SQL
----------------------------------------------------------------------------
---
Per il testo racchiuso:
Sub FindTxt()
Dim St as String
Dim Buffer as String
...
...
Parola_iniziale="*INIZIO*"
Parola_finale="*FINE*"
Ok=False
Fine=False
n=Freefile
Open MioFile For input as n
Do Until Eof(n)
   Line Input #n,St
   Pi= InStr(St,Parola_Iniziale)
   Pf= InStr(St,Parola_Finale)
   If Pi>0 Then
      Tx$=Mid$(St,Pi+1,Len(St))
      Ok=True
   ElseIf Pf>0 Then
      Ok=False
      Fine=True
      Tx$=Mid$(St,1,Pf-1)
   Else
      Tx$=St
   Endif
   If Ok Then    Buffer = Buffer & Tx$
   If Fine Then Exit Do
Loop
Close n
  Text1=Buffer       ' o RichText1
End Sub
----------------------------------------------------------------------------
-----
Spero di aver capito quello che volevi fare.......
Ciao. Fabio Guerrazzi