tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトル検索方法
記事No6672
投稿日: 2007/12/14(Fri) 17:29
投稿者ひろりん
いつも参考にしています。

ずっと悩んでいるのでご教授くださると助かります。
VB2005で自力でログイン画面を作成しています。
Formで入力した社員コード(Textbox1)パスワード(textbox2)が
access2000のテーブル(member)に登録されているデータと一致したら
ログインできるようにしたいです。

フォームを開くときのコード
Private Sub Form2_Load.....
Dim dset As DataSet = New DataSet("member")
Dim cn As System.Data.OleDb.OleDbConnection=NewSystem.Data.OleDb.OleDbConnection()
cn.ConnectionString = "Provider=Microsoft.jet.OLEDB.4.0;" & "Data Source=n:\a.mdb;"
cn.Open()
Dim dadp As OleDb.OleDbDataAdapter
dadp = New OleDb.OleDbDataAdapter("SELECT * FROM member", cn)
dadp.Fill(dset, "syainco")

ログインボタンを押したときのコード
Private Sub Button1_Click.......
Dim criteria As String
If TextBox1.Text = "" Then
   msgBox("社員番号を入力してください。")
   TextBox1.Focus()
  Else
   If TextBox2.Text = "" Then
      MsgBox("パスワードを入力してください。")
      TextBox2.Focus()
   End If
End If
criteria = "社員番号 = '" & TextBox1.Text & "'"

ここで詰まってしまいました。
いろいろ探しておりますが見つからないので質問しました。
よろしくお願いします。

[ツリー表示へ]
タイトルRe: 検索方法
記事No6674
投稿日: 2007/12/14(Fri) 18:05
投稿者るしぇ
処理の順番を変えて、入力後に社員番号を WHERE(条件)句に含めた
SQL文で Fill してパスワードを取得して比較してもいいし、
社員番号とパスワードを WHERE(条件)句に含めた SQL文でレコード
件数が0かどうかで判断してもいいし、

今のまま、社員番号とパスワードを全て取得した中から探すなら、
データテーブルのレコードを1件1件比較してもいいし、
『DataTable フィルタ』などのキーワードで WEB 検索すれば簡単に見つかりますが、
[DataTable.Select メソッド]
http://msdn2.microsoft.com/ja-jp/library/system.data.datatable.select(VS.80).aspx
とか、
[DataView メンバ]
http://msdn2.microsoft.com/ja-jp/library/system.data.dataview_members(VS.80).aspx
を利用した編集とか。

サンプルコードもたくさん見つかりました。。。

[ツリー表示へ]
タイトルRe^2: 検索方法
記事No6687
投稿日: 2007/12/17(Mon) 09:44
投稿者ひろりん
早速の回答ありがとうございます。

教えていただいたコードを参考に作成してみます。

また困ったらお願いします。

[ツリー表示へ]