Здравствуйте, прошу помочь решить мне одну проблему.
У меня есть xml файл, он в кодировке UTF-8, часть информации в нем на арабском языке, мне нужно обработать программно этот файл и записать найденную информацию на арабском языке в базу SQL.
Я сначала присваиваю переменной содержимое XML файла

Open "C:\....." For Input As #1
While Not EOF(1)
Line Input #1, xml
Wend
Close #1

Дальше я пишу обработчик, в котором в итоге присваиваю переменной arab информацию на арабском языке, после этого эту информацию пишу в базу SQL. Однако в базе вместо арабского одни корявые символы. Даже если я в самой программе вывожу в текстовом поле арабскую информацию, тоже одни корявые символы.
Подскажите пожалуйста, как нужно написать, чтобы в итоге в базе SQL были действительно слова на арабском языке!

да в самой базе SQL поле как раз nvarchar, я просто думаю что у меня Юникод уже в процессе обработки потерялся, надо как то из файла считать этот Юникод и донести его до базы, а как это сделать не знаю.....

Вот даже проще, есть уже в базе записи на арабском, считываю их и сразу вывожу с помощью MsgBox, вместо арабских слов одни знаки вопросов......может надо указывать какие то параметры и как то связывать с Unicode?

Считываю очень просто
.............
qwer=rs.Fields("arabskiy")
..............
MsgBox qwer

Konst_One
а вот вывод этой строки уже отдельная и непростая тема

Попробовал такую строчку, считываю информацию, тут же пишу в базу обратно, получается ахинея.....но что интересно если считать как:

s=StrConv(rs.Fields("arabskiy"),vbUnicode) , а затем обратно записать
.......
rs.Fields("arabskiy")=StrConv(s,vbFromUnicode)

то считанная информация ложится в базу на арабском, как оттуда и взятая, еще интересен тот факт, что даже не используя StrConv, используя
.......
s=rs.Fields("arabskiy")
.........
rs.Fields("arabskiy")=s Юникод не теряется и считанные данные приходят обратно в базу без изменений. Однако если я считываю информацию из XML файла как:

Open "C:\......" For Input As #1
While Not EOF(1)
Line Input #1, xml
Wend
Close #1

то если записать в базу содержимое переменной xml

rs.Fields("arabskiy")=xml

то в базе вместо арабских слов знаки вопроса....

Хотелось бы узнать, как можно прочитать файл XML и присвоить переменной содержимое этого файла, чтобы Юникод сохранился.

Konst_One
полезно почитать

За ссылку спасибо, она действительно дельная, но там к сожалению все на английском, попробовал немного разобрался и понял что голова моя пошла кругом ;)

Всем спасибо за помощь, я разобрался. Проблема была в том что хоть xml файл и выдает себя за UTF-8, однако все арабские слова в UTF-16, написал модуль преобразования UTF-8 в UTF-16 и все раработало. В базу пишется все на арабском, правда проблема с выводом на экран все же осталась......а на VB.NET переходить уже поздно....серверная часть ПО уже написана, теперь буду писать клиентскую часть.