FTPCreateDirectory

Example of FTPCreateDirectory

const service_ftp=1
const open_type_direct=1
const ftp_transfer_type_ascii=1

'Extern is a QuickTest object to declare an external functions

Extern.Declare miclong, "InternetOpen", "wininet.dll", "InternetOpenA",_ micString, micDWord, micString, micString, micDWord
Extern.Declare miclong, "InternetConnect", "wininet.dll", "InternetConnectA",_ micLong, micString, micInteger, micString, micString, micDWord, micDWord,_ micDWord
Extern.Declare Bool,"FtpCreateDirectory","wininet.dll","FtpCreateDirectoryA",_ micLong, micString
Extern.Declare micinteger, "InternetCloseHandle", "wininet.dll",_ "InternetCloseHandle", miclong

hnd_internet=Extern.InternetOpen("QTP_FTP", open_type_direct, vbnullchar,vbnullchar,0)

if hnd_internet=0 then
msgbox "Connection is Failed - 1"
Else
msgbox "Connection is Successful - 1"
End if

hnd_connection=Extern.InternetConnect(hnd_internet, "ftp.dummy.co.in", 21,"username","passss",1,0,0)

If hnd_connection=0 then
msgbox "Connection is Failed"
Else
msgbox "Connection is Successful"
End If

Extern.FtpCreateDirectory hnd_connection, "/tmp/new_dir2"

Extern.InternetCloseHandle(hnd_connection)
Extern.InternetCloseHandle(hnd_internet)

FtpCreateDirectory Creates a new directory on the FTP server. First parameter is the handle to the ftp connection and second parameter is the name of the directory to be created.

Also See:
QTP FTP Main Post
FTP InternetOpen
FTP InternetConnect
FTPGetFile
FTPPutFile
FTPOpenFile
FTPSetCurrentDirectory
FTPRenameFile
FTPRemoveDirectory
FTPDeleteFile