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
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