摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Buttons;type TForm1 = class(TForm) SpeedButton1: TSpeedButton; SpeedButton2: TSpeedButton; procedure SpeedButton1Click(Sender: TObject); procedure SpeedButton2Click(Sender: TOb... 阅读全文
摘要：
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs;type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}... 阅读全文
摘要：
如果用友的账套多了的话,用友的系统管理输出账套实在是太慢了.于是便开发了这一个工具.1.使用必须在服务器本地上进行操作,因为该工具是直接备份用友的SQL数据库.2.该工具备份的不止止是账套的数据库,连同账套信息一起备份3.备份之后,可以将该文件与该上录下的MDB数据文件和备份文件一齐复致到其他电脑上,直接恢复到另外的服务器上. 阅读全文
摘要：
1.自动搜索指定目录下所有数据库文件，因为用友的数据库存放路径是有规则。所以本工具可以自动识别哪位是为用户的数据库2.智能判断数据库文件所属账套与年度。自动生成附加命令3.通过勾选“检测账套是否存在”，过滤出哪位账套没有正确附加在数据库上，而己附加的则不再生成附加命令。4.考虑到如服务器数据库过多，打开数据库管理工具太慢，加入附加功能，该功能能将所生成的附加命令执行。而不需再次打开数据库管理工具进行附加。适用范围：SQL2000或更高版本无法启动，重新安装后没有找到数据库。数据库太多而无法手工编写附加命令或不懂编写附加命令。可以执行此工具。 by Why QQ:961138505 阅读全文
摘要：
用友总账的自定义结转看起来比较复杂，如果你启用了部门，项目核算的话。应客户的要求，对G6 11.0版本写了一个自定义结转工具。G6 11.0的项目核算里相对T6，U8更为复杂，里面增加了自定义输助核算。所以现下这版本只针反G6 系统。T6或U8下若想使用得修改源码了。提取数据后，按生成凭证，直接将凭证传至用友里。1.自定义结转，设置方便，不需要进入用友里设置2.未记账状态下可以结转，用友的结转必须单据己记账，结转后发现错误，修改很麻烦3.辅助核算自动结转，根据科目的辅助核算，自动进行结转，不需要一个一个设置需要的朋友联系我。 By Why QQ:961138505 阅读全文
摘要：
更改密码模拟用友登陆窗口，保留SA密码输入接口，如果用户SA密码不为空可以在此输入。调用用友系统管理用户名。唯一的遗憾就是不知用友操作员口令的加密算法，所以无法调用用户设置的密码。 阅读全文
摘要：
Excel数据模版，将本模版数据导入U810.1的销售预订单中。选择服务器，输入SA密码，一般为空。选择要导入的账套。只是一个小小的具，没在美化界面上下功夫，实用为主。登陆账套，选择数据库模，按导入导入成功！！打开用友，查看结果，两张都己成功导入，子表也没有混乱现象。如果开发过EXCEL数据表导入SQL的朋友就明白，EXCEL格式的要求非常严格，如果没有设置好，将造成有些数据导入后为NULL。本工具己克服此问题。 by Why QQ:961138505 阅读全文
摘要：
不用手工增加栏目的列，也就是Column，由数据库的查询结果自动创建。用的是Delphi2010，安装了Dev，用CxGrid显示数据库查询结果。用什么控件没有关键，道理相同的。procedure TForm1.SpeedButton1Click(Sender: TObject);Var LCount,I:integer;begin ADOQuery1.Close; for I := 0 to Self.cxGrid1DBTableView1.ColumnCount- 1 do begin Self.cxGrid1DBTableView1.Columns[i].Destroy;... 阅读全文
摘要：
用Delphi进行开发的，直接修改注册表，需重启电脑后才生效procedure TForm1.SpeedButton3Click(Sender: TObject);var reg:TRegistry; IP,WG,ZY:array [0..255] of char; ID,CardNum:string; Psize:Dword; DNS:string;begin reg:=TRegistry.Create; name:=''; reg.RootKey:=HKEY_LOCAL_MACHINE; ID:=RGcardList.Items.Strings[RGCardList.it. 阅读全文
摘要：
一个客户，用的是U６版本，想将己使用的账套的科目导入新建的账套中，本想用用友本身自带的总账工具导入，发现导不了。没办法，只能打开数据库，手工导入。月末结账时，发现对账不平。问题是余额表与明细不平，大概是导入的问题，因为科目是导入的，所以有些数据段错了。不多说，自己研究去。于是便用上了我的工具。注明：本工具用于修改账套中会计科目中某字段的出错，而造成对账不平。完工，重新对结，正确。 阅读全文