dell816
جمعه 05 بهمن 1386, 19:25 عصر
سلام
من یک view در sql server 2000 دارم که توسط فرمی که در vb6 نوشتم شروطی به این view با کنترل های روی فرم اضافه میکنم. که میخواهم یک گزارش بعنوان مثال تراز کل را بگیرم(شرط من:
where date between '1386/01/01' and '1386/03/01 میباشد) و همچنین اینکه در گزارشم یک group روی کد کل زدم - نمیدانم به چه دلیل وقتی گزارشم از داخل برنامه vb6 اجرا میشود و باز میشود group روی کد کل عمل نمیکند و کدکل را تکرار میکند ولی وقتی خود گزارش را در حالت design باز میکنم همه چیز درست است؟
نمونه سورس کد من :
CrystalR.ReportFileName = App.Path + Trim(PathProgram) + "\main\" + "Report20.rpt
CrystalR.Connect = "DSN =" & STRDataBaseName & ";DSQ= " & STRDataBaseName & ";UID=Sa;PWD=sa"
CrystalR.SQLQuery = "Select * From VuTaraz Where date Between '" + txtFromDate + "' and '" + txtToDate + "' "
CrystalR.Action = 1
من یک view در sql server 2000 دارم که توسط فرمی که در vb6 نوشتم شروطی به این view با کنترل های روی فرم اضافه میکنم. که میخواهم یک گزارش بعنوان مثال تراز کل را بگیرم(شرط من:
where date between '1386/01/01' and '1386/03/01 میباشد) و همچنین اینکه در گزارشم یک group روی کد کل زدم - نمیدانم به چه دلیل وقتی گزارشم از داخل برنامه vb6 اجرا میشود و باز میشود group روی کد کل عمل نمیکند و کدکل را تکرار میکند ولی وقتی خود گزارش را در حالت design باز میکنم همه چیز درست است؟
نمونه سورس کد من :
CrystalR.ReportFileName = App.Path + Trim(PathProgram) + "\main\" + "Report20.rpt
CrystalR.Connect = "DSN =" & STRDataBaseName & ";DSQ= " & STRDataBaseName & ";UID=Sa;PWD=sa"
CrystalR.SQLQuery = "Select * From VuTaraz Where date Between '" + txtFromDate + "' and '" + txtToDate + "' "
CrystalR.Action = 1