以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  电子表导出问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=187978)
--  作者：HJG_HB950207
--  发布时间：2023/8/24 16:54:00
--  电子表导出问题
表A字段： 综合码，交易时间




综合码为字符型，如:   川ABQ060黄色|2023-08-02 08:51:00

交易日期为日期型（DateLongTime）表达式=SubString([综合码],11,28)  ，如上生存时间： 2023-08-02 08:51:00



此表时间参与计算和显示等都没问题， 但生存电子表格时为空表，请教原因。
--  作者：有点蓝
--  发布时间：2023/8/24 17:01:00
--  
execl模板发上来看看
--  作者：HJG_HB950207
--  发布时间：2023/8/24 17:04:00
--  
Dim a As Date = Date.Today

Dim flg As New SaveExcelFlags
flg.RowNumber = True
flg.CellStyle = True
Tables("车牌车型"）.SaveExcel("D:\\门架资料\\门架识别.xls", "\'" & a & "\'", flg)
 Dim proc As New Process
    proc.File = "D:\\门架资料\\门架识别.xls"
    proc.Start
--  作者：有点蓝
--  发布时间：2023/8/24 17:28:00
--  
Tables("车牌车型"）.SaveExcel("D:\\门架资料\\门架识别.xls", a, flg)