找回密码
 立即注册

微信登录

只需一步,快速开始

QQ登录

只需一步,快速开始

搜索
查看: 179|回复: 0

[求助] 还是那个内嵌excel的保存的新的问题

[复制链接]
  • TA的每日心情
    慵懒
    2024-7-6 19:54
  • 签到天数: 106 天

    连续签到: 1 天

    [LV.6]常住居民II

    35

    主题

    136

    回帖

    1136

    积分

    金牌会员

    积分
    1136
    来自: 加拿大
    发表于 2024-5-19 00:53:58 | 显示全部楼层 |阅读模式 来自: 加拿大
    非业余 - aardio 编程语言 - 非官方问答社区
    限时85折!暑假期间,用aardio培训班充实自己!https://mp.weixin.qq.com/s/c4Z8sZPOiMh_OTG2VPOJmA
    Aardio培训大揭秘,轻松上手打造个人项目!https://mp.weixin.qq.com/s/cr47qhp_Cpz0p57lbbPwug
    aardio风行者第二期培训班https://mp.weixin.qq.com/s/uB6XHUDnGSk0JlWuiBE9AA
    上一贴,从excel文件里找到保存按钮,是可以保存数据了。现在我在窗体上,新建一个按钮,清除数据后保存,就不行了。麻烦高手帮我看一下。谢谢!

    [AAuto] 纯文本查看 复制代码
    import com;
    import com.excel;
    import win.ui;
    /*DSG{{*/
    mainForm = win.form(text="dsoFrame控件测试";right=1191;bottom=769;bgcolor=16448250)
    mainForm.add(
    button={cls="button";text="清空数据";left=321;top=718;right=421;bottom=751;z=5};
    chkMenubar={cls="checkbox";text="显示菜单栏";left=613;top=721;right=716;bottom=748;bgcolor=16448250;z=2};
    chkTitlebar={cls="checkbox";text="显示标题栏";left=930;top=721;right=1033;bottom=748;bgcolor=16448250;z=4};
    chkToolbars={cls="checkbox";text="显示工具条";left=771;top=721;right=874;bottom=748;bgcolor=16448250;z=3};
    custom={cls="custom";text="自定义控件";left=1;top=7;right=1184;bottom=690;bgcolor=16777215;db=1;dl=1;dr=1;dt=1;z=1}
    )
    /*}}*/
    
    mainForm.show();
    
    import com.dsoFramer;
    var dsoFrame = com.dsoFramer(mainForm.custom) 
    dsoFrame.menubar = true //去掉菜单栏  
    dsoFrame.titlebar = false; //去掉标题栏
    dsoFrame.toolbars = false; //去掉工具条
    dsoFrame.borderStyle = 0; //去掉边框(默认值)
    
    mainForm.chkToolbars.oncommand = function(id,event){
    	dsoFrame.toolbars = mainForm.chkToolbars.checked;	
    }
    
    mainForm.chkTitlebar.oncommand = function(id,event){
    	dsoFrame.titlebar = mainForm.chkTitlebar.checked;	
    }
    
    import fsys.dlg;
    var path = "E:\\DIP目录.xlsx"
    
    dsoFrame.openFile(path);
    var excel = com.excel( true );
    
    mainForm.button.oncommand = function(id,event){
    	book = com.GetObject("Excel.Application");
    	sheet1 = book.sheets("sheet1");
        sheet1.UsedRange.clear()//清除表格中旧的数据
        book.ActiveWorkbook.Save(); //保存更改
    	excel.Quit();
    }
    
    return win.loopMessage();


    非业余 - aardio 编程语言 - 非官方问答社区
    限时85折!暑假期间,用aardio培训班充实自己!https://mp.weixin.qq.com/s/c4Z8sZPOiMh_OTG2VPOJmA
    Aardio培训大揭秘,轻松上手打造个人项目!https://mp.weixin.qq.com/s/cr47qhp_Cpz0p57lbbPwug
    aardio风行者第二期培训班https://mp.weixin.qq.com/s/uB6XHUDnGSk0JlWuiBE9AA
    回复

    使用道具 举报

    *滑块验证:
    您需要登录后才可以回帖 登录 | 立即注册

    本版积分规则

    Archiver|手机版|小黑屋|非业余 - aardio 编程语言 - 非官方问答社区

    GMT+8, 2024-7-16 10:40 , Processed in 0.180286 second(s), 31 queries .

    Powered by Discuz! X3.5

    © 2001-2024 Discuz! Team.

    快速回复 返回顶部 返回列表