View Full Version : گزارش گیری از طریق کد نویسی
  
مملی2002
چهارشنبه 20 شهریور 1387, 01:42 صبح
چطور  می تونم Data Report و  DataEnvironment  از طریق کد نویسی به بانک اطلاعاتی مرتبط کنم ؟
لفا سریع جواب بدید فوریه
mpmsoft
چهارشنبه 20 شهریور 1387, 10:56 صبح
دوست عزیز خدایی شما یه سرچ زدی تو سایت درباره DataReport
بارها و بارها این تاپیک ها زده شده و جواب هم داده شده
http://barnamenevis.org/forum/search.php?searchid=1046377
مملی2002
چهارشنبه 20 شهریور 1387, 11:34 صبح
خوب سرچ زدم ولی به دردم نخورد
maryamb
چهارشنبه 20 شهریور 1387, 12:11 عصر
به این نگاه کن شاید به دردت بخوره(چند روز پیش برای یکی از دوستان نوشتم)
http://barnamenevis.org/forum/showpost.php?p=589322&postcount=5
مملی2002
چهارشنبه 20 شهریور 1387, 12:13 عصر
من این کد برای DataEnvironment میزارم اما جواب نمیده و Data Report ارور میده 
On Error Resume Next
    Dim Sql As String
    Sql = "Select * From Table1"
   Unload DataEnvironment1
   DataEnvironment1.Connections(1).Close
   DataEnvironment1.Connections(1).ConnectionString = "ProviDataEnvironment1r=Microsoft.Jet.OLEDB.4.0;Per sist Security Info=False;Data Source=" & App.Path & "\FACTOR.MDB"
  DataEnvironment1.Connections(1).Open
  DataEnvironment1.Recordsets("Command1").Close
  DataEnvironment1.Recordsets("Command1").Open Sql
    DataReport1.Show vbModal
mf_engineer
پنج شنبه 21 شهریور 1387, 00:49 صبح
کد:
sqlString = "SELECT * FROM tablename where fieldname='" & شرط & "'"
adoRS.Open sqlString, adoConn
Set DataReport5.DataSource = adoRS
With DataReport5.Sections("Section1").Controls 'section1 mean that section you create in datareport
        
    .Item("text1").DataField = adoRS("fieldname").Name
    .Item("text2").DataField = adoRS("fieldname").Name
    .Item("text3").DataField = adoRS("fieldname").Name
    
  End With
DataReportname.Show
من از همین کد اسفتاده کردم و تونستم که اطلاعات رو تو دیتاریپورت بریزم وچاپ کنم
یاحق
 
vBulletin® v4.2.5, Copyright ©2000-1404, Jelsoft Enterprises Ltd.