ربط Vb مع قاعدة Sql بتقرير كريستال

يا إخواني هل السؤال صعب أو غير مفهوم

للأسف كل أما أكتب سؤال في هذا المنتدى و أريد المساعدة فلا مجيب

جزاكم الله خير

إخواني الاعزاء ... ارجو منكم أن تدلوني على طريقة لعمل تقرير داخل VB.net 2005 مع قاعدة بيانات SQL

هتعمل ريبورت وهتكتب فيه جمله sql نفس الجمله الي هنكتبها في الداتا سيت في الكود التالي

 Dim rptDocument As New CrystalDecisions.CrystalReports.Engine.ReportDocument
		Dim cn1 As New SqlConnection("Ur Connection")
		Dim cmd1 As New SqlCommand(sqltext, cn1)
		Dim ad1 As New SqlDataAdapter(cmd1)

		Dim DBs1 As New DataSet
		ad1.Fill(DBs1, Taple)
		rptDocument.Load(rptfile)
		rptDocument.SetDataSource(DBs1.Tables(Taple))
		FormShow.CrystalReportViewer1.ShowRefreshButton = False
		FormShow.CrystalReportViewer1.ShowCloseButton = False
		FormShow.CrystalReportViewer1.ShowGroupTreeButton = False
		FormShow.CrystalReportViewer1.ReportSource = rptDocument
		FormShow.Show()

ولو فيه اي استفسار انا موجود

أشكرك جزيل الشكر على الرد .. و جاري التنفيذ

أشكرك تمت التجربة و لكن تظهر لي رسالة ( لا يتوافق تنسيق سلسلة التهيئة مع المواصفات التي تبدأ عند الفهرس الفهرس 0)

الرجاء وضع مثال مرفق لتكون العملية سهلة التنفيذ