有水晶问题请教各位高手，请赐教！

Question

CrystalReports1.Connect = "dsn=dytd;uid=dytd;pwd=dytd"请问后面的dsn、uid、pwd到底指代什么！

Answer 1

crystalreports有connect这个属性？

Answer 2

Private Sub cmdprint_Click()
Dim sql As String
sql = "select * from authors where au_lname ='White '"
printReport CrystalReport1, sqlEnd SubPublic Sub printReport(Rpt As CrystalReport, ByVal sql As String)Dim ReportFileName, ReportName As StringRpt.WindowState = crptMaximizedReportFileName = App.Path & "\glfjsyd\jsyd_fyqk_jsydzbgftjb_yi.rpt"Rpt.Connect = "dsn=dytd;uid=dytd;pwd=dytd"Rpt.ReportFileName = ReportFileName + ReportNameRpt.SQLQuery = sqlRpt.Action = 2End Sub
为什么不能实现报表打印！（只想打印出所需要的SQL中行），我个人认为Rpt.Connect = "dsn=dytd;uid=dytd;pwd=dytd"有错误！我对这行程序不了解
望大侠指教！

Answer 3

dsn:ODBC数据源名称
UID:USER ID
PWD:PASSWORD
如果是SQL数据库，就是登录数据库的用户名和密码

Answer 4

我试了一下，程序应该没有问题。当然我更改了你的数据库连接。
建议你用ado date contrl先生成一个连接字符串
如Rpt.Connect = "DSN=ORCL;UID=ccc;PWD=111;SERVER=ORCL;"

Answer 5

先在VB中加入ADO，用ADODC控件取得ConnectionString，把这个string给Rpt.Connect应该就没问题了