Here is some code I used in one of my projects and it worked quite fine. Hope it helps... Private Sub setDGProperties() dgDetails.TableStyles.Clear() Dim dgts As New DataGridTableStyle dgts.MappingName = "TransDetails" dgts.AlternatingBackColor = Color.LightGray Dim prod As New DataGridTextBoxColumn prod.MappingName = "ProductID" prod.HeaderText = "ProductID" dgts.GridColumnStyles.Add(prod) Dim cname As New DataGridTextBoxColumn cname.MappingName = "ProductName" cname.HeaderText = "Product Name" cname.Width = 120 dgts.GridColumnStyles.Add(cname) Dim quan As New DataGridTextBoxColumn quan.MappingName = "Quantity" quan.HeaderText = "Quantity" dgts.GridColumnStyles.Add(quan) Dim price As New DataGridTextBoxColumn price.MappingName = "TPrice" price.HeaderText = "Price" price.Format = "C" dgts.GridColumnStyles.Add(price) dgDetails.TableStyles.Add(dgts) End Sub

<% Set cn = server.createobject("adodb.connection") Set rs = Server.CreateObject("ADODB.RecordSet") cn.open "Provider=Microsoft.Jet.4.0;Data Source= c:\inetpub\wwwroot\myprog\vbquiz.mdb" set rs = cn.execute("select * from quiz") rs.movefirst do while not rs.eof Response.write rs("quizid") rs.movenext loop %> good luck

OK, here's what I did in VB6 w/ Cr8.5: Set crystalApplication = New CRAXDDRT.Application Set crystalReport = crystalApplication.OpenReport(strReportFile, 1) With crystalReport .ExportOptions.DiskFileName = strExportFile .ExportOptions.DestinationType = crEDTDiskFile .ExportOptions.FormatType = crEFTWordForWindows ' crEFTPortableDocFormat .ExportOptions.WORDWExportAllPages = True .DisplayProgressDialog = False .ParameterFields(1).AddCurrentValue strGroupName ' .RecordSelectionFormula = strSelection .Export False End With Set crystalReport = Nothing Set crystalApplication = Nothing FYI, to the best of my knowledge, this requires CR 8.5 developer edition. What a piece of work is man, how noble in reason, how infinite in faculties, in form and moving how express and admirable . . . and yet to me, what is this quintessence of dust? -- Hamlet, Act II, Scene ii.