Crystal Report by specific id

------------1st-Step-----------
Put Crystal Report Page in Project
than add your Select Database column without any Filter(like query:select * from abc)
add column as you want
------------2nd-step-----------
Put on Page(.asp) with dropdown,crystal report viewer,with crystal report datasource
------------3rd-step----------
write following code in behind
------------------------------
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim rpt As New CrystalDecisions.CrystalReports.Engine.ReportDocument
Dim path As String = Server.MapPath("~\CrystalRepot\CrystalReportById.rpt")

Dim datatbl As New Data.DataTable
Dim constr As String = "Data Source=dynaserver\webdb;Initial Catalog=SuratShopping;User ID=sa;Password=saadmin"
Dim conn As SqlConnection = New SqlConnection(constr)
Dim adp As SqlDataAdapter
Dim ds As DataSet
conn.Open()
'Dim state As String = DropDownList1.SelectedValue
adp = New SqlDataAdapter("select * from CompanyImages where CompanyId='" & DropDownList1.SelectedValue & "' ", conn)
ds = New DataSet()
adp.Fill(ds, "CompanyImages")

rpt.Load(path)
CrystalReportSource1.DataBind()

CrystalReportViewer1.ReportSource = rpt
rpt.SetDataSource(ds.Tables("CompanyImages"))
End Sub

Create Thumbnail Image By File Uplod

Dim objImage, objThumbnail As System.Drawing.Image
Dim strServerPath, strFileName As String
Dim shtWidth, shtHeight As Short
'get image folder path on server
strServerPath = "C:\Documents and Settings\user2\Desktop\1m.jpg"
'retrive name of file to resize from query string
strFileName = "C:\Documents and Settings\user2\Desktop\1m.jpg"
'retrive file ,or error.gif if not available
Try
objImage = Drawing.Image.FromFile(strFileName)
Catch
objImage = Drawing.Image.FromFile(strServerPath)
End Try
'retrive width
shtWidth = 50
'work out a proportion height from widht
shtHeight = objImage.Height / (objImage.Width / shtWidth)
'Create Thumbnail
objThumbnail = objImage.GetThumbnailImage(shtWidth, shtHeight, Nothing, System.IntPtr.Zero)
'send down to client show image in browser
Response.ContentType = "image/Jpeg"
'objThumbnail.Save(Response.OutputStream, System.Drawing.Imaging.ImageFormat.Jpeg)
objThumbnail.Save("C:\Documents and Settings\user2\Desktop\" + "ddc.jpeg", System.Drawing.Imaging.ImageFormat.Jpeg)
'Tidy up
objImage.Dispose()
objThumbnail.Dispose()