DBの検索を以下のロジックでレコードを検索したが、新規(登録)、修正(更新)、削除のロジック・サンプルがほしい。
レコード項目は、ユーザーID(キー)、氏名カナ、氏名漢字の3項目のみのDB(アクセス)です。
MDB_Open
Dim rsUserMst1 As ADODB.Recordset
Dim Userselect As String
Userselect = "Select * From UserMst
Where U_Userid = '" & W_UserID & "'"
Set rsUserMst1 = New ADODB.Recordset
rsUserMst1.Open Userselect, cn, adOpenKeyset
W_UserKana = rsUserMst1!U_Userkana
W_UserName = rsUserMst1!U_UserName
以上
No.1ベストアンサー
- 回答日時:
下のサイトにADOとDAOのサンプルがありますよ。
http://homepage1.nifty.com/tsware/labo/labo_23.htm
参考URL:http://homepage1.nifty.com/tsware/labo/labo_23.htm
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
[VBA] ADOの Clone と AddNew
-
カレントレコードが無い事を判...
-
Access でレコードセレクタが押...
-
Line Inputで文字化け(助けて...
-
差し込み印刷のレコード数について
-
レコードセット(ADO.Recordset)...
-
レコードが存在しなかった場合
-
サブレンジ分割されたNDB(富士...
-
固有レコード識別子の選択とは
-
アクセスでレポートの1印刷内...
-
Excel VBA読み込みで文字化けが
-
ACCESSで大量の更新を行うと「...
-
ADO VBA 実行時エラー3021
-
VB6.0のIsNull関数に相当するもの
-
VBAで制御コード付きテキストフ...
-
ファイル書込みで一行もしくは...
-
[VB6]プログレスバーコントロー...
-
SQL文で右から1文字だけ削除す...
-
DATE型にNULLをセットするには?
-
【SQL】existsでの商演算
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ADO VBA 実行時エラー3021
-
レコードが存在しなかった場合
-
カレントレコードが無い事を判...
-
ファイル書込みで一行もしくは...
-
アクセスでレポートの1印刷内...
-
差し込み印刷のレコード数について
-
DataGridViewの、選択されてい...
-
レコードセット(ADO.Recordset)...
-
DataGridViewの内容をDBに反映...
-
Access でレコードセレクタが押...
-
固有レコード識別子の選択とは
-
Access を×ボタンで閉じ...
-
[VBA] ADOの Clone と AddNew
-
ACCESSで大量の更新を行うと「...
-
データセットのレコード更新が...
-
ワードの差込印刷で教えて下さ...
-
ヘッダレコードとトレーラレコ...
-
JSPのNULLレコード表示について...
-
サブフォームに新規レコードを...
-
VB6.0のIsNull関数に相当するもの
おすすめ情報