How can I set encoding in EXCEL

L

Lincy

My SQL Server 2000 is English version. Traditional Chinese words are
saved in some fields of a table. I used ADO.Recordset to read records
and save them into an EXCEL file. But when I open the EXCEL file, but
the traditional chinese words are unreadable. The following are my
code. I appreciate you kind help.

set objExcel = Server.CreateObject("Excel.Application")
objExcel.Visible = false
objExcel.Workbooks.Open(Server.MapPath("ExportExcel/Export_Template.xlt"))
objExcel.Sheets(1).select
set myWorksheet=objExcel.ActiveWorkbook.ActiveSheet

Rnum = 1
strRange="A"&Rnum&":b"&Rnum
while not rsSel.EOF
myWorksheet.range(strRange).value=array(rsSel("VName"),rsSel("VAddress"))
Rnum=Rnum+1
rsSel.MoveNext
wend
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

open excel 2007 refresh query from batch file 0
how can i exports or save picture out of excel worksheet 1
How to update a subroutine in another excelsheet with a Macro 4
How to store a reference of a excel workbook in a variable in vbsc 5
(xlUp) problems then use in non excel 0
Attempting to use VBA to Ping within Excel... 6
to kill a excel process 2
How to insert the Thousands Separator (comma) in Excel? 6

Top