关于返回值问题

as86455011

Local $file[107] = ["acctres", "batmeter", "batt", "browseui", "bthci", "cabview", "cdfview", "certmgr", "cmdial32", "comdlg32", "compatUI", "comres", "console", "credui", "cryptui", "cscui", "dataclen", "deskadp", "deskmon", "deskperf", "devmgr", "dfrgres", "diskcopy", "dmdlgs", "dmdskres", "dpvoice", "dsquery", "dsuiext", "els", "filemgmt", "fldrclnr", "fontext", "gcdef", "gpedit", "hnetwiz", "hotplug", "hticons", "icmui", "ieaksie", "iernonce", "inetcplc", "input", "irclass", "keymgr", "mdminst", "modemui", "moricons", "msgina", "mshtml", "msident", "msieftp", "msoeres", "mstask", "mstscax", "mycomput", "mydocs", "netid", "netplwiz", "netshell", "newdev", "ntlanui2", "ntshrui", "occache", "odbcint", "printui", "quartz", "rasdlg", "regwizc", "remotepg", "scrobj", "sendmail", "shdoclc", "shdocvw", "shell32", "shimgvw", "shscrap", "srchui", "srclient", "srrstr", "sti_ci", "stobject", "sxs", "syncui", "syssetup", "tapiui", "tcpmonui", "themeui", "upnpui", "url", "urlmon", "user32", "wab32", "wab32res", "wabfind", "wabimp", "webcheck", "wiadefui", "wiashext", "winbrand", "wininet", "winsrv", "wsecedit", "wuapi", "wuaueng1", "wucltui", "wuweb", "zipfldr"]
For $dll In $file
        $123 = FileCopy("F:\winxp\I386\" & $dll & ".dl_", "g:\alloo")
Next
If $123 = 0 Then
        IniWriteSection("g:\123.ini", "dos", $dll)
EndIf


如何将没有复制的文件列出到123.ini里面呢？？

thesnow

Local $file[107] = ["acctres", "batmeter", "batt", "browseui", "bthci", "cabview", "cdfview", "certmgr", "cmdial32", "comdlg32", "compatUI", "comres", "console", "credui", "cryptui", "cscui", "dataclen", "deskadp", "deskmon", "deskperf", "devmgr", "dfrgres", "diskcopy", "dmdlgs", "dmdskres", "dpvoice", "dsquery", "dsuiext", "els", "filemgmt", "fldrclnr", "fontext", "gcdef", "gpedit", "hnetwiz", "hotplug", "hticons", "icmui", "ieaksie", "iernonce", "inetcplc", "input", "irclass", "keymgr", "mdminst", "modemui", "moricons", "msgina", "mshtml", "msident", "msieftp", "msoeres", "mstask", "mstscax", "mycomput", "mydocs", "netid", "netplwiz", "netshell", "newdev", "ntlanui2", "ntshrui", "occache", "odbcint", "printui", "quartz", "rasdlg", "regwizc", "remotepg", "scrobj", "sendmail", "shdoclc", "shdocvw", "shell32", "shimgvw", "shscrap", "srchui", "srclient", "srrstr", "sti_ci", "stobject", "sxs", "syncui", "syssetup", "tapiui", "tcpmonui", "themeui", "upnpui", "url", "urlmon", "user32", "wab32", "wab32res", "wabfind", "wabimp", "webcheck", "wiadefui", "wiashext", "winbrand", "wininet", "winsrv", "wsecedit", "wuapi", "wuaueng1", "wucltui", "wuweb", "zipfldr"]
For $dll In $file
        $123 = FileCopy("F:\winxp\I386\" & $dll & ".dl_", "g:\alloo")
                If $123 = 0 Then
                        IniWriteSection("g:\123.ini", "dos", $dll)
                EndIf
Next