مشكله في التقارير

بســم الله الـرحمــن الرحيــم

السلام عليكم ورحمة الله وبركاته

انا استخدم الكود التالي لطباعة التقارير

Dim TB As CrystalDecisions.crystalReports.Engine.Table
Dim TL As CrystalDecisions.Shared.Tables
For Each TB In RPT.DataBase>Tables
TL=TB.LogInfo
With TL.ConnectionInfo
.serrverName=ServerName
.DataBaseName="DBName"
.UserID="UID"
.Password="PWD"
RPT>RecordSelectionFormula=SQLStatment

المشكله اني استخدم قاعدة بيانات مشفره واريد طريقه لفك التشفير اثناء طباعة التقارير