ITPub博客

首页 > Linux操作系统 > Linux操作系统 > conn

conn

原创 Linux操作系统 作者:ceo_lxy 时间:2008-12-23 11:34:47 0 删除 编辑

正确连接水晶报表方法:
Dim STRCON As String
        Dim SQLSTR As String
        Dim rs As ADODB.Recordset
        STRCON = "Provider=MSDAORA.1;SERVER=crp;DATA SOURCE=crp;USER ID =apps;PASSWORD=apps"
        SQLSTR = "select DESCRIPTION from apps.fnd_user where user_name='3ITG1307316'"
        rs = Server.CreateObject("ADODB.RecordSet")
        rs.Open(SQLSTR, STRCON, 3, 1)
        Label1.Text = rs.Fields(0).Value
        Dim obj As New ta
        obj.SetDataSource(rs)
        CrystalReportViewer1.ReportSource = obj


---------------------------------
正确连接方法:
 Dim STRCON As String
        Dim SQLSTR As String
        Dim rs As ADODB.Recordset
        STRCON = "Provider=MSDAORA.1;SERVER=crp;DATA SOURCE=crp;USER ID =apps;PASSWORD=apps"
        SQLSTR = "select DESCRIPTION from apps.fnd_user where user_name='3ITG1307316'"
        rs = Server.CreateObject("ADODB.RecordSet")
        rs.Open(SQLSTR, STRCON, 3, 1)
        Label1.Text = rs.Fields(0).Value

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/12122734/viewspace-520904/,如需转载,请注明出处,否则将追究法律责任。

下一篇: 转:ado.net
请登录后发表评论 登录
全部评论

注册时间:2008-06-02

  • 博文量
    519
  • 访问量
    491251