Copy File Using Fso Vb6

Posted in: admin20/10/17Coments are closed

An indepth look at VB6s objectoriented file access and management system, called File System Objects FSO. I am using the code below to export a recordset to a csv file. It works but there are a few problems. Firstly, I would like to do the export without using. Vbscript to zip files in a folder VBScript. Hi All,I am looking for a vb script with following requirement It should compress the files in a folder with extension xml as a zip folder. Any sub folders within the folder should not be consideredSo compressed folder should have the current date as its name. I dont want any third parties to be used. I am using windows 2. Server and the script should work fine in this server. Any help is greatly appreciatedSet FSO Create. ObjectScripting. File. System. Object. I dont understand why this isnt working, it works fine in my other script. Set FSO Create. ObjectScripting. File. System. ObjectI am also declaring the following below Set wsh. Network Create. ObjectWScript. NetworkSet obj. Shell Create. ObjectWScript. ShellSet ADSys. Info Create. ObjectADSystem. InfoSet Current. User Get. ObjectLDAP  ADSys. Info. User. Namestr. World Harest Game 3. Groups LCaseJoinCurrent. User. Member. OfSet Check. Drive wsh. Network. Enum. Network. Drives.