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 user@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!

ExecCmd("blat .\prodapp.txt -s " & chr(34) & "Product Info " & chr(34) & "-t
user@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 <scrooge@noemail.net> wrote in message
news:u1HgSzEuDHA.3496@TK2MSFTNGP11.phx.gbl...[color=blue]
>
>
> 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 user@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![/color]

>I have an asp page that successfully writes out the form data to a text[color=blue]
>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 user@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[/color]

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

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 user@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!

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 <scrooge@noemail.net> wrote in message
news:e2i#DSGuDHA.3144@tk2msftngp13.phx.gbl...[color=blue]
>
> 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 user@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![/color]

> set stdout = wscript.stdout[color=blue]
> set shell = createobject("wscript.shell")[/color]

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/

Sorry, I need to read more carefully.