![]() ![]() Private Sub SetDBLogonForReport(ByVal m圜onnectionInfo As ConnectionInfo, ByVal myReportDocument As ReportDocument)ĭim myTables As Tables = ĭim myTable As ĭim myTableLogonInfo As TableLogOnInfo = myTable.LogOnInfo The below code dynamically makes available Database information to my custom report The above code returns exact values like LogonID,pwd,host and port no issues. ![]() VLogonID = GetFromINI(vFileDSNPath, "ODBC", "UID") VLogonID = GetFromINI(vFileDSNPath, "ODBC", "LogonID")ĮlseIf GetFromINI(vFileDSNPath, "ODBC", "UID") "" Then If GetFromINI(vFileDSNPath, "ODBC", "LogonID") "" Then That's why I made some customizations in my VB Code. Now I am using OpenEdge 10.1C, So that File DSN settings (Default) isĪctually I don't want to edit File DSN settings, For my Custom Reports (Version : Crystal Report XI ), i am using ODBC Connectivity (Exactly I am using File DSN, Since I don't want to enter password again and again). ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |