Visual Basic

hello dear all the best programmer,

this is my first posting or maybe a question but hopely although i am the beginner and newbie in vb .net you would like to help for solving my problem.

i get some problem when i was making a report application with crystal report in vb.net using sql server database. i make simple application that consist one button "show report" and one crystal report viwer. i put code to the button "show report" :
<pre lang="vb">Imports CrystalDecisions.CrystalReports.Engine

Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim cryRpt As New ReportDocument
        cryRpt.Load(&quot;Data Source=(localdb)\Projects;Initial Catalog=crystaldb;Integrated Security=True&quot;)
        CrystalReportViewer1.ReportSource = cryRpt
        CrystalReportViewer1.Refresh()

    End Sub

End Class</pre>



and when i run the program, actually there is no problem but why i must first ly to do an action login. the action login consist of some field , they are server name, databse , id and pasword. the server name was automatically filled and the database field was empty and but i can't fill in it. and for id and password that were empty to and i must and able to fill that.

for the id and pasword field, i don't know what thing i must to fill in that field. hopely anybody can understand my question and problem clearly and as soon as possible would like to help me.


thanks and best regards,


toni firnandes.

line 1	public ndlist as list (of data)		
line 2	public dylist as list (of days)		
line 3	'------------------------		
line 4			
line 5	public sub main_routine()		
line 6			
line 7	ndlist = new list (of data)		
line 8	dylist = new list (of days)		
line 9			
line 10	for a = 1 to something		
line 11		do	
line 12			
line 13			ndlist.add(new data("blahblah"))
line 14			' do something to ndlist
line 15			
line 16		loop until something	
line 17			
line 18		dylist.add(new days(a,b,ndlist))	
line 19		ndlist.clear	
line 20			
line 21	next a		
line 22			
line 23	for each dy as days in dylist		
line 24		' do something else	
line 25	next		
line 26			
line 27	end sub		
line 28			
line 29			
line 30	'---------------		
line 31	'For reference		
line 32			
line 33	public class days		
line 34			
line 35		public day_data as list(of data)	
line 36			
line 37		public sub new(byval a as integer, byval b as integer,byval ddata as list(of data))	
line 38			
line 39		day_data = ddata	
line 40			
line 41		end sub	
line 42			
line 43	end class		
line 44			
line 45	public class data		
line 46			
line 47		public rwdata(1500)	
line 48		public id as string	
line 49			
line 50		public sub new(byval str as string)	
line 51			
line 52		id = str	
line 53			
line 54		end sub	
line 55			
line 56	end class

Private Sub MonthCalendarPO_DateSelected(sender As Object, e As DateRangeEventArgs) Handles MonthCalendarPO.DateSelected
    JobPOdateTextBox.Text = e.Start.ToShortDateString

    MonthCalendarPO.Visible = False
End Sub

Private Sub PictureBoxPO_Click(sender As Object, e As EventArgs) Handles PictureBoxPO.Click
    If MonthCalendarPO.Visible = False Then
        MonthCalendarPO.Visible = True
    Else
        MonthCalendarPO.Visible = False
    End If
End Sub