CrystalReport的SQLQuery问题

Question

在1和2之间少了条: 
CrystalReport1.ReportFileName = App.Path & "\report\" & RptPreCh

Answer 1

to : hoofi(胡飞)　
我原来也有的，只是忘了贴上去，但是不行。请再指教！谢谢！

Answer 2

我有碰到过相同的问题: 我的解决办法是:
   配制一个ODBC.在做报表时,直接用ODBC连接.而不用ADO.即做报表时直接连好数据库.而程序中,只要调用.CrystalReport1.Action = 1.就OK了.
   希望,你能搞定.
  同时.你若能用ADO.搞定.请给经我发E_Mail: [email protected]

Answer 3

topsearch(挥情)：我必须用ADO有没哪位知道啊？到底使用SQLQuery还要不要设什么属性啊？

Answer 4

  strFilter =  ...
  crpt.Formulas(0) = "price=" & prudcost
  crpt.SelectionFormula = strFilter
  crpt.ReportFileName = gRptPath + "\" + "qcpruddetail.rpt"
  crpt.Connect = "odbc; dsn=wip;uid=" & gUsername & " ;pwd=" & gpassword & ""
  crpt.action = 1
我想ADO是搞不定的.不然.我们bet.
对了.你用的CrystalReport是什么version? 

Answer 5

topsearch(挥情)：你输啦，用SelectionFormula在ADO是行的。只是SQLQuery不知道是什么回事！
我用的是8。5的

Answer 6

Private Sub Command1_Click()
 Dim constr As String
 constr = "provider=sqloledb;server=test_sql;initial catalog=wip;uid=j wang;pwd=j"
 crpt1.Connect = constr
 crpt1.SQLQuery = "select * from qcmaterial where category='M'"
 crpt1.ReportFileName = "d:\tmp\a.rpt"
 crpt1.Action = 1
End Sub
这样是可以的.我测过.改变where category='Z' or ='Q' 等出现结果与条件限制相同.
老兄.你的是什么问题? 是不是你的数据库服务器有beg.我用的crystalreport的version 是7.0

Answer 7

kill这条语句OK了. 　zhengcan(XP)　
 crpt1.RetrieveSQLQuery