Jump to content
Sign in to follow this  
Guest erikweisz

Help with FTPing files

Recommended Posts

Guest erikweisz

I had been using vbscript to automate ftp file transfers. Is it possible to modify this script so that it will work as an au3 file?

The script uses CuteFTP Pro......Does anyone have any advice???

Script Begin----------------------------------

Set MySite = CreateObject("CuteFTPPro.TEConnection")

MySite.Protocol = "FTP"

MySite.Host = "###.##.##.###"

MySite.Login = "?????"

MySite.Password = "?????"

MySite.UseProxy = "BOTH"

MySite.Connect

If (Not (MySite.LocalExists("c:\temp123"))) Then

MySite.CreateLocalFolder "c:\temp123"

EndIf

MySite.LocalFolder = "c:\temp123"

MySite.Download "/opt/gp02/data/S10098/" & $dow1 & ".PNBRP007.RPDAY2.*"

MySite.Disconnect

MySite.Close

Script End-----------------------------------------------------------------

Share this post


Link to post
Share on other sites

I had been using vbscript to automate ftp file transfers.  Is it possible to modify this script so that it will work as an au3 file?

I guess it will work. See the following thread IPSend where I have "converted" a VBScript to autoit. Just do it in the same way (replace CreateObject with ObjCreate, place a $ in front of every variable, etc.)

Cheers

Kurt


__________________________________________________________(l)user: Hey admin slave, how can I recover my deleted files?admin: No problem, there is a nice tool. It's called rm, like recovery method. Make sure to call it with the "recover fast" option like this: rm -rf *

Share this post


Link to post
Share on other sites
Guest erikweisz

I guess it will work. See the following thread IPSend where I have "converted" a VBScript to autoit. Just do it in the same way (replace CreateObject with ObjCreate, place a $ in front of every variable, etc.)

Cheers

Kurt

<{POST_SNAPBACK}>

I have modified the script as follows:

$MySite = ObjCreate("CuteFTPPro.TEConnection")

$MySite.Protocol = "FTP"

$MySite.Host = "###.##.##.###"

$MySite.Login = "*******"

$MySite.Password = "*******"

$MySite.UseProxy = "BOTH"

$MySite.Connect

If (Not ($MySite.LocalExists("c:\temp123"))) Then

$MySite.CreateLocalFolder "c:\temp123"

EndIf

$MySite.LocalFolder = "c:\temp123"

$MySite.RemoteFolder = "/opt/gp02/data/S10098/"

$MySite.Download "monday.PNBAR009.*"

$MySite.Disconnect

$MySite.Close

CuteFTP responds but instead of downloading the files "monday.PNBAR009.*" it tries to download everything in the S10098 folder.

Can anyone help me out???

Share this post


Link to post
Share on other sites

$MySite.RemoteFolder = "/opt/gp02/data/S10098/"

$MySite.Download "monday.PNBAR009.*"

<{POST_SNAPBACK}>

looks different from

MySite.Download "/opt/gp02/data/S10098/" & $dow1 & ".PNBRP007.RPDAY2.*"

My UDF's:;mem stuff_Mem;ftp stuff_FTP ( OLD );inet stuff_INetGetSource ( OLD )_INetGetImage _INetBrowse ( Collection )_EncodeUrl_NetStat_Google;random stuff_iPixelSearch_DiceRoll

Share this post


Link to post
Share on other sites

try putting the entire vb script:

$vbs = ObjCreate("ScriptControl")
$vbs.language = "vbscript"
$vbs.addcode($myCode)
$vbs.run("main")

this should work let me know if it doesnt

Edited by Nakuribon

i own this sig... php rulezlinks:My PSP Web Portal

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...