みなさま、Resありがとうございます。

にしやんさんのご指導の通り記述したところ、正常に動作いたしました。
本当にありがとうございます。この方法を使うことでクライアントの環境等
あまり意識することなく、また、PB側でも複雑なスクリプトを必要としない為
とても便利だと思います。
今後ともご指導よろしくお願いいたします。

＞外部関数
＞FUNCTION String SendMail(REF Long szServer,REF Long szTo,REF Long szFrom,REF Long szSubject,&
＞　　　　REF Long szBody,REF Long szFile) LIBRARY \"BSMTP.DLL\"
＞FUNCTION Long lstrcpyn(REF String dst, REF String src, Long length) &
＞　　　　LIBRARY \"KERNEL32.DLL\" ALIAS FOR \"lstrcpynA\"
＞
＞スクリプト
＞//変数宣言
＞String szServer,szTo,szFrom,szSubject,szBody,szFile
＞Long lpszServer,lpszTo,lpszFrom,lpszSubject,lpszBody,lpszFile
＞String ErrorMessage
＞
＞//引数セット
＞szServer = \"SMTPサーバのアドレス\"
＞szTo = \"宛先メールアドレス\"
＞szFrom = \"送信元メールアドレス\"
＞szSubject = \"件名\"
＞szBody = \"本文\"
＞szFile = \"添付ファイル名\"
＞
＞//引数のポインタ値取得
＞lpszServer = lstrcpyn(szServer,szServer,0)
＞lpszTo = lstrcpyn(szTo,szTo,0)
＞lpszFrom = lstrcpyn(szFrom,szFrom,0)
＞lpszSubject = lstrcpyn(szSubject,szSubject,0)
＞lpszBody = lstrcpyn(szBody,szBody,0)
＞lpszFile = lstrcpyn(szFile,szFile,0)
＞
＞//メール送信処理
＞ErrorMessage = SendMail(lpszServer,lpszTo,lpszFrom,lpszSubject,lpszBody,lpszFile)
＞IF ErrorMessage = \"\" THEN
＞　　MessageBox(\"送信成功\",\"送信成功\")
＞ELSE
＞　　MessageBox(\"送信失敗\",ErrorMessage)
＞END IF
＞