- 締切済み
アクセスで文字列の特定の文字の置換について…
アクセスで文字列の特定の文字の置換について… ------------------- m(__)m ------------------- 「Qメッセージ」を基に「Fメッセージ」があります。 Qメッセージに「ID, Msg_Taitoru, Msg_Txt, 顧客名, 郵便番号, 住所, 発送方法」などの各フィールドがあります。 FメッセージにはQメッセージの「DateTxt」の他に「非連 結のTxt_Msg」があり、その「Txt_Msg」にフォームの 開く時イベントで「QメッセージのMsg_Txt」のデータの文 字列を代入しています。 代入した文字列の特定の文字を「Qメッセージ」の各データ から置換えたいです。 文字列の特定の文字が[顧客名]・[郵便番号]・[住所]・[発 送方法など]です。 他のサイトを参考に自分なりにやって視たのですが…・ ------------------- m(__)m ------------------- Private Sub cmd_Msg_Click() Dim msg_bun As String msg.bun = Me.txt_Msg msg.bun = Replace(msg_bun, "[顧客名]", tName) tName = RTrim(DLookup([Txt_顧客名]).Value) msg = body.SendMail(msg_bun, "") End Sub コンパイルエラー: 引数は省略できません と出ます。 ---------------------------------------------- いつもお世話になるばかりですいません<m(__)m> ご教授よろしくお願い致します。
- みんなの回答 (1)
- 専門家の回答
みんなの回答
- imogasi
- ベストアンサー率27% (4737/17070)
もっと具体的にデータの情況をかけないのか。 テーブルかクエリがあって、それらは複数レコードがあって、各レコードで「顧客名」フィールドの文字列データがある。 同じルールで一斉に置換したい、ということか。 あるいはもうひとつの対応で置換したいのか。 顧客名を置換というのは考えにくいが? 顧客番号で他のテーブル(クエリ)からデータを引いてくるのではダメなのか。 SQLで言えばReplace 関数 http://homepage2.nifty.com/sak/w_sak3/doc/sysbrd/sq_kj07_2.htm や UPDATEもあるが?
お礼
どうもありがとう御座いました。
補足
ご回答頂き有難う御座います。m(__)m 説明不足ですいません。 --------------------<m(__)m>-------------------- メッセージテーブル: メッセージID ----------- 数値型(主キー) タイトル --------------- テキスト型 メッセージ ------------- メモ型 「メッセージテーブル」のデータ メッセージID タイトル メッセージ 1 タイトル1 …[顧客ID]…[商品名]… 2 タイトル2 …[顧客名]…[商品名]…[発送方法]… 3 タイトル3 …[顧客名]…[商品名]…[電話番号]… 4 タイトル4 …[顧客名]…[商品名]…[住所]……… ※ …は文字列です ------------------------------------------------ 顧客テーブル: 顧客ID ----------------- 数値型(主キー) 顧客名 ----------------- テキスト型 メッセージID ----------- 数値型 商品番号 --------------- 数値型 商品名 ----------------- テキスト型 郵便番号 --------------- テキスト型 住所 ------------------- テキスト型 発送方法 --------------- テキスト型 ・ ・ ------------------------------------------------ クエリメッセージ: メッセージID ----------- メッセージテーブル タイトル --------------- メッセージテーブル メッセージ ------------- メッセージテーブル 商品番号 --------------- 顧客テーブル 顧客ID ----------------- 顧客テーブル 顧客名 ----------------- 顧客テーブル 商品名 ----------------- 顧客テーブル 郵便番号 --------------- 顧客テーブル 住所 ------------------- 顧客テーブル 発送方法 --------------- 顧客テーブル ------------------------------------------------ 顧客テーブルを基に「単表形式」の顧客情報入力フォームがあります。 顧客情報フォームには 非連結のテキストBxs「Txt検索」と下記のコマンドボタンがあります。 cmd商品検索 ※ cmd顧客へのメッセージ1 ※クリック時に「メッセージID」に1を代入してフォームメッセージを開く cmd顧客へのメッセージ2 ※クリック時に「メッセージID」に2を代入 cmd顧客へのメッセージ3 ※クリック時に「メッセージID」に3を代入してフォームメッセージを開く cmd顧客へのメッセージ4 ※クリック時に「メッセージID」に4を代入してフォームメッセージを開く ・ ・ ------------------------------------------------ クエリメッセージを基に「単表形式」のフォームメッセージがあります。 「フォームメッセージ」には非連結のテキストBox「txt_Msg」とコマンドボタ ン「cmdメニューへ戻る」があり、フォームの開く時イベントで「メッセー ジ」の文字列が「txt_Msg」へ代入します。 ※「cmdメニューへ戻る」で「メッセージID」のデータを削除しています。 やりたい事 顧客情報フォームで顧客情報を入力して各「cmd顧客へのメッセージ」ボ タンをクリックした時に「フォームメッセージ」を開いて「txt_Msg」の 文字列の特定の文字を「顧客テーブル」のデータと置換えたいです。 この説明で解るでしょうか?