[リストへもどる]
一括表示

投稿時間:2003/06/11(Wed) 00:28
投稿者名:たか!
Eメール:
URL :
タイトル:
Shell関数について
現在、Win98で使っているシステムがあるのですが
今度Win2000上で使用することになりました。
ところがひとつ問題がありまして、これまでメールを立ち上げるために
Shell("start.exe MailTo:xxxxx@xxxx.plala.or.jp?Subject=こんにちは")
という構文を使っていたのですが、
Win2000では”ファイルが無い”といわれてエラーとなります。
(確かにStart.exe無いんですよね・・・)
同様の処理はWin2000では無理なのでしょうか?
これ以外で同様の処理をさせる方法はあるのでしょうか?

おわかりの方、よろしくお願いいたします・・・

投稿時間:2003/06/11(Wed) 00:42
投稿者名:NAO★
Eメール:
URL :
タイトル:
Re: Shell関数について
> Shell("start.exe MailTo:xxxxx@xxxx.plala.or.jp?Subject=こんにちは")

start.exe の拡張子を取って実行してみてください。
(DIR と同じコマンドプロンプトの内部コマンドなので拡張子はいりません)

Shell("start MailTo:xxxxx@xxxx.plala.or.jp?Subject=こんにちは")

投稿時間:2003/06/11(Wed) 01:13
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: Shell関数について
下記ではどうでしょう。 WindowsXP・Windows98両方とも起動します。

Private Sub Command1_Click()
    Call Shell(Environ("ComSpec") & " /c start MailTo:vbrescue@po.bcap.co.jp?Subject=こんにちは")
End Sub

投稿時間:2003/06/11(Wed) 01:33
投稿者名:たか!
Eメール:
URL :
タイトル:
ありがとうございます
NAO★さん、花ちゃんさんありがとうございます。

拡張子を外して実行してみましたが、やはり同様のエラーが帰ってきました。
で、花ちゃんさんの方法でやってみると今度はうまくいきました。

いろいろなOSで使うにはこういう細かな部分の作り方は重要なんですね。
ついでなので、かつて挫折したメールの本文もVBから貼り付けられないかを
調べてみます。
大変参考になりました。ありがとうございました。<(_ _)>

投稿時間:2003/06/11(Wed) 02:21
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: 本文を添付する
Private Sub Command1_Click()
    Call Shell(Environ("ComSpec") & " /c start MailTo:vbrescue@po.bcap.co.jp?" & _
            "Subject=メール送信の件&Body=このようにすれば%0D%0A本文も添付できます。")
End Sub

%0D%0A は改行します。

でも文字数に制限がありますので実用性はあまりありませんね!

簡単な方法がないかなと思って調べていたら
MicroSoft CDO For Exchange 2000 Library を使えば簡単に送れました。

投稿時間:2003/06/12(Thu) 00:46
投稿者名:たか!
Eメール:
URL :
タイトル:
Re^2: 本文を添付する
以前もいろいろ調べていたんですが、
思うようにいかなかったので断念していたのです。
ま、これはクリップボードに本文をコピーさせて
メールだけ立ち上げて貼り付けるようにします。(無難ですが)


システム開発の仕事を辞めて他業種へ行くも
結局はそこでも過去の経験からシステム開発を頼まれる身の哀れ。(T_T)