使用ASP Classic自动授权Excel表的所有列

Question

嗨，我全部使用以下格式和代码将记录插入Excel

sFileName = "abc.xls"
sFilePath = server.mappath("EXCEL" & sFileName)
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set objCreatedFile = fso.CreateTextFile(sFilePath)
objCreatedFile.close
Set objOpenFile = fso.OpenTextFile(sFilePath,8,True)
    Set rst = server.CreateObject("ADODB.RecordSet")    
    sSQL = "select * from a table"
    rst.Open sSQL, conn, 3, 3
    if not rst.eof then
       sStr = "NAME" & chr(9) & "ADDRESS" & char(9) & "TEL" & char(9) 
       objOpenFile.WriteLine sStr
       Do while not rst.eof
          sStr = rst("NAME) & chr(9) & rst("ADD") & char(9) & rst("TEL") & char(9) 
          objOpenFile.WriteLine sStr
       rst.movenext
       loop
    end if
objOpenFile.Close
Set objOpenFile = nothing
Set fso = nothing

将记录插入Excel或使用Excel打开文件，并用标签分隔的记录打开文件。我现在想打电话给某些东西以自动授权Excel中的所有列。如何做，请帮助。谢谢。

Answer 1

选项卡 - 删除文本文件而不是excel文件。而且，当客户打开文件