Imports System.Data Imports System.Io Imports System.Data.OleDb Imports CrystalDecisions.Shared Imports CrystalDecisions.CrystalReports.Engine Imports CrystalDecisions.CrystalReports.Engine.ReportDocument Imports CrystalDecisions.Web Partial Class Test_rpt Inherits System.Web.UI.Page Dim cn As New ConnectionInfo Dim con As New OleDbConnection Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\wwwroot\Website1\App_Data\Database_Name.mdb;Persist Security Info=True" Call showreport() End Sub Sub showreport() With cn .DatabaseName ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\wwwroot\Website1\App_Data\Database_Name.mdb;Persist Security Info=True" or .DatabaseName ="Database_Name.mdb" End With Dim rpt As New ReportDocument rpt.Load(Server.MapPath("report_name.rpt")) Dim ParamFields As ParameterFields = Me.CrystalReportViewer1.ParameterFieldInfo() Dim ParamField As New ParameterField Dim ParamField_Value As New ParameterDiscreteValue ParamField.Name = "prj" ParamField_Value.Value = Session("prjnm") ParamField.CurrentValues.Add(ParamField_Value) rpt.ParameterFields("prj").CurrentValues.Add(ParamField_Value) ParamFields.Add(ParamField) ParamField = New ParameterField ParamField_Value = New ParameterDiscreteValue ParamField.Name = "dt" ParamField_Value.Value = Session("dt") ParamField.CurrentValues.Add(ParamField_Value) rpt.ParameterFields("dt").CurrentValues.Add(ParamField_Value) ParamFields.Add(ParamField) ParamField = New ParameterField ParamField_Value = New ParameterDiscreteValue ParamField.Name = "sno" ParamField_Value.Value = Session("maxsrno") ParamField.CurrentValues.Add(ParamField_Value) rpt.ParameterFields("sno").CurrentValues.Add(ParamField_Value) ParamFields.Add(ParamField) Me.CrystalReportViewer1.ParameterFieldInfo = ParamFields Me.CrystalReportViewer1.HasRefreshButton = False Me.CrystalReportViewer1.HasPageNavigationButtons = False Me.CrystalReportViewer1.HasGotoPageButton = False Me.CrystalReportViewer1.HasToggleGroupTreeButton = False For Each cnInfo As TableLogOnInfo In Me.CrystalReportViewer1.Log

first check txt1 means the textbox having Date Value. if txt1.text="" then in query pass null keyword for that Date Field. i.e. here abc is the table with 2 columns frmdt(Date)& name(Text) insert into abc values(null,'"& txt2.text &"')

put your date textbox in UpdatePanel(Ajax Control) and button outside the UpdatePanel bcoz it will not work inside UpdatePanel. UpdatePanel will stop refreshing u r page.

put the dropdown control in UpdatePanel of Ajax so it will not refresh u r page.But dont keep any button inside UpdatePanel it will not work

u can take another listbox and bind it with previous listbox's datavaluefield. but u cant display both DataTextField & DataValueField in same ListBox

copy and paste u r .pdf file in u r wesite folder and write on button_click event server.transfer("test.pdf") and if u have pasted u r document in a folder then server.transfer("folder_name\test.pdf")It will take the Path automatically upto your main website folder i.e. "C:\Inetpub\wwwroot\Website1\" (can open any kind of documents e.g.*.doc,*.csv,*.pdf,*.txt,*.xls,*.mdb,*.ppt,*.pps etc) it will directly open your file.

modified on Friday, April 11, 2008 7:59 AM

Please check in IIS that u r Website is Stopped or Start. If u r having Oracle installed on u r machine then it will not start u r website so for that u have to manually stop all oracle services.and then go to IIS and right click on your virtual directory i.e your website and start, and if oracle is not installed then go to IIS and right click on your virtual directory i.e your website and start.