作者在 2018-09-15 16:43:37 发布以下内容
				oExcel=CreateObject("Excel.Application")
WITH oExcel
    .WorkBooks.Add
    .Caption = "XXXX信息管理系统"
    .ActiveWindow.Caption = ""
    .Visible = .T.
ENDWITH 
				oExcel=CreateObject("Excel.Application")
WITH oExcel
    .WorkBooks.Add
    .Caption = "XXXX信息管理系统"
    .ActiveWindow.Caption = ""
    .Visible = .T.
ENDWITH 
				
收起