| タイトル | ： データベースログイン画面の非表示 |
| 記事No | ： 987 |
| 投稿日 | ： 2004/07/16(Fri) 09:49 |
| 投稿者 | ： ニック |
[OSのVer]：Windows XP [VBのVer]：VB.NET 2003
初めまして、VB.NETでレポート出力を作成していますが、以下の問題が出て
悩んでいます ご教授ください
Form1からForm2を呼び出し、Form2でレコードの追加を行う処理を作成しています
Form1からForm2を呼び出す時に、データベースログインの画面が表示されます
表示されない方法を、教えていただければと思います
行いたいことは、下記の通りです
Form1はボタンでForm2をShowするのみです
Form2では DataSetで作成したテーブル（PASDataSet）にレコードを追加する
追加したレコードをCrystalReportにプレビューする
作成
＜Form1＞
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button1.Click
Dim frm_pp As Form2
frm_pp = New Form2
frm_pp.Show()
End Sub
＜Form2＞
Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles MyBase.Load
'// まずはデータセットのインスタンスを生成
Dim dtset As New PASDataset.USERIDTBLDataTable
Dim dtrow As DataRow
Dim cr = New CrystalReport1
'テーブルにレコードを追加する
dtrow = dtset.NewRow()
dtrow("USERID") = "1234567"
dtrow("PASSWORD") = "ABCDEFGHI"
dtset.Rows.Add(dtrow)
cr.SetDataSource(dtset)
dtrow = dtset.NewRow()
dtrow("USERID") = "9876543"
dtrow("PASSWORD") = "ZZZZZZZZZ"
dtset.Rows.Add(dtrow)
cr.SetDataSource(dtset)
CrystalReportViewer1.ReportSource = cr
End Sub
＜DataSet＞ PASDataset.xsd
テーブル名：USERIDTBL・・・・・・・・・ツールボックスで 「element」より作成
以上ですが、この情報でお分かりになりますでしょうか？
よろしく、お願いします
|