ASP Page emailing text file

[Porky]

I have an asp page that successfully writes out the form data to a text
file. I would like to use Blat (or other free email utility) to send
the contents of the text file to a user. The code to email is as
follows:

Dim stdout, shell, cmd
function ExecCmd(cmdline)
set stdout = wscript.stdout
set shell = createobject("wscript.shell")
set cmd = shell.Exec(cmdline)
do until cmd.status=1: wscript.sleep 5:loop
ExecCmd = cmd.stdout.readall
End Function

ExecCmd("blat .\prodapp.txt -s "Product Info" -t us**@domain.com")

I am guessing that it may not like the two sets of double quotes. Is it
possible to do this? The company is not willing to spend $$$$$ on
actual sendmail package. Any help on cleaning this up would be much
appreciated

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

[Steven Burn]

ExecCmd("blat .\prodapp.txt -s " & chr(34) & "Product Info " & chr(34) & "-t
us**@domain.com")
--

Regards

Steven Burn
Ur I.T. Mate Group
www.it-mate.co.uk

Keeping it FREE!

Disclaimer:
I know I'm probably wrong, I just like taking part ;o)
Porky <sc*****@noemail.net> wrote in message
news:u1**************@TK2MSFTNGP11.phx.gbl...

I have an asp page that successfully writes out the form data to a text
file. I would like to use Blat (or other free email utility) to send
the contents of the text file to a user. The code to email is as
follows:

Dim stdout, shell, cmd
function ExecCmd(cmdline)
set stdout = wscript.stdout
set shell = createobject("wscript.shell")
set cmd = shell.Exec(cmdline)
do until cmd.status=1: wscript.sleep 5:loop
ExecCmd = cmd.stdout.readall
End Function

ExecCmd("blat .\prodapp.txt -s "Product Info" -t us**@domain.com")

I am guessing that it may not like the two sets of double quotes. Is it
possible to do this? The company is not willing to spend $$$$$ on
actual sendmail package. Any help on cleaning this up would be much
appreciated

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

[Jeff Cochran]

>I have an asp page that successfully writes out the form data to a text

file. I would like to use Blat (or other free email utility) to send
the contents of the text file to a user. The code to email is as
follows:

Dim stdout, shell, cmd
function ExecCmd(cmdline)
set stdout = wscript.stdout
set shell = createobject("wscript.shell")
set cmd = shell.Exec(cmdline)
do until cmd.status=1: wscript.sleep 5:loop
ExecCmd = cmd.stdout.readall
End Function

ExecCmd("blat .\prodapp.txt -s "Product Info" -t us**@domain.com")

I am guessing that it may not like the two sets of double quotes. Is it
possible to do this? The company is not willing to spend $$$$$ on
actual sendmail package. Any help on cleaning this up would be much
appreciated

Escape the double quotes by doubling them. Or use an ASP method to
send the info without going to the trouble of writing a text file.

Jeff

[Porky]

I have modified the asp code as suggested. Now, when I run it, I get
"Microsoft VBScript runtime (0x800A01A8) Object required: 'wscript' " on
line 61 which is

set stdout = wscript.stdout

in the code
Dim stdout, shell, cmd
function ExecCmd(cmdline)
set stdout = wscript.stdout
set shell = createobject("wscript.shell")
set cmd = shell.exec(cmdline)
do until cmd.status = 1: wscript.sleep 5: loop
ExecCmd = cmd.stdout.readall
End Function

ExecCmd (".\blat.exe .\prodapp.txt -s " & chr(34) & "Product
Application Form" & chr(34) & " -t us**@userdomain.com")

I know I am hitting all around the mark, but haven't quite got it. The
answer is probably painfully obvious as well.

Thanks for the help
*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

[Steven Burn]

thats because your trying to use it before it's been created.

--

Regards

Steven Burn
Ur I.T. Mate Group
www.it-mate.co.uk

Keeping it FREE!

Disclaimer:
I know I'm probably wrong, I just like taking part ;o)
Porky <sc*****@noemail.net> wrote in message
news:e2**************@tk2msftngp13.phx.gbl...

I have modified the asp code as suggested. Now, when I run it, I get
"Microsoft VBScript runtime (0x800A01A8) Object required: 'wscript' " on
line 61 which is

set stdout = wscript.stdout

in the code
Dim stdout, shell, cmd
function ExecCmd(cmdline)
set stdout = wscript.stdout
set shell = createobject("wscript.shell")
set cmd = shell.exec(cmdline)
do until cmd.status = 1: wscript.sleep 5: loop
ExecCmd = cmd.stdout.readall
End Function

ExecCmd (".\blat.exe .\prodapp.txt -s " & chr(34) & "Product
Application Form" & chr(34) & " -t us**@userdomain.com")

I know I am hitting all around the mark, but haven't quite got it. The
answer is probably painfully obvious as well.

Thanks for the help
*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

[Aaron Bertrand [MVP]]

> set stdout = wscript.stdout

set shell = createobject("wscript.shell")

I think you need to change the order of these two lines. How can you grab a
property from an object you haven't yet created?

--
Aaron Bertrand
SQL Server MVP
http://www.aspfaq.com/

[Aaron Bertrand [MVP]]

Sorry, I need to read more carefully.