Fill In File Input Field with VBscript

[Thenolos]

Hello,

I'm creating an application that logs on to a website and files paperwork with that website automatically. Everything is going peachy with the exception of uploading my PDF documents to the site (one of the final stages). I know the direct file location to the PDFs and want to have that location placed in the "Choose file:" field on the website.

Unfortunately the File input type does not work the same way as a normal text box... so something like this:

With obIE.Document.Frames("main").Document
    .all.Item("file_1").Value = "c:\file.pdf"
End With

will not work...

Does anybody have any ideas of how I might do this without using SendKeys?

Thanks for any help.

 

[markdmac]

Take a look at this code for uploading files:

http://www.asp101.com/articles/jacob/scriptupload.asp

I hope you find this post helpful.

Regards,

Mark

 

[Thenolos]

Thanks for your reply, Mark, but It's not quite what I am looking for. I do not control the website that I am uploading to, I am merely creating an application that runs throught the filing process on a website we subscribe to.

Near the end of the filing process, I need to upload a PDF document to the website. My initial thought was to just do something like:

With obIE.Document.Frames("main").Document
    .all.Item("file_1").Value = "c:\file.pdf"
    .Forms(0).Submit
End With

The idea is to fill in the textbox with the file path and then simulate a click on the submit button. However setting the inputs value to the path name has no effect--the value remains null, though no error is thrown at me.

So I need to find a way to fill in that field without resorting to SendKeys..

 

[markdmac]

Are you able to view the form properties?

I hope you find this post helpful.

Regards,

Mark

 

[Thenolos]

Link

Finally found someone asking the same question on Google... doesn't look good for me. Makes sense thought... Looks like I get to break my rule of no SendKeys. Yay.

Thanks for the help though. Sorry to waste your time.

 

[tsuji]

File type input value is readonly for security reason.

 

[Thenolos]

For anyone who may need to do this in the future that searches and finds this thread... the SendKeys workaround is simple... I just have a natural bias against it.

I just stuck this in after the code that navigated me to the proper page. The file field was the first on the page... you may need to send the tab button a few times if the webpage is filled out differently.

Dim obShell As Object
Set obShell = CreateObject("WScript.Shell")
obShell.SendKeys "c:\hello.txt"

 

[tsuji]

Value property for type="file" is read-only for security reason.

http://msdn.microsoft.com/library/d...author/dhtml/reference/properties/value_6.asp

 

[markdmac]

Make sure you use app.activate when using sendkeys to ensure your focus is on the desired application.

I hope you find this post helpful.

Regards,

Mark