分享一个2020年用aardio写的Excel数据合并工具-office论坛-aardio-阿甘软件

分享一个2020年用aardio写的Excel数据合并工具

适用场景:一份需要多人分工填写的Excel文件,其结果分布在多份Excel文件中时。

注:若使用协同在线表格,应该不会存在此类场景。

功能

  1. 多份格式一致的Excel表格文件数据汇总到一份Excel文件中;
  2. 工具在线更新。

运行截图

image

image

在线更新功能

建议参考aardio官方示例,以下是我刚学会用 aardio 没多久时写的。

在主程序(main.aardio)中添加:

import fsys.update.simpleMain;
if( fsys.update.simpleMain(
	"TE Tools",
	"https://aarbbs.com/api/TE-Tools/version.txt",
	..io.appData("/aardio/std/ota/app/update"),
	function(version,description,status){})){
	return 0;	
}

在子窗口(about.aardio)中添加:

import win.ui;
import fsys.version;
/*DSG{{*/
var winform = win.form(text="TE Tools";right=525;bottom=218;bgcolor=16777215;border="none";exmode="none";mode="popup")
winform.add(
app={cls="bkplus";left=22;top=43;right=150;bottom=171;background="\res\app.ico";z=3};
author={cls="static";text="作者:freefire";left=189;top=99;right=403;bottom=120;color=8352883;transparent=1;z=8};
bk={cls="bk";text="    关于";left=0;top=0;right=526;bottom=28;align="left";bgcolor=5655109;color=16777215;dl=1;dr=1;z=1};
copyright={cls="static";text="Copyright © 2020 aarbbs.com. All rights reserved.";left=189;top=157;right=491;bottom=185;center=1;color=8352883;transparent=1;z=6};
custom={cls="custom";text="自定义控件";left=140;top=170;right=141;bottom=171;z=2};
lnkVersion={cls="plus";text="正在检查新版本";left=9;top=194;right=526;bottom=216;align="left";color=14065920;db=1;dl=1;font=LOGFONT(h=-14);iconColor=5655109;iconStyle={align="left";font=LOGFONT(h=-16;name='FontAwesome')};iconText='\uF021';notify=1;paddingLeft=20;z=4};
static={cls="static";text="表格内容合并工具";left=189;top=49;right=452;bottom=74;font=LOGFONT(h=-16);transparent=1;z=5};
static_version={cls="static";text="程序版本号:";left=189;top=132;right=403;bottom=153;color=8352883;transparent=1;z=7}
)
/*}}*/

import style;
winform.lnkVersion.skin(style.link)

import win.ui.tooltip;
var tooltipCtrl = win.ui.tooltip( winform );
tooltipCtrl.addTool(winform.lnkVersion,"点击检测更新" );

import fsys.update.simpleMain;
fsys.update.simpleMain.onStatusChanged(function(version,description,status){
	/*注意此回调可捕获到调用前或调用后的更新状态变更*/
	if(status=="ready"){
		winform.lnkVersion.disabledText = null;	
		winform.lnkVersion.text = "点这里重新启动软件更新到新版本:" + version
		tooltipCtrl.addTool(winform.lnkVersion,description);
	}
	elseif(status=="complete"){
		winform.lnkVersion.text = "已更新到最新版本:" + version;
		tooltipCtrl.addTool(winform.lnkVersion,description);
		winform.msgInfo("更新内容:"+ '\n' +description)
	} 
	elseif(status=="latest"){
		winform.lnkVersion.disabledText = null;
		winform.lnkVersion.text = "已经是最新版本";
	} 
	elseif(status=="failed"){
		winform.lnkVersion.disabledText = null;
		winform.msgErr(description);
	}
})

winform.lnkVersion.oncommand = function(id,event){ 
	
	winform.lnkVersion.text = fsys.update.simpleMain.getReadyStatusInfo() ? "正在启动自动更新" : "正在检查新版本";
	winform.lnkVersion.disabledText = {'\uF254';'\uF251';'\uF252';'\uF253';'\uF250'}
	if(fsys.update.simpleMain.checkUpdate(true)){
		win.quitMessage();
	}
}

var version = fsys.version.getInfo(io._exefile).productVersion
winform.static_version.text = "程序版本号:" + version.major + "." + version.minor + "." + version.build + "." + version.revision

import win.ui.simpleWindow2;
var simpleWindow2 = win.ui.simpleWindow2(winform);
simpleWindow2.titlebarMin.close()

winform.show();
win.loopMessage();
return winform;

工程源码

 
TE Tools 工程源码

 

请登录后发表评论

    • 阿甘的头像-阿甘软件阿甘徽章-签到达人-阿甘软件等级-LV6-阿甘软件作者超级版主0