This is a multi-part message in MIME format.



------=_NextPart_000_002E_01C18C28.7BFF6480

Content-Type: text/plain;

	charset="iso-8859-1"

Content-Transfer-Encoding: quoted-printable



Hi everyone

Does anybody know a way to display an access.report object outside of 

the access main application (in a VB application I would like to do so). 

And/or is it possible to use the access.form objects (as the nice 

listbox with recordset property) on a form in a VB-Application.



Thanks in advance



 Roman










_________________________________________________________



Do You Yahoo!?



Get your free @yahoo.com address at http://mail.yahoo.com

As to the first part, there is a thing called "Snapshot Viewer"  

(snapview.ocx) available from Microsoft (look on MSDN site) that you can 

easily install on a machine and view Access reports using the .SendObject 

Access command.



As for the access.form object, I do not believe that is possible.  You 

would be better off using one of VB's native DataBound controls or write 

your own code to bind it (VB6 has more of these than VB5).  It is not 

that difficult and many VB books have sample code.



R 



> Hi everyone

> Does anybody know a way to display an access.report object outside of 

> the access main application (in a VB application I would like to do 

so). 

> And/or is it possible to use the access.form objects (as the nice 

> listbox with recordset property) on a form in a VB-Application.

> 

> Thanks in advance

> 

>  Roman

Hi Randy

Thanks for the info.

I shortly tried to bind a recordset object to a msforms2.0.listbox, but I

suppose I did in a donky way:



  Public Sub LoadRst(rst As DAO.Recordset, Optional IndColumn As Integer 

1)

    Dim tt As Integer

    Dim pp As Integer

    List.Clear

    List.ColumnCount = rst.Fields.Count

    List.BoundColumn = IndColumn

    List.AddItem , 0



    With rst

    For tt = 0 To 9

     List.Column(tt, 0) = .Fields(tt).Name

     .MoveNext

     Next tt



    List.ColumnHeads = True





    .MoveFirst

    pp = 1

    Do

    List.AddItem , pp

    For tt = 0 To 9

     List.Column(tt, pp) = NullCheck(.Fields(tt).Value)

    Next tt

    pp = pp + 1

    .MoveNext

    Loop Until rst.EOF



    End With

  End Sub





It takes terribly long to loop trhough recordset and fields, when there are

over 2000 records, and the column heads don't show anything. But due to lack

of time I didn't hade the opportunity to do the neccessary reading...

So I am still coding in access, there the bound lists are real fast.



With best regards

  Roman



----- Original Message -----

From: "Randy Cornish" <rlcornish@c...>

To: "Access" <access@p...>

Sent: Monday, December 24, 2001 4:06 PM

Subject: [access] Re: How to use access objects in VB 6.0 application





> ---

> Need a present for your favorite programmer?

> E-Documents from Amazon.com at http://p2p.wrox.com/edocs.asp

> ---

> As to the first part, there is a thing called "Snapshot Viewer"

> (snapview.ocx) available from Microsoft (look on MSDN site) that you can

> easily install on a machine and view Access reports using the .SendObject

> Access command.

>

> As for the access.form object, I do not believe that is possible.  You

> would be better off using one of VB's native DataBound controls or write

> your own code to bind it (VB6 has more of these than VB5).  It is not

> that difficult and many VB books have sample code.

>

> R

>

> > Hi everyone

> > Does anybody know a way to display an access.report object outside of 

> > the access main application (in a VB application I would like to do

> so). 

> > And/or is it possible to use the access.form objects (as the nice 

> > listbox with recordset property) on a form in a VB-Application.

> >

> > Thanks in advance

> >

> >  Roman

>










_________________________________________________________



Do You Yahoo!?



Get your free @yahoo.com address at http://mail.yahoo.com