作者:乔山办公网日期:
返回目录:office365
程序是我自己编写的,必须要安装在foxpro 6.0下运行
运行的目标盘,必须要有1GB的剩余空间
8347680条记录的dbf文件可不小约580MB
我的格式是这样的
第一个是01,zhidao02,03,04,05,06,07
最后一个是30,31,32,33,34,35,36
结果太大有8347680种可能
如果需要排序,则还需要再等3,4个小时...
如果只要计算,15分钟之内解决!
你可以留下email
压缩后的dbf文件才11MB
程序我就不给你了
留下email,我将dbf的结果发给你
注意:附件一回定要大于11MB的哦
例如:雅虎答邮箱!
雅虎邮箱不行的虽然支持11MB的附件,但它神经过敏,居然将该文件视为计算机病毒,我晕!
不过也太夸张了,一个580MB的文件压缩后居然只有11MB!
也可以看我的个人博客
http://hi.baidu.com/qkldhyb
第一篇文章
算法是不难 但是这些数字都太大了
我曾经写过 到9个数的排列的时候就已经报内存溢出了
如果实在要写的话 估计需要配合数据库使用 不然内存不够存
哪个来连接如自果不行,请用这百个连接度 http://d.namipan.com/d/f41481587bca0188eda91e4037f6e716c120c9fe9d390400
可以百的,度用Excel的专VBA做。属
Sub try()
Dim i1 As Integer, i2 As Integer, k As Integer
k = 1
For i1 = 1 To 25
For i2 = i1 + 1 To 26
Range("A" & k) = i1 & "," & i2
k = k + 1
Next i2
Next i1
End Sub