Code

Re: Question regarding XDocument.SaveAs process.

zacharybrown — Fri, 29 Oct 2010 17:49:03 GMT

Potemkine, nevermind my last response, that was for the other forum, I got them mixed up, my mistake.

Re: Question regarding XDocument.SaveAs process.

zacharybrown — Fri, 29 Oct 2010 17:41:44 GMT

Potemkine, actually, that part is still okay, I misspoke, the portion the server isn't accepting is the actual element. In other words Acme Buyer Co isn't being recognized. Thanks!

Re: Question regarding XDocument.SaveAs process.

Potemkine — Fri, 29 Oct 2010 17:33:40 GMT

That's a little weird, can you test to save somewhere else after your save it , just to see if your xml was up to date.

after

XDocument.SaveAs(txtPath & sfileCode & txtTimestamp & txtName & txtext)

add:

XDocument.SaveAs("ANOTHERPATH" & txtName & txtext)

Re: Question regarding XDocument.SaveAs process.

zacharybrown — Tue, 26 Oct 2010 19:34:32 GMT

Hi Potemkine, that was my line of thought as well however, with every test I've run, the order does not clear the ftp site until I've closed the form.

Re: Question regarding XDocument.SaveAs process.

Potemkine — Tue, 26 Oct 2010 17:50:42 GMT

Hi, your form is save before your message is displayed so if your end user select yes or no, it doesn't matter.

Question regarding XDocument.SaveAs process.

zacharybrown — Tue, 26 Oct 2010 17:42:13 GMT

I'm currently running IP 2003 and using VBS Script. I have the following VBS code in my form activated OnClick. It works well, but if the end-user selects "Yes" (as shown in code below - which is necessary) my server won't process the xml file until the current user closes the form. Is there a way to modify this code to allow the form to be pushed thru without having to close the file? Thanks in advance.

Dim txtPath
Dim txtName
Dim sfileCode
Dim txtTimestamp
Dim txtext

Dim myvar txtPath = myserverunc
sfileCode = XDocument.DOM.selectSingleNode("SMSBroker/Order/File/EscrowOfficer_EmplSysId").text
txtTimestamp = Hour(Now)&Minute(Now)&Second(Now)
txtName = "NewOrder"
txtext = ".xml"

XDocument.SaveAs(txtPath & sfileCode & txtTimestamp & txtName & txtext)

myvar = MsgBox ("Your order has been submitted! To enter another order using the same information click Yes, to close the form No. NOTE: If you need to make changes, please contact the CTC Order Entry Dept at neworders@ctitle.com.", vbYesNo + vbInformation + vbDefaultButton2, "Submit Order")
If myvar = vbYes
Then

Else
XDocument.View.Window.Close(true)
End If
End Sub