Question

按键精灵代码，检测无错，但是没有效果，帮忙看看。

代码

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
Delay 1000
For i = 1 To N
j = i + 1
If (fso.FolderExists("C:\Users\米多多\Desktop\" & j & "")) Then
Delay 1000
Call Plugin.File.CopyFile("C:\Users\米多多\Desktop\jsadfk.bat", "C:\Users\米多多\Desktop\" & j & "\主图\jsadfk.bat")
Delay 1000
End If
//下面那一句是一行
Next

为什么没有效果。

Answer 1

因为N没有赋值，所以就成了循环1到0，也就是循环0次，怎么会有效果，另外你这代码我看晕了，具体所需功能是什么啊，为什么貌似很简单的东西被你搞复杂了，还有就是IF后面的代码根本没写明白判断，写了一串代码根本没有判断，就根本单纯的写了1234一样，根本没给1234加上大于小于什么或者等于不等于什么。