by Martin Anbu Selvan (18 Submissions)
Category: Miscellaneous
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 14th May 2004
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
This program sends the information(files)from ur system into the floppy disk.(This works perfectly)
API Declarations
hwnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Long
hNameMappings As Long
lpszProgressTitle As Long
End Type
Private Declare Function SHFileOperation Lib _
"shell32.dll" Alias "SHFileOperationA" _
(lpFileOp As SHFILEOPSTRUCT) As Long
Private Const FO_MOVE = &H1
Private Const FO_COPY = &H2
Private Const FOF_SILENT = &H4
Private Const FOF_RENAMEONCOLLISION = &H8
VBcoders
Dim ShellCall As SHFILEOPSTRUCT
ShellCall.hwnd = hwnd
ShellCall.wFunc = FO_COPY
ShellCall.pFrom = "c:\dir\anypath.txt" 'any location which can be made manually 'or by browsing,source path (take care that the file must exist)
ShellCall.pTo = "a:\"'-destination path
ShellCall.hNameMappings = 0
Call SHFileOperation(ShellCall)
End Sub
No comments have been posted about This program sends the information(files)from ur system into the floppy disk.(This works perfectly). Why not be the first to post a comment about This program sends the information(files)from ur system into the floppy disk.(This works perfectly).
