[VB6] Stampare un solo record con un datareport (era: problema con datareport)

[BOYROMA1]

come posso stampare con un datareport un solo record di una tabella e non tutti i record??

mi spiego meglio ho un programma legato con data1 ad un database e un datareport legato alla tabella con l'oggetto command1 il mio problema e' che se mi serve un tabulato di tutti i record va bene ma ora mi serve che mi stampoi solo il record corrente

help please

grazie a tutti

[ladyBlu]

devi filtrare l'ogggetto command1 che è legato al datareport

[BOYROMA1]

scusa la principianza ma come si fa?

[ladyBlu]

DataEnvironment.rsCommand1.Filter = 'filtro



e per cortesia non aprire sempre più discussioni per lo stesso argomento, con un po' di pazienza le risposte arrivano...

[Frankleen]

Puoi filtrare un record dopo aver inserito un DataEnviroment che comprende tabelle e campi e record del database...

Frankleen

[BOYROMA1]

nella tabella ho un campo contatore

metti che sono al terzo record
contatore =3

nel pulsante faccio

datareport1.show


che filtro devo mettere?
prima o dopo la visualizzazione del datareport?

[ladyBlu]

una cosa del genere:

Dim strFiltro As String
strFiltro = "Contatore = 3" 

Sub Pulsante_Click()
    DataEnvironment.rsCommand.Filter = strFiltro
    DataReport1.Show 
End Sub

dovrebbe andare bene

[BOYROMA1]

mi da il seguente errore


gli argomenti utilizzati non sono di tipo valido non sono compresi nell'intervallo consentito o sono in conflitto


???

strfilto non dovrebbe essere integer?

[ladyBlu]

Originariamente inviato da BOYROMA1
gli argomenti utilizzati non sono di tipo valido non sono compresi nell'intervallo consentito o sono in conflitto
???
strfilto non dovrebbe essere integer?

Sub Pulsante_Click()
    Dim strFiltro As String
    strFiltro = "Contatore = 3" 

    DataEnvironment.rsCommand.Filter = strFiltro
    DataReport1.Show 
End Sub

[BOYROMA1]

Private Sub Command4_Click()

Dim strFiltro As String

strFiltro = Data1.Recordset("cont")

DataEnvironment3.rsCommand12.Filter = strFiltro




DataReport14.Show


End Sub

ecco la mia sintassi originale
ho provato anche al posto di Data1.Recordset("cont") a mettere
text58.text che e' la text legata al campo contatore ma nulla