hi friends, i have a datagrid in my project and i m using a datatable to fill the datagrid.the default preferredcolumnwidht property is set to 200. but i want to use datagridtable style and disply the columns with different widhts but all efforts til now went in vain...... the code i used is pasted below.......... plz help me. the code for style whihc i used is commented..... hoping for quick solutions..... Dim lDataTable As New DataTable("ItemList") mintRecCount = Datasource.Length lDataTable.Columns.Add("Code", System.Type.GetType("System.String")) lDataTable.Columns.Add("Description", System.Type.GetType("System.String")) lDataTable.Columns.Add("UOM", System.Type.GetType("System.String")) lDataTable.Columns.Add("Quantity", System.Type.GetType("System.Int32")) 'lDataTable.Columns.Add("AltQty", System.Type.GetType("System.Int32")) lDataTable.Columns.Add("Weight", System.Type.GetType("System.Single")) lDataTable.Columns.Add("Price", System.Type.GetType("System.Single")) For mRowIndex = 0 To mintRecCount - 1 lDataRow = lDataTable.NewRow() 'code for entering data into the datarow lDataTable.Rows.Add(lDataRow) Next mRowIndex lDataTable.Columns(0).ReadOnly = True lDataTable.Columns(1).ReadOnly = True lDataTable.Columns(2).ReadOnly = True lDataTable.Columns(4).ReadOnly = True 'Dim ts As New DataGridTableStyle 'ts.MappingName = "ItemList" 'Dim cs As DataGridTextBoxColumn 'cs = New DataGridTextBoxColumn 'cs.MappingName = "Code" 'cs.HeaderText = "Code" 'cs.Width = 64 'ts.GridColumnStyles.Add(cs) 'similiar code for other columns 'dgOrdInvAddItem.TableStyles.Add(ts) dgOrdInvAddItem.DataSource = lDataTable

hello all, i m connecting a crystal report 8.5 thru my vb6 application and i m trying to disaply only specific records in the crystal reports. i m pasing querry in the crystal report thru my VB applcation. all is going well but getting one error at the statement cr.viewreport server has not yet bee opened Private Sub Form_Load() Dim conn As ADODB.Connection Dim rs As ADODB.Recordset Dim crystal As CRAXDRT.Application Dim report As CRAXDRT.report CR.DisplayBorder = False CR.DisplayTabs = False CR.EnableDrillDown = False CR.EnableRefreshButton = False Set conn = New ADODB.Connection conn.ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Raj;Data Source=." conn.Open Set rs = New ADODB.Recordset rs.Open "SELECT* From user_file where user_id='Raj'Order By user_id ASC", conn, adOpenStatic, adLockReadOnly Set crystal = New CRAXDRT.Application Set report = crystal.OpenReport(App.Path & "\myrep.rpt") report.DiscardSavedData report.Database.SetDataSource rs CR.ReportSource = report 'here at this statement i m having problem getting erro msg :server has not yet been opened CR.ViewReport CR.Zoom 94 rs.Close Set rs = Nothing conn.Close Set conn = Nothing Set crystal = Nothing Set report = Nothing End Sub sending the code for ur refrence. please help me if anybd can thanks

hello friends, i m fairly new to ASP. i installed PWS thur windows 98 cd on windows 98 OS. now i m tyring this code <% set cn=server.createobject("adodb.connection") cn.open "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 %> but nothing is displayed. my PWS is on. but while i installed PWS thr was one error MTS not installed properly. is the problem related to MTS or m i wrong somewhr. please do help me. i ma beginner.

i m fairly new to crystal reports.can anybody plz tell me how to use crystal reports in VB and how to pass parameters in the report at run time preeti