web querry fails in charset

[pinieroboy]

Hello board!

This one is a newbie question!

I use the web querry function to import a web page into excel.
The problem arrises with the encoding used in the web page. charset=windows-1253 (it's a greek one!)

What is wrong? when i import the page to the excel sheet, the greek are displayed like chinese! My mother tongue is greek and not chinese!
Is there any property in web querry to set the encoding-charset?

This is the code i currently use in excel

With ActiveSheet.QueryTables.ADD(Connection:=Conne, Destination:=Range("A1"))
'.Name = "league_rank.asp?leaid=68_1"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlAllTables
.WebFormatting = xlWebFormattingNone
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.Refresh BackgroundQuery:=False
End With

Could you please help me?

Thanks in advance.

 

[Andrew Poulsom]

Welcome to the Board.

What's in Conne?

 

[pinieroboy]

OUPS sorry

previous ic code

If Title = "ge1" Then
Conne = "URL;http://www.oxybet.com/league_rank.asp?leaid=10"
End If

it is just the imported url page

 

[Andrew Poulsom]

Strange, I get Greek, eg:

1 ΤΖΟΥΡΓΚΑΡΝΤΕΝ
2 ΓΚΕΤΕΜΠΟΡΓΚ
3 ΚΑΛΜΑΡ
4 ΧΑΜΑΡΜΠΙ
5 ΜΑΛΜΕ
6 ΧΕΛΣΙΝΓΚΜΠΟΡΓΚ
7 ΕΛΦΣΜΠΟΡΓΚ
8 ΧΑΚΕΝ
9 ΕΡΓΚΡΙΤΕ
10 ΧΑΛΜΣΤΑΝΤ
11 ΓΚΕΦΛΕ
12 ΛΑΝΤΣΚΡΟΝΑ
13 ΣΟΥΝΤΣΒΑΛ
14 ΑΣΙΡΙΣΚΑ

Maybe try changing your language settings in Control Panel.

 

[pinieroboy]

What?
How can that be?

What you just posted is sure Greek
I checked the control panel and everything seems ok

The none unicode option is also set to Greek and all i see is

1 ÁÍÔÅÑËÅ×Ô
2 ÓÔÁÍÔÁÑ ËÉÅĂÇÓ
3 ÊËÁ̀Đ ̀ĐÑÉÆ
4 ÂÅÓÔÅÑËÏ
5 ĂÊÅÍÊ
6 ÆÏƠËÔÅ ÂÁÑÅĂÊÅ̀
7 ËÏÊÅÑÅÍ
8 ÂÑƠÎÅËËÅÓ
9 ÑÏÆÅËÁÑ
10 ĂÁÍÄÇ
11 ÓÅÑÊË ̀ĐÑÉÆ
12 ̀ĐÅÂÅÑÅÍ
13 ̀ÏƠÓÊÑÏÍ
14 ÓÁÑËÅÑÏƠÁ
15 ĂÊÅÑ̀ÉÍÁË
16 ËÁ ËÏƠÂÉÅÑ
17 ÓÉÍÔ ÔÑÏƠÉÍÔÅÍ
18 ËÉÑÓ

 

[Andrew Poulsom]

The none unicode option is also set to Greek

Where is that option?

 

[pinieroboy]

regional and language options > advanced tab

LANGUAGE FOR NON-UNICODE PROGRAMS

 

[Andrew Poulsom]

Sorry I don't have that (Windows 2000).

 

[pinieroboy]

I wish i could make this one sticky