hi guys.
could you please help me with this
i have problem setting the RecordSelectionFormula and exporting to pdf.for some reason it doesn't take/set the record selection formula. but if do with the web viewer,instead of pdf it works fine. i am lost please help.
here is the code below.

Dim myreport As New ReportDocument
Dim UserId, Password, ServerName, DatabaseName As String

 Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
  InitializeComponent()
  myreport.Load("C:\Crystal\qwert.rpt")
  UserId = "aaa"
  Password = "bbb"
  ServerName = "ccc"
  DatabaseName = "dddd"
  LogonToDatabase(myreport, UserId, Password, ServerName, DatabaseName)
  myreport.DataDefinition.RecordSelectionFormula = "{CLIENT.USERID} in ['ABC']"
  PrintToPdfWithStream(myreport)

 End Sub


 Public Shared Sub LogonToDatabase(ByVal MyReport As CrystalDecisions.CrystalReports.Engine.ReportDocum ent, ByVal UserId As String, ByVal Password As String, Optional ByVal ServerName As String = "", Optional ByVal DatabaseName As String = "")
     Dim MyTable As CrystalDecisions.CrystalReports.Engine.Table
     Dim MyConnectionInfo As New CrystalDecisions.Shared.ConnectionInfo
     Dim MyLogonInfo As New CrystalDecisions.Shared.TableLogOnInfo
     If ServerName <> "" Then
         MyConnectionInfo.ServerName = ServerName
         MyConnectionInfo.DatabaseName = DatabaseName
     End If
     MyConnectionInfo.UserID = UserId
     MyConnectionInfo.Password = Password
     MyLogonInfo.ConnectionInfo = MyConnectionInfo
     For Each MyTable In MyReport.Database.Tables
         MyTable.ApplyLogOnInfo(MyLogonInfo)
     Next
End Sub


 Public Sub PrintToPdfWithStream(ByVal MyReport As CrystalDecisions.CrystalReports.Engine.ReportDocum ent)
        Dim MyExportOptions As New CrystalDecisions.Shared.ExportOptions
        MyExportOptions.ExportFormatType = CrystalDecisions.[Shared].ExportFormatType.PortableDocFormat
        Dim MyExportRequestContext As New CrystalDecisions.Shared.ExportRequestContext
        MyExportRequestContext.ExportInfo = MyExportOptions
        Dim MyStream As System.IO.Stream
        MyStream = MyReport.FormatEngine.ExportToStream(MyExportReque stContext)
        Response.ClearHeaders()
        Response.ClearContent()
        Response.ContentType = "application/pdf"
        Dim MyBuffer(MyStream.Length) As Byte
        MyStream.Read(MyBuffer, 0, CType(MyStream.Length, Integer))
        Response.BinaryWrite(MyBuffer)
        Response.End()

 End Sub