I need two functions completed. The first function is the file information. For this one, the parameter would be the path of the file. Then it will return the entire contents, even if its binary like .gif, .jpg, etc. Then I need another function which is the file save function. For this one, the 2 parameters would be path and file contents. For this example, I want it where a person chooses a file. Then after going through the functions, it would then create a file called the same as the one chosen except it would have a 2 for example instead of just the name of the file. For me to accept the project, after running, I must be able to afterwards, open the files in the program associated with the file and be able to view it successfully. Using filecopy commands or using FSO is not acceptable for this project. I know it would be faster but that is not possible because I would use this to first get the file information, TCP the file to the server, then the server would then read the contents and save it to a file. Probably the file has to be opened as binary. I do not know how to capture the contents. That is what is needed.
## Deliverables
The project that shows how to capture the contents of a file then save it as another file by reading the actual file, saving it into a variable, then putting that information into another file which can be used for transmitting the information between computers on the internet instead of the local network. Updated information: The format the data must be in is one where if sent even if there is other information as well, the file will be read properly. Here is an example of what I mean Function filedata() filedata=newfile end function sub main [login to view URL] "f" & chr(0) & filedata & chr(0) & filename & ".." end sub event dataarrival [login to view URL] strdata dim whatorders as variant whatorders=split(strdata, chr(0)) select case whatorders(0) case "f" enternewfile whatorders(2), whatorders(3) end select end sub function enternewfile(filedata, filename) 'create file newpath="c:\" & filename enternewfile=true end function It should work as simply as this without corruption even if encryting needs to be used.
## Platform
Windows 98, Windows 2000, Windows XP