| 
 
fbwolf 
初级用户
 
  
 
  
  
积分 56 
发帖 22 
注册 2006-12-13 
状态 离线
 | 
『楼 主』:
 文件夹中所有文件内容求和
 
使用 LLM 解释/回答一下
  
我的想法是 
LOG这个文件夹中有USER1——USER99的文件 
每个文件中都有不同的数据,每个文件中的数值相加,然后全部导入到FILES.TXT这个文件中, 
排列方式, 
为USER1 后面跟上这个文件中的和 
USER2 后面跟上这个文件中的和 
求高手设计 
 
    
 
  
 |   
 | 
  2007-2-5 03:15 | 
  
 | 
 | 
 
jmz573515 
银牌会员
 
     
 
  
 
积分 1212 
发帖 464 
注册 2006-12-13 
状态 离线
 | 
『第 2 楼』:
 
 
使用 LLM 解释/回答一下
  
用VBS写的,把下面的文件保存到LOG文件夹下。 
 
Set ws=CreateObject("wscript.shell") 
Set fso=CreateObject("scripting.filesystemobject") 
For i=1 To 99 
n=sam("user" & i) 
m=m & "user" & i & vbtab & n & vbcrlf 
Next 
Set file=fso.createtextfile("FILES.TXT") 
file.write m 
file.close 
ws.run "notepad.exe FILES.TXT" 
Function sam(a) 
Set file=fso.opentextfile(a) 
s=0 
Do While file.atendofstream<>true 
	h=file.readline 
	s=s+h 
loop 
file.close 
sam=s 
End Function 
  
 
    
 
  
 |   
 | 
  2007-2-5 03:57 | 
  
 | 
 | 
 
anqing 
高级用户
 
    
 
  
 
积分 859 
发帖 413 
注册 2006-8-14 
状态 离线
 | 
 | 
  2007-2-5 07:26 | 
  
 | 
 | 
 
fbwolf 
初级用户
 
  
 
  
  
积分 56 
发帖 22 
注册 2006-12-13 
状态 离线
 | 
 | 
  2007-2-5 08:30 | 
  
 | 
 | 
 
anqing 
高级用户
 
    
 
  
 
积分 859 
发帖 413 
注册 2006-8-14 
状态 离线
 | 
『第 5 楼』:
 
 
使用 LLM 解释/回答一下
  
有不同的文件,比如txt1-txt99 
这里指定了99个文件,也有可能不指定文件,比如一天生成一个txt文件 
比如,到今天已经有55个txt文件了,这55个txt文件中,含有数字和对应的名称 
比如:水电费:55.55 
         流动资金:56963 
这些都是当天存在txt文件中的。 
明天,还有类似的txt批处理生成 
,这个bat类似于set /p 请输入今天的水电费: 
楼主要求的是求和,我想说,能不能今天的减去昨天的,然后生成一个新的差的txt文件 
由于和楼主的想法有点类似,就在这帮顶和发了!!! 
 
    
 
  
 |   
 | 
  2007-2-5 09:30 | 
  
 | 
 | 
 
namejm 
荣誉版主
 
        batch fan
  
 
积分 5226 
发帖 1737 
注册 2006-3-10 来自 成都 
状态 离线
 | 
『第 6 楼』:
 
 
使用 LLM 解释/回答一下
  
  在没看到txt1——txt99的具体内容之前,写出的任何代码都是徒劳的,请楼主为写代码的人想一想。 
 
    
 
  
  |  
                  
  
                    尺有所短,寸有所长,学好CMD没商量。 
考虑问题复杂化,解决问题简洁化。 |   
 | 
  2007-2-5 11:32 | 
  
 | 
 | 
 
anqing 
高级用户
 
    
 
  
 
积分 859 
发帖 413 
注册 2006-8-14 
状态 离线
 | 
『第 7 楼』:
 
 
使用 LLM 解释/回答一下
  
1.txt 
内容如下: 
水电费:569 
合同金:658 
外援费:56666 
这是昨天的生成的,当然是由一个p生成的:这个bat类似于set /p 请输入今天的水电费: 
今天生成2.txt,内容如下: 
水电费:985 
合同金:985 
外援费:633336 
想让第二个txt减去第一个txt文件,重新生成一个差的txt 
但名称还用哪些 比如,生成的新的txt内容如下 
水电费:”这里是差“ 
依此类推,就是每一天减去前一天的数,生成一份新的报表 
 
    
 
  
 |   
 | 
  2007-2-5 11:57 | 
  
 | 
 | 
 
namejm 
荣誉版主
 
        batch fan
  
 
积分 5226 
发帖 1737 
注册 2006-3-10 来自 成都 
状态 离线
 | 
『第 8 楼』:
 
 
使用 LLM 解释/回答一下
  
Originally posted by anqing at 2007-2-4 22:57: 
但名称还用哪些 
   名称到底用的是什么?如果还使用1~99的话,那当天和上一天的文件如何确定?哎,问了半天都还在问条件,这个帖子挤一点,那个帖子吐一点,来来去去,解决一个问题恐怕得开个讨论会了——如果在下一个回帖中还没有完整的描述的话,我只好把这个帖子锁了。<img src="images/smilies/face-angry.png" align="absmiddle" border="0">  
 
    
 
  
  |  
                  
  
                    尺有所短,寸有所长,学好CMD没商量。 
考虑问题复杂化,解决问题简洁化。 |   
 | 
  2007-2-5 12:28 | 
  
 | 
 | 
 
anqing 
高级用户
 
    
 
  
 
积分 859 
发帖 413 
注册 2006-8-14 
状态 离线
 | 
『第 9 楼』:
 
 
使用 LLM 解释/回答一下
  
但名称还用哪些,是指: 
水电费: 
合同金: 
外援费: 
其实,就是一个算今天和昨天的差的p? 
就是今天的水电费-昨天水电费后,生成一个txt,里面两天的水电费的差,具体格式为: 
水电费:(这里今天-昨天的数字差) 
因为,每天都要输入一次当天的水电费,外援费等,这些都是每天必须产生的,目地是算一下,当天的支出。算法就是今天-昨天的支出,生成一个txt文件,方便打印。 
 
    
 
  
 |   
 | 
  2007-2-5 12:51 | 
  
 | 
 | 
 
anqing 
高级用户
 
    
 
  
 
积分 859 
发帖 413 
注册 2006-8-14 
状态 离线
 | 
 | 
  2007-2-5 23:48 | 
  
 | 
 | 
 
ccwan 
金牌会员
 
      
 
  
 
积分 2725 
发帖 1160 
注册 2006-9-23 来自 河北廊坊 
状态 离线
 | 
『第 11 楼』:
 
 
使用 LLM 解释/回答一下
  
建议用excel完成!简单、直接的攻击才是最好、最有效的攻击。 
 
    
 
  
  |  
                  
  
                    三人行,必有吾师焉。   学然后知不足,教然后知困,然后能自强也。 |   
 | 
  2007-2-5 23:54 | 
  
 | 
 | 
 
qingfushuan 
高级用户
 
    
 
  
  
积分 502 
发帖 327 
注册 2006-12-30 
状态 离线
 | 
 | 
  2007-2-6 00:52 | 
  
 | 
 | 
 
anqing 
高级用户
 
    
 
  
 
积分 859 
发帖 413 
注册 2006-8-14 
状态 离线
 | 
『第 13 楼』:
 
 
使用 LLM 解释/回答一下
  
这个p是有难度,还要计算时间,有时一月是30天,有时31天。 
主要是如何提取出前一天的txt,进行减差。 
 
    
 
  
 |   
 | 
  2007-2-6 00:54 | 
  
 | 
 | 
 
redtek 
金牌会员
 
      
 
  
  
积分 2902 
发帖 1147 
注册 2006-9-21 
状态 离线
 | 
『第 14 楼』:
 
 
使用 LLM 解释/回答一下
  
帮 anqing 兄到某个帖子上找了一段儿:) 
(存成 例如: GDATE.VBS 文件)
  
wscript.echo dateadd("d",-7,date) 
 
上面是取7天前的日期(论坛检索中可以找到原帖)
 
如果兄要提取1天前的日期,就把7改为1即可~:)
 
执行调用方法:   CSCRIPT   GDATE.VBS
 
也可以在 FOR 中调用上面指令:) 
CSCRIPT是VBS脚本解释器:)  
 
    
 
  
  |  
                  
  
                        Redtek,一个永远在网上流浪的人…… 
 
_.,-*~'`^`'~*-,.__.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._,_.,-*~'`^`'~*-,._ |   
 | 
  2007-2-6 01:19 | 
  
 | 
 | 
 
anqing 
高级用户
 
    
 
  
 
积分 859 
发帖 413 
注册 2006-8-14 
状态 离线
 | 
 | 
  2007-2-6 02:12 | 
  
 |