Visualizzazione dei risultati da 1 a 10 su 10
  1. #1

    [vb6] Stampare il record corrente

    Salve a tutti,
    ho questo problema:
    Ho una form collegata ad un db access con ado.
    Con il controllo ado scorro tutti i record del db.
    Arrivato ad esempio al 5° record decido di stampare il record corrente.
    Utilizzo questo codice per stampare

    Printer.Print Space(25) & "Risultati della Ricerca : " & vbCrLf & vbCrLf & "NOME: " & Ricerche.nome2.Text & vbCrLf & vbCrLf & "COGNOME: " & Ricerche.cognome2.Text & vbCrLf & vbCrLf & "DATA DI NASCITA: " & Ricerche.data2.Text & vbCrLf & vbCrLf & "TIPO DI SCUOLA: " & Ricerche.scuola2.Text & vbCrLf & vbCrLf & "LAREATO/A: " & Ricerche.laurea2.Text & vbCrLf & vbCrLf & "TIPO LAUREA: " & Ricerche.tipolaurea2.Text & vbCrLf & vbCrLf & "PARTECIPAZIONE PON: " & Ricerche.pontotali2.Text & vbCrLf & vbCrLf & "COMPETENZE ACQUISITE: " & Ricerche.comp2.Text & vbCrLf & vbCrLf & "INCARICHI: " & Ricerche.incaricotot2.Text & vbCrLf;
    Printer.ForeColor = vbRed
    Printer.EndDoc

    Perchè qualunque record visualizzo, cliccando "Stampa" mi stampa sempre il primo record e non nquello che sto visualizzando?
    Grazie 1000

  2. #2
    Utente di HTML.it L'avatar di Boolean
    Registrato dal
    Oct 2005
    Messaggi
    758
    come scorri i records?

    Boolean

  3. #3
    con le freccette dello strumento visuale adodc che ho inserito nel form.

  4. #4
    Utente di HTML.it L'avatar di Boolean
    Registrato dal
    Oct 2005
    Messaggi
    758
    allora probabilmente il problema sta nell'evento click del pulsante che usi per lanciare la stampa...

    prova a mostrare quel codice...

    Boolean

  5. #5
    il codice dl pulsante stampa è quello scritto nel mio primo post.

  6. #6
    Utente di HTML.it L'avatar di Boolean
    Registrato dal
    Oct 2005
    Messaggi
    758
    mi sembra piuttosto strano che sia solo quello il codice...

    ho visto che stampi il contenuto delle TextBox, quindi se li dentro vedi i dati che vuoi stampare, quelli devono uscire sulla stampante...

    sei sicuro di non fare altre operazioni di spostamento sul recordset del controllo ADODC prima di mandare la stampa?

    Boolean

  7. #7
    faccio apparire un form piccolino in cui gli facio scegliere il colore , il tipo di carattere e la grandezza dopodichè cliccano sulla figura della stampante e stampa.

  8. #8
    Utente di HTML.it L'avatar di Boolean
    Registrato dal
    Oct 2005
    Messaggi
    758
    sinceramente non ho idea di cosa andare a pensare...

    tralaltro, non ho la più pallida idea di come stai gestendo il DB e il collegamento con i campi di testo.

    Boolean

  9. #9
    Mi collego al db con una connessione da codice, la solita
    mioado.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & miocommon.FileName & " ;Persist Security Info=False"
    mioado.RecordSource = "select * from Anagrafica order by cognome"
    mioado.Refresh

    per le associazioni dei campi utilizzo il metodo visuale con gli strumenti a destra scrivendo nei campi datafield i corrispondenti nomi dei campi associati.

  10. #10
    Utente di HTML.it L'avatar di Boolean
    Registrato dal
    Oct 2005
    Messaggi
    758
    ok... e questo va bene....

    ti continuo a dire, però, che tu stampi il contenuto dei TextBox, per cui se subito prima di cliccare stampa, nei TextBox VEDI i dati che ti interessa stampare, allora sulla stampa devono uscire quelli!

    il fatto che non viene stampato quello che ti aspetti, *quasi sicuramente* dipende da uno spostamento nel recordset, o da un Refresh dell'ADODC, che è probabile che tu faccia anche inavvertitamente, se non mostri il codice *esatto* delle routine (di evento e non) che vengono chiamate da quando premi Stampa in poi, è assolutamente inutile che si stia qui a fare supposizioni...

    Boolean

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.