I think I found the problem with the language of the checkout page. The reason this mod no longer works:
Dim strAcceptLanguage As String
Dim strSetLanguage As String
'A language tag is a string that begins with the two-character
'language code that identifies the language. If necessary to
'distinguish regional differences in language, the language tag
'may also contain a country code, which is another two-character
'string. The language code and country code are separated by
'a hyphen. For example, the language tag used to identify the
'British English locale is "en-gb". I'm guesing that "gb" stands
'for "Great Britain".
'strAcceptLanguage = Mid(Request.ServerVariables("HTTP_ACCEPT_LANGUAGE"), 1, 2)
''If there is no Language available in the browser we will set default to 'us'
'If Len(strAcceptLanguage) > 0 Then
' strSetLanguage = strAcceptLanguage
'Else
' strSetLanguage = "us"
'End If
'strPayPalURL += "&lc=" & strSetLanguage
Is that Paypal changed the way the variable 'lc' should be set. It is now case sensitive and 'us' does not work but 'US' does. I would not add that string at the end of the URL but after the point where you set the currency.
Regards
Mariette Knap |