Printing Tables from visual basic please important for school

[desertsolider]

Is there any code to print all the records in table from visual basic and with out using any wizards please its very important for my project
thanks

[hariharanmca]

Is there any code to print all the records in table from visual basic and with out using any wizards please its very important for my project
thanks

Could you be more specific?

[desertsolider]

Could you be more specific?

Ok i have an access database which contains tables lets say contains:
security table & Customers table .....
and i want to print the security table all the fields in it ,
thats the best i can explain and thx for replying

[Killer42]

Ok i have an access database which contains tables lets say contains:
security table & Customers table .....
and i want to print the security table all the fields in it ,
thats the best i can explain and thx for replying

Do you have any code to read the table? Just read through the table and for each of the records, use the Printer object to print all the fields you're interested in.

I'm assuming you're using VB6. Please let us know whether this is correct.

[desertsolider]

Do you have any code to read the table? Just read through the table and for each of the records, use the Printer object to print all the fields you're interested in.

I'm assuming you're using VB6. Please let us know whether this is correct.

oh sorry yes iam using vb6 and my skill isnt this high . and i dun kno what u meant but is this going to print all the table ?
thanks

[sukeshchand]

Try this code you should connect the printer on lpt1 to get the printout

Dim rs As New ADODB.Recordset
Open "Lpt1:" For Output As #1
rs.Open "Select * from Table1", conn, adOpenForwardOnly, adLockReadOnly
Do While Not rs.EOF
    For i = 0 To rs.Fields.Count - 1
        Print #1, rs.Fields(i).Value & ""
    Next i
    rs.MoveNext
Loop
rs.Close
Close #1

[Killer42]

Try this code you should connect the printer on lpt1 to get the printout...

Thanks for the sample. However, it would be a better idea generally to use the Printer object rather than writing directly to LPT1.

[sukeshchand]

Tell me how to use printer object

is it like this

for ----- 
Printer.Print rs.fields(i)
next ---
and finally 
printer.EndDoc

[Killer42]

...is it like this

for ----- 
  Printer.Print rs.fields(i)
next ---
and finally 
printer.EndDoc

Yes. But the Print statement, and other features of the Printer object, also allow you to do much more. You can position things and format things in all sorts of ways.

For example, a slight enhancement to your code...

for ----- 
  Printer.Print rs.fields(i).Name; " : "; rs.fields(i).Value
next ---

I'd recommend that you read up on the Printer object in the documentation, for more info.

[desertsolider]

sorry i couldnt connect to the internet i got a proplem...... Thanks for the codes i will try and thankss again