Question from prakash22raja on Apr 30 at 2:50 AM Hello All,
I have some code to connect SAP BW server from VBA code in BEx. It is working perfectly in laptops installed with Window OS in English language.For other languages it is not working. Example Japanese language windows laptops not working. Please suggest if you have any solution for this.
Below is my sample code. it is failing at If FM.Connection.logon(1, True) <> True Then
step.
Dim FM As Object
Dim objCon As Object
Dim strUserName As String
Dim strappserver As String
Dim rowcount As Integer
Set FM = CreateObject("SAP.FUNCTIONS")
Set objCon = Application.Run("BExAnalyzer.xla!sapBEXgetCon nection")
If objCon.user = "" Then
MsgBox "Connnection can not be established.", vbOKOnly + vbCritical
Exit Sub
End If
FM.Connection.user = objCon.user
FM.Connection.Password = objCon.Password
FM.Connection.client = "888" 'objCon.client
strappserver = objCon.ApplicationServer
FM.Connection.ApplicationServer = strappserver
FM.Connection.Language = "EN" 'objCon.Language
FM.Connection.System = objCon.System
FM.Connection.SystemNumber = objCon.SystemNumber
'opening connection
If FM.Connection.logon(1, True) <> True Then
MsgBox "Can not connect. Please contact your administrator"
Exit Sub
Else
| Reply to this email to post your response. __.____._ |   _.____.__ |
No comments:
Post a Comment