Created
June 3, 2019 11:31
-
-
Save lucnap/bd3da62d55437c309c9d0936a62c120e to your computer and use it in GitHub Desktop.
Seleziona il giusto prefisso in base al codice ISO
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| strNazione = Doc.CustomField(584) | |
| prefisso = "" | |
| Select Case strNazione | |
| Case "HU", "HUN" | |
| prefisso = "36" | |
| Case "UA", "UKR" | |
| prefisso = "380" | |
| Case "CH", "CHE" | |
| prefisso = "41" | |
| Case "SE", "SWE" | |
| prefisso = "46" | |
| Case "ES", "ESP" | |
| prefisso = "34" | |
| Case "SI", "SNV" | |
| prefisso = "386" | |
| Case "SK", "SVK" | |
| prefisso = "421" | |
| Case "RS", "SRB" | |
| prefisso = "381" | |
| Case "SM", "SMR" | |
| prefisso = "378" | |
| Case "RO", "ROU" | |
| prefisso = "40" | |
| Case "MK", "MKD" | |
| prefisso = "389" | |
| Case "CZ", "CZE" | |
| prefisso = "420" | |
| Case "GB", "GBR", "UK" | |
| prefisso = "44" | |
| Case "PT", "PRT" | |
| prefisso = "351" | |
| Case "PL", "POL" | |
| prefisso = "48" | |
| Case "NL", "NLD" | |
| prefisso = "31" | |
| Case "NO", "NOR" | |
| prefisso = "47" | |
| Case "ME", "MNE" | |
| prefisso = "382" | |
| Case "MC", "MCO" | |
| prefisso = "377" | |
| Case "MD", "MDA" | |
| prefisso = "373" | |
| Case "MT", "MLT" | |
| prefisso = "356" | |
| Case "LU", "LUX" | |
| prefisso = "352" | |
| Case "LT", "LTU" | |
| prefisso = "370" | |
| Case "LI", "LIE" | |
| prefisso = "423" | |
| Case "LV", "LVA" | |
| prefisso = "371" | |
| Case "IT", "ITA" | |
| prefisso = "39" | |
| Case "FO", "FRO" | |
| prefisso = "298" | |
| Case "IM", "IMN" | |
| prefisso = "44" | |
| Case "IS", "ISL" | |
| prefisso = "354" | |
| Case "IE", "IRL" | |
| prefisso = "353" | |
| Case "GR", "GRC" | |
| prefisso = "30" | |
| Case "GI", "GIB" | |
| prefisso = "350" | |
| Case "DE", "DEU" | |
| prefisso = "49" | |
| Case "FR", "FRA" | |
| prefisso = "33" | |
| Case "FI", "FIN" | |
| prefisso = "358" | |
| Case "EE", "EST" | |
| prefisso = "372" | |
| Case "DK", "DNK" | |
| prefisso = "45" | |
| Case "HR", "HRV" | |
| prefisso = "385" | |
| Case "XK", "XKX" | |
| prefisso = "381" | |
| Case "VA", "VAT" | |
| prefisso = "39" | |
| Case "CY", "CYP" | |
| prefisso = "357" | |
| Case "BG", "BGR" | |
| prefisso = "359" | |
| Case "BA", "BIH" | |
| prefisso = "387" | |
| Case "BY", "BLR" | |
| prefisso = "375" | |
| Case "BE", "BEL" | |
| prefisso = "32" | |
| Case "AT", "AUT" | |
| prefisso = "43" | |
| Case "AD", "AND" | |
| prefisso = "376" | |
| Case "AL", "ALB" | |
| prefisso = "355" | |
| Case Else | |
| prefisso = "39" | |
| End Select | |
| Rdy.ResponseWrite(prefisso) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment