خطا در هنگام لود شدن فرم - خالي بودن بانك اطلاعاتي

[sh2007]

با سلام خدمت دوستان
من يك فرم پرسون دارم كه تكستها رو بايند كردم به ديتابيس
هنگامي كه خط كد زير در فرم لود مي باشد يك خطا اتفاق مي افتد

Me.PersonTableAdapter.Fill(Me.Datasset.Person)

كه
No value given for one or more required parameters.

حالا من چكار كنم بانك اطلاعاتي هم خاليه بالاخره بايد يه جوري تشخصي بدم كه اگه بانك خالي بود عمليات پركردن انجام نشه چه روشي خوبه و آيا اصلا پر كردن اطلاعات به اين روش
خوبه يا نه

[arsalansalar]

از این روش استفاده کن:

   Dim selectSql As String

        selectSql = "Select text from jadval where val(id) = '" & tjo.Text & "'"

        con = New OleDbConnection("provider=microsoft.jet.oledb.4.0 ; data source=" & Application.StartupPath() & "\db.mdb")

        cmdSelect = New OleDbCommand(selectSql, con)

        con.Open()

        dr = cmdSelect.ExecuteReader()

        While dr.Read()

            If dr("text") Is DBNull.Value Then

                TextBox1.Text = Nothing

            Else

                TextBox1.Text = dr("text")

            End If

 End While

        con.Close()

        dr.Close()

[bastakboys]

دوست عزیز از دستور زیر استفاده کن

 

Try

کد اتصال به بانک

 

Catch ex As Exception

 

 

EndTry