Guys может кто нить поможет переписать кусок кода с Basic на Visual C++
Реальная проблема для меня
Буду благодарен за любую помощь
Implements Webdge.IWrcXlt
Dim recordCounter As Integer
Dim iCallback As Webdge.WrcXltPluginCallback
Dim isoList(244, 2) As String
Private Function IWrcXlt_Initialize(ByVal pWrcXltPluginCallback As Webdge.IWrcXltPluginCallback) As Long
recordCounter = 0
isoList(0, 0) = "AFGHANISTAN"
isoList(0, 1) = "AF"
isoList(1, 0) = "ALAND ISLANDS"
isoList(1, 1) = "AX"
isoList(2, 0) = "ALBANIA"
isoList(2, 1) = "AL"
isoList(3, 0) = "ALGERIA"
isoList(3, 1) = "DZ"
isoList(4, 0) = "AMERICAN SAMOA"
isoList(4, 1) = "AS"
isoList(5, 0) = "ANDORRA"
isoList(5, 1) = "AD"
isoList(6, 0) = "ANGOLA"
isoList(6, 1) = "AO"
isoList(7, 0) = "ANGUILLA"
isoList(7, 1) = "AI"
isoList(8, 0) = "ANTARCTICA"
isoList(8, 1) = "AQ"
isoList(9, 0) = "ANTIGUA AND BARBUDA"
isoList(9, 1) = "AG"
isoList(10, 0) = "ARGENTINA"
isoList(10, 1) = "AR"
isoList(11, 0) = "ARMENIA"
isoList(11, 1) = "AM"
isoList(12, 0) = "ARUBA"
isoList(12, 1) = "AW"
isoList(13, 0) = "AUSTRALIA"
isoList(13, 1) = "AU"
isoList(14, 0) = "AUSTRIA"
isoList(14, 1) = "AT"
isoList(15, 0) = "AZERBAIJAN"
isoList(15, 1) = "AZ"
isoList(16, 0) = "BAHAMAS"
isoList(16, 1) = "BS"
isoList(17, 0) = "BAHRAIN"
isoList(17, 1) = "BH"
isoList(18, 0) = "BANGLADESH"
isoList(18, 1) = "BD"
isoList(19, 0) = "BARBADOS"
isoList(19, 1) = "BB"
isoList(20, 0) = "BELARUS"
isoList(20, 1) = "BY"
isoList(21, 0) = "BELGIUM"
isoList(21, 1) = "BE"
isoList(22, 0) = "BELIEZE"
isoList(22, 1) = "BZ"
isoList(23, 0) = "BENIN"
isoList(23, 1) = "BJ"
isoList(24, 0) = "BERMUDA"
isoList(24, 1) = "BM"
isoList(25, 0) = "BHUTAN"
isoList(25, 1) = "BT"
isoList(26, 0) = "BOLIVIA"
isoList(26, 1) = "BO"
isoList(27, 0) = "BOSNIA AND HERZEGOVINA"
isoList(27, 1) = "BA"
isoList(28, 0) = "BOTSWANA"
isoList(28, 1) = "BW"
isoList(29, 0) = "BOUVET ISLAND"
isoList(29, 1) = "BV"
isoList(30, 0) = "BRAZIL"
isoList(30, 1) = "BR"
isoList(31, 0) = "BRITISH INDIAN OCEAN TERRITORY"
isoList(31, 1) = "IO"
isoList(32, 0) = "BRUNEI DARUSSALAM"
isoList(32, 1) = "BN"
isoList(33, 0) = "BULGARIA"
isoList(33, 1) = "BG"
isoList(34, 0) = "BURKINA FASO"
isoList(34, 1) = "BF"
isoList(35, 0) = "BURUNDI"
isoList(35, 1) = "BI"
isoList(36, 0) = "CAMBODIA"
isoList(36, 1) = "KH"
isoList(37, 0) = "CAMEROON"
isoList(37, 1) = "CM"
isoList(38, 0) = "CANADA"
isoList(38, 1) = "CA"
isoList(39, 0) = "CAPE VERDE"
isoList(39, 1) = "CV"
isoList(40, 0) = "CAYMAN ISLANDS"
isoList(40, 1) = "KY"
isoList(41, 0) = "CENTRAL AFRICAN REPUBLIC"
isoList(41, 1) = "CF"
isoList(42, 0) = "CHAD"
isoList(42, 0) = "TD"
isoList(43, 0) = "CHILE"
isoList(43, 1) = "CL"
isoList(44, 0) = "CHINA"
isoList(44, 1) = "CN"
isoList(45, 0) = "CHRISTMAS ISLAND"
isoList(45, 1) = "CX"
isoList(46, 0) = "COCOS (KEELING) ISLANDS"
isoList(46, 1) = "CC"
isoList(47, 0) = "COLUMBIA"
isoList(47, 1) = "CO"
isoList(48, 0) = "COMOROS"
isoList(48, 1) = "KM"
isoList(49, 0) = "CONGO"
isoList(49, 1) = "CG"
isoList(50, 0) = "CONGO, THE DEMOCRATIC REPUBLIC OF THE"
isoList(50, 1) = "CD"
isoList(51, 0) = "COOK ISLANDS"
isoList(51, 1) = "CK"
isoList(52, 0) = "COSTA RICA"
isoList(52, 1) = "CR"
isoList(53, 0) = "COTE D'IVOIRE"
isoList(53, 1) = "CI"
isoList(54, 0) = "CROATIA"
isoList(54, 1) = "HR"
isoList(55, 0) = "CUBA"
isoList(55, 1) = "CU"
isoList(56, 0) = "CYPRUS"
isoList(56, 1) = "CY"
isoList(57, 0) = "CZECH REPUBLIC"
isoList(57, 1) = "CZ"
isoList(58, 0) = "DENMARK"
isoList(58, 1) = "DK"
isoList(59, 0) = "DJIBOUTI"
isoList(59, 1) = "DJ"
isoList(60, 0) = "DOMINICA"
isoList(60, 1) = "DM"
isoList(61, 0) = "DOMINICAN REPUBLIC"
isoList(61, 1) = "DO"
isoList(62, 0) = "ECUADOR"
isoList(62, 1) = "DC"
isoList(63, 0) = "EGYPT"
isoList(63, 1) = "EG"
isoList(64, 0) = "EL SALVADOR"
isoList(64, 1) = "SV"
isoList(65, 0) = "EQUATORIAL GUINEA"
isoList(65, 1) = "GQ"
isoList(66, 0) = "ERITREA"
isoList(66, 1) = "ER"
isoList(67, 0) = "ESTONIA"
isoList(67, 1) = "EE"
isoList(68, 0) = "ETHIOPIA"
isoList(68, 1) = "ET"
isoList(69, 0) = "FALKLAND ISLANDS (MALVINAS)"
isoList(69, 1) = "FK"
isoList(70, 0) = "FAROE ISLANDS"
isoList(70, 1) = "FO"
isoList(71, 0) = "FIJI"
isoList(71, 1) = "FJ"
isoList(72, 0) = "FINLAND"
isoList(72, 1) = "FI"
isoList(73, 0) = "FRANCE"
isoList(73, 1) = "FR"
isoList(73, 0) = "FRENCH GUIANA"
isoList(73, 1) = "GF"
isoList(74, 0) = "FRENCH POLYNESIA"
isoList(74, 1) = "PF"
isoList(75, 0) = "FRENCH SOUTHERN TERRITORIES"
isoList(75, 1) = "TF"
isoList(76, 0) = "GABON"
isoList(76, 1) = "GA"
isoList(77, 0) = "GAMBIA"
isoList(77, 1) = "GM"
isoList(78, 0) = "GEORGIA"
isoList(78, 1) = "GE"
isoList(79, 0) = "GERMANY"
isoList(79, 1) = "DE"
isoList(80, 0) = "GHANA"
isoList(80, 1) = "GH"
isoList(81, 0) = "GIBRALTAR"
isoList(81, 1) = "GI"
isoList(82, 0) = "GREECE"
isoList(82, 1) = "GR"
isoList(82, 0) = "GREENLAND"
isoList(83, 1) = "GL"
isoList(84, 0) = "GRENADA"
isoList(84, 1) = "GD"
isoList(85, 0) = "GUADELOUPE"
isoList(85, 1) = "GP"
isoList(86, 0) = "GUAM"
isoList(86, 1) = "GU"
isoList(87, 0) = "GUATEMALA"
isoList(87, 1) = "GT"
isoList(88, 0) = "GUERNSEY"
isoList(88, 1) = "GG"
isoList(89, 0) = "GUINEA"
isoList(89, 1) = "GN"
isoList(90, 0) = "GUINEA-BISSAU"
isoList(90, 1) = "GW"
isoList(91, 0) = "GUYANA"
isoList(91, 1) = "GY"
isoList(92, 0) = "HAITI"
isoList(92, 1) = "GT"
isoList(93, 0) = "HEARD ISLAND AND MCDONALD ISLANDS"
isoList(93, 1) = "HM"
isoList(94, 0) = "HOLY SEE (VATICAN CITY STATE)"
isoList(94, 1) = "VA"
isoList(95, 0) = "HONDURAS"
isoList(95, 1) = "HN"
isoList(96, 0) = "HONG KONG"
isoList(96, 1) = "HK"
isoList(97, 0) = "HUNGARY"
isoList(97, 1) = "HU"
isoList(98, 0) = "ICELAND"
isoList(98, 1) = "IS"
isoList(99, 0) = "INDIA"
isoList(99, 1) = "IN"
isoList(100, 0) = "INDONESIA"
isoList(100, 1) = "ID"
isoList(101, 0) = "IRAN, ISLAMIC REPUBLIC OF"
isoList(101, 1) = "IR"
isoList(102, 0) = "IRAQ"
isoList(102, 1) = "IQ"
isoList(103, 0) = "IRELAND"
isoList(103, 1) = "IE"
isoList(104, 0) = "ISLE OF MAN"
isoList(104, 1) = "IM"
isoList(105, 0) = "ISRAEL"
isoList(105, 1) = "IL"
isoList(106, 0) = "ITALY"
isoList(106, 1) = "IT"
isoList(107, 0) = "JAMAICA"
isoList(107, 1) = "JM"
isoList(108, 0) = "JAPAN"
isoList(108, 1) = "JP"
isoList(109, 0) = "JERSEY"
isoList(109, 1) = "JE"
isoList(110, 0) = "JORDAN"
isoList(110, 1) = "JO"
isoList(111, 0) = "KAZAKHSTAN"
isoList(111, 1) = "KZ"
isoList(112, 0) = "KENYA"
isoList(112, 1) = "KE"
isoList(113, 0) = "KIRIBATI"
isoList(113, 1) = "KI"
isoList(114, 0) = "KOREA, DEMOCRATIC PEOPLE'S REPUBLIC OF"
isoList(114, 1) = "KP"
isoList(115, 0) = "KOREA, REPUBLIC OF"
isoList(115, 1) = "KR"
isoList(116, 0) = "KUWAIT"
isoList(116, 1) = "KW"
isoList(117, 0) = "KYRGYZSTAN"
isoList(117, 1) = "KG"
isoList(118, 0) = "LAO PEOPLE'S DEMOCRATIC REPUBLIC"
isoList(118, 1) = "LA"
isoList(119, 0) = "LATVIA"
isoList(119, 1) = "LV"
isoList(120, 0) = "LEBANON"
isoList(120, 1) = "LB"
isoList(121, 0) = "LESOTHO"
isoList(121, 1) = "LS"
isoList(122, 0) = "LIBERIA"
isoList(122, 1) = "LR"
isoList(123, 0) = "LIBYAN ARAB JAMAHIRIYA"
isoList(123, 1) = "LY"
isoList(124, 0) = "LIECHTENSTEIN"
isoList(124, 1) = "LI"
isoList(125, 0) = "LITHUANIA"
isoList(125, 1) = "LT"
isoList(126, 0) = "LUXEMBOURG"
isoList(126, 1) = "LU"
isoList(127, 0) = "MACAO"
isoList(127, 1) = "MO"
isoList(128, 0) = "MACEDONIA, THE FORMER YOGUSLAV REPUBLIC OF"
isoList(128, 1) = "MK"
isoList(129, 0) = "MADAGASCAR"
isoList(129, 1) = "MG"
isoList(130, 0) = "MALAWI"
isoList(130, 1) = "MW"
isoList(131, 0) = "MALAYSIA"
isoList(131, 1) = "MY"
isoList(132, 0) = "MALDIVES"
isoList(132, 1) = "MV"
isoList(133, 0) = "MALI"
isoList(133, 1) = "ML"
isoList(134, 0) = "MALTA"
isoList(134, 1) = "MT"
isoList(135, 0) = "MARSHALL ISLANDS"
isoList(135, 1) = "MH"
isoList(136, 0) = "MARTINIQUE"
isoList(136, 1) = "MQ"
isoList(137, 0) = "MAURITIUS"
isoList(137, 1) = "MU"
isoList(138, 0) = "MAYOTTE"
isoList(138, 1) = "YT"
isoList(139, 0) = "MEXICO"
isoList(139, 1) = "MX"
isoList(140, 0) = "MICRONESIA, FEDERATED STATES OF"
isoList(140, 1) = "FM"
isoList(141, 0) = "MOLDOVA, REPUBLIC OF"
isoList(141, 1) = "MD"
isoList(142, 0) = "MONACO"
isoList(142, 1) = "MC"
isoList(143, 0) = "MONGOLIA"
isoList(143, 1) = "MN"
isoList(144, 0) = "MONTENEGRO"
isoList(144, 1) = "ME"
isoList(145, 0) = "MONTSERRAT"
isoList(145, 1) = "MS"
isoList(146, 0) = "MOROCCO"
isoList(146, 1) = "MA"
isoList(147, 0) = "MOZAMBIQUE"
isoList(147, 1) = "MZ"
isoList(148, 0) = "MYANMAR"
isoList(148, 1) = "MM"
isoList(149, 0) = "NAMIBIA"
isoList(149, 1) = "NA"
isoList(150, 0) = "NAURU"
isoList(150, 1) = "NR"
isoList(151, 0) = "NEPAL"
isoList(151, 1) = "NP"
isoList(152, 0) = "NETHERLANDS"
isoList(152, 1) = "NL"
isoList(153, 0) = "NETHERLANDS ANTILLES"
isoList(153, 1) = "AN"
isoList(154, 0) = "NEW CALEDONIA"
isoList(154, 1) = "NC"
isoList(155, 0) = "NEW ZEALAND"
isoList(155, 1) = "NZ"
isoList(156, 0) = "NICARAGUA"
isoList(156, 1) = "NI"
isoList(157, 0) = "NIGER"
isoList(157, 1) = "NE"
isoList(158, 0) = "NIGERIA"
isoList(158, 1) = "NG"
isoList(159, 0) = "NIUE"
isoList(159, 1) = "NU"
isoList(160, 0) = "NORFOLK ISLAND"
isoList(160, 1) = "NF"
isoList(161, 0) = "NORTHERN MARIANA ISLANDS"
isoList(161, 1) = "MP"
isoList(162, 0) = "NORWAY"
isoList(162, 1) = "NO"
isoList(163, 0) = "OMAN"
isoList(163, 1) = "OM"
isoList(164, 0) = "PAKISTAN"
isoList(164, 1) = "PK"
isoList(165, 0) = "PALAU"
isoList(165, 1) = "PW"
isoList(166, 0) = "PALESTINIAN TERRITORY, OCCUPIED"
isoList(166, 1) = "PS"
isoList(167, 0) = "PANAMA"
isoList(167, 1) = "PA"
isoList(168, 0) = "PAPUA NEW GUINEA"
isoList(168, 1) = "PG"
isoList(169, 0) = "PARAGUAY"
isoList(169, 1) = "PY"
isoList(170, 0) = "PERU"
isoList(170, 1) = "PE"
isoList(171, 0) = "PHILIPPINES"
isoList(171, 1) = "PH"
isoList(172, 0) = "PITCAIRN"
isoList(172, 1) = "PN"
isoList(173, 0) = "POLAND"
isoList(173, 1) = "PL"
isoList(174, 0) = "PORTUGAL"
isoList(174, 1) = "PT"
isoList(175, 0) = "PUERTO RICO"
isoList(175, 1) = "PR"
isoList(176, 0) = "QATAR"
isoList(176, 1) = "QA"
isoList(177, 0) = "REUNION"
isoList(177, 1) = "RE"
isoList(178, 0) = "ROMANIA"
isoList(178, 1) = "RO"
isoList(179, 0) = "RUSSIAN FEDERATION"
isoList(179, 1) = "RU"
isoList(180, 0) = "RWANDA"
isoList(180, 1) = "RW"
isoList(181, 0) = "SAINT HELENA"
isoList(181, 1) = "SH"
isoList(182, 0) = "SAINT KITTS AND NEVIS"
isoList(182, 1) = "KN"
isoList(183, 0) = "SAINT LUCIA"
isoList(183, 1) = "LC"
isoList(184, 0) = "SAINT PIERRE AND MIQUELON"
isoList(184, 1) = "PM"
isoList(185, 0) = "SAINT VINCENT AND THE GRENADINES"
isoList(185, 1) = "VC"
isoList(186, 0) = "SAMOA"
isoList(186, 1) = "WS"
isoList(187, 0) = "SAN MARINO"
isoList(187, 1) = "SM"
isoList(188, 0) = "SAO TOME AND PRINCIPE"
isoList(188, 1) = "ST"
isoList(189, 0) = "SAUDIA ARABIA"
isoList(189, 1) = "SA"
isoList(190, 0) = "SENEGAL"
isoList(190, 1) = "SN"
isoList(191, 0) = "SERBIA"
isoList(191, 1) = "RS"
isoList(192, 0) = "SEYCHELLES"
isoList(192, 1) = "SC"
isoList(193, 0) = "SIERRA LEONA"
isoList(193, 1) = "SL"
isoList(194, 0) = "SINGAPORE"
isoList(194, 1) = "SG"
isoList(195, 0) = "SLOVAKIA"
isoList(195, 1) = "SK"
isoList(196, 0) = "SLOVENIA"
isoList(196, 1) = "SI"
isoList(197, 0) = "SOLOMON ISLANDS"
isoList(197, 1) = "SB"
isoList(198, 0) = "SOMALIA"
isoList(198, 1) = "SO"
isoList(199, 0) = "SOUTH AFRICA"
isoList(199, 1) = "ZA"
isoList(200, 0) = "SOUTH GEORGIA AND THE SOUTH SANDWICH ISLANDS"
isoList(200, 1) = "GS"
isoList(201, 0) = "SPAIN"
isoList(201, 1) = "ES"
isoList(202, 0) = "SRI LANKA"
isoList(202, 1) = "LK"
isoList(203, 0) = "SUDAN"
isoList(203, 1) = "SD"
isoList(204, 0) = "SURINAME"
isoList(204, 1) = "SR"
isoList(205, 0) = "SVALBARD AND JAN MAYEN"
isoList(205, 1) = "SJ"
isoList(206, 0) = "SWAZILAND"
isoList(206, 1) = "SZ"
isoList(207, 0) = "SWEDEN"
isoList(207, 1) = "SE"
isoList(208, 0) = "SWITZERLAND"
isoList(208, 1) = "CH"
isoList(209, 0) = "SYRIAN ARAB REPUBLIC"
isoList(209, 1) = "SY"
isoList(210, 0) = "TAIWAN, PROVINCE OF CHINA"
isoList(210, 1) = "TW"
isoList(211, 0) = "TAJIKISTAN"
isoList(211, 1) = "TJ"
isoList(212, 0) = "TANZANIA, UNITED REPUBLIC OF"
isoList(212, 1) = "TZ"
isoList(213, 0) = "THAILAND"
isoList(213, 1) = "TH"
isoList(214, 0) = "TIMOR-LESTE"
isoList(214, 1) = "TL"
isoList(215, 0) = "TOGO"
isoList(215, 1) = "TG"
isoList(216, 0) = "TOKELAU"
isoList(216, 1) = "TK"
isoList(217, 0) = "TONGA"
isoList(217, 1) = "TO"
isoList(218, 0) = "TRINIDAD AND TOBAGO"
isoList(218, 1) = "TT"
isoList(219, 0) = "TUNISIA"
isoList(219, 1) = "TN"
isoList(220, 0) = "TURKEY"
isoList(220, 1) = "TR"
isoList(221, 0) = "TURKMENISTAN"
isoList(221, 1) = "TM"
isoList(222, 0) = "TURKS AND CAICOS ISLANDS"
isoList(222, 1) = "TC"
isoList(223, 0) = "TUVALU"
isoList(223, 1) = "TV"
isoList(224, 0) = "UGANDA"
isoList(224, 1) = "UG"
isoList(225, 0) = "UKRAINE"
isoList(225, 1) = "UA"
isoList(226, 0) = "UNITED ARAB EMIRATES"
isoList(226, 1) = "AE"
isoList(227, 0) = "UNITED KINGDOM"
isoList(227, 1) = "GB"
isoList(228, 0) = "UNITED STATES"
isoList(228, 1) = "US"
isoList(229, 0) = "UNITED STATES MINOR OUTLYING ISLANDS"
isoList(229, 1) = "UM"
isoList(230, 0) = "URAGUAY"
isoList(230, 1) = "UY"
isoList(231, 0) = "UZBEKISTAN"
isoList(231, 1) = "UZ"
isoList(232, 0) = "VANUATU"
isoList(232, 1) = "VU"
isoList(233, 0) = "VATICAN CITY STATE"
isoList(233, 1) = "VA"
isoList(234, 0) = "VENEZUELA"
isoList(234, 1) = "VE"
isoList(235, 0) = "VIET NAM"
isoList(235, 1) = "VN"
isoList(236, 0) = "VIRGIN ISLANDS, BRITISH"
isoList(236, 1) = "VB"
isoList(237, 0) = "VIRGIN ISLANDS, U.S."
isoList(237, 1) = "VI"
isoList(238, 0) = "WALLIS AND FUTUNA"
isoList(238, 1) = "WF"
isoList(239, 0) = "WESTERN SAHARA"
isoList(239, 1) = "EH"
isoList(240, 0) = "YEMEN"
isoList(240, 1) = "YE"
isoList(241, 0) = "ZAIRE"
isoList(241, 1) = "CD"
isoList(242, 0) = "ZAMBIA"
isoList(242, 1) = "ZM"
isoList(243, 0) = "ZIMBABWE"
isoList(243, 1) = "ZW"
Set iCallback = pWrcXltPluginCallback
iCallback.AppSet App_GetSet_SaveRawLogLine, ""
iCallback.AppSetAddToStatusLog 1, "Custom Plug-in Initialized - jgj"
IWrcXlt_Initialize = XltOk
End Function
Private Sub IWrcXlt_Terminate()
End Sub
Private Function IWrcXlt_TranslateAnalysisAbort() As Long
End Function
Private Function IWrcXlt_TranslateAnalysisStart() As Long
End Function
Private Function IWrcXlt_TranslateAnalysisStop() As Long
End Function
Private Function IWrcXlt_TranslateEndOfDataCloseout() As Long
End Function
Private Sub IWrcXlt_TranslateEndOfDataCloseoutResult(ByVal nResult As Long)
End Sub
Private Function IWrcXlt_TranslateEndOfDayCloseout() As Long
End Function
Private Sub IWrcXlt_TranslateEndOfDayCloseoutResult(ByVal nResult As Long)
End Sub
Private Function IWrcXlt_TranslateHit(ByVal nHandle As Long) As Long
' Declare variables
Dim rawResult As String
Dim cntyResult As String
Dim ccResult As String
Dim x As Integer
Dim lookup As String
Dim fields() As String
rawResult = ""
cntyResult = ""
ccResult = ""
lookup = ""
cntyResult = iCallback.ResolveName(nHandle, "oneparam:cnty")
rawResult = iCallback.ResolveName(nHandle, "rawlogline")
fields = Split(rawResult, " ", , vbTextCompare)
Dim re As New RegExp, m As Match
re.Pattern = "cc=.."
re.Global = True
'Search for cc value from column 15 (dcs-geo)
If (re.Test(fields(14)) = True) Then
For Each m In re.Execute(rawResult)
ccResult = m.Value
Next
End If
'Look up the short value from the ISO 3166 Code list defined globally
If (Len(cntyResult) > 0) And (Len(ccResult) > 0) Then
For x = 0 To 244
If (UCase$(cntyResult) = UCase$(isoList(244 - x, 0))) Then
lookup = isoList(244 - x, 1)
x = 245
End If
Next x
'If we found something in the ISO list, compare the short value to cc paramter.
If Len(lookup) > 0 Then
If (lookup <> Right$(UCase$(ccResult), 2)) Then
iCallback.ApplyTranslation nHandle, "params", "append", "WT.z_cb=1"
Rem iCallback.AppSetAddToStatusLog 1, lookup & " did not match " & Right$(UCase$(ccResult), 2)
End If
End If
End If
End Function
Private Function IWrcXlt_TranslateProfileDelete() As Long
End Function
Private Function IWrcXlt_TranslateProfileReset() As Long
End Function
Private Function IWrcXlt_TranslateVisitorSession(ByVal nHandle As Long, ByVal nHitSessionId As Long, ByVal bstrVisitorId As String) As Long
End Function
Private Function IWrcXlt_TranslateVisitorHit(ByVal nHandle As Long, ByVal HitSessionId As Long, ByVal bstrVisitorId As String, ByVal bNewVisitorSession As Long) As Long
End Function
Добавлено форматирование — Кодт