Ｐａｇｅ 377 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼パスワード入力フォーム作成 kochan 03/9/17(水) 9:22 ┗Re:パスワード入力フォーム作成 かみちゃん 03/9/17(水) 22:23 ┗Re:パスワード入力フォーム作成 kochan 03/9/18(木) 10:56 ─────────────────────────────────────── ■題名 ： パスワード入力フォーム作成 ■名前 ： kochan ■日付 ： 03/9/17(水) 9:22 -------------------------------------------------------------------------
| Accessバージョン：Access2000 OS：WindowsXP はじめまして、カキコしたkochanと申します。 2ヶ月前からAccessを勉強しました。今、サッカー 関連で住所録を作成しております。 パスワード管理フォームを作成したいですが、まず、 下記のパスワード用テーブルを作成しました。 テーブル名：password ---------------------------- ID ログイン名 password ---------------------------- 1 f3 11 2 d1 12 3 r1 13 4 f4 14 Private Sub ボタン_Click() 'ログインボタン If IsNull(Forms!ログイン名とpassword入力画面!テキスト0.Value) Or _ IsNull(Forms!ログイン名とpassword入力画面!テキスト1.Value) Or _ IsNull(Forms!ログイン名とpassword入力画面!テキスト2.Value) Then MsgBox "統一IDとパスワードを入力して下さい", vbExclamation, "注意" ElseIf Forms![ログイン名とpassword入力画面]![テキスト0] = _ [password情報]!ログイン名 And _ Forms![ログイン名とpassword入力画面]![テキスト1] = _ [password情報]!password And _ Forms![ログイン名とpassword入力画面]![テキスト2] = _ Forms![password情報]![テキスト1] Then DoCmd.OpenForm "住所録画面1" DoCmd.Close "ログイン名とpassword入力画面" Else MsgBox "ログイン名かpasswordが間違えています。", vbCritical, "警告" End If End Sub 1.ログイン名用のテキスト入力、パスワード入力用テキスト入力、パスワード確 認用テキスト入力とテキストボックスを貼り付けました。 2.全部、空白にしたら、"ログイン名とパスワードを入力して下さい"とメッセー ジが出ます。 ⇔これはうまくいきました。Or演算子とIsNullを使った。 3.ログイン名：f3 パスワード：11 パスワード確認：11で住所録画面1が出るよ うにしたい。これを試したら指定した式で参照されているフィールドが見つか りませんとエラーが出てしまいました。 ⇔どこか間違えているのでしょうか？テーブル名：passwordとテキスト入力 内容が一致すれば、住所録画面1を表示したいのですが、何回やり直しても よくわからないので、どなたか指摘していただければ幸いです。お願いし ます。他にも書き方があるのであれば教えて下さい。 |
| ▼kochan さん： こちらで解決済みのようですね。 http://ws.31rsm.ne.jp/~pension/cgi-bin/otasuke/flashbbs.cgi?id=&md=set&tn=3886 早く知りたい気持ちはお察ししますが、マルチポストは一般的にはマナー違反と言われます。 |
| ▼皆様： 皆様、解決できました。 かみちゃんへ、 大変、失礼しました。マナー違反のようでしたら、申し訳ありません。 ただ、いろんな方のVBAプログラムセンスの情報を集めて、自分のもの にするのも大事だと思っていますね。 |