خطای timeoutدر هنگام اتصال crystalreport به یک viewدر sqlserver

[gheibi57]

باسلام
مشکلی در برنامه من پیدا شده و اون اینه که هنگام اتصال کریستال ریپورت به sqlserverپیغام timeout میده
ضمنا در command تایم اوت رو هم تنظیم کردم نتیجه ای نداده نمونه کدم به این شکله
Dim crystalreport1 AsNew CrystalReport1
Dim da As SqlDataAdapter
Dim con As SqlConnection
Dim dataset1 AsNew DataSet1
Dim str AsString
Try
con = New SqlConnection("server=gheibi;uid=sa;pwd=123;database=Northwind")
con.Open()
str = "select * from emp_ord_cus where shipcountry='" & ComboBox1.Text & "'"

da = New SqlDataAdapter(str, con)
da.Fill(dataset1.Tables("emp_ord_cus"))
crystalreport1.SetDataSource(dataset1)
Dim form2 AsNew Form2

form2.CrystalReportViewer1.ReportSource = crystalreport1
form2.Show()
Catch ex As Exception


MsgBox(ex.ToString)
EndTry