Set a = CreateObject("excel.application") sdate = "2007/4/20" '開始日期 edate = "2007/4/21" '終止日期 save_file_name = "C:\test.csv" '存檔檔名 '用excel來存檔 a.
www.programmer-club.com.tw