naseri1152
چهارشنبه 29 آذر 1391, 11:41 صبح
برای ذخیره Id بنده در ویژوال بیسیک 6 به صورت اتوماتیک استفاده نمیکردم به دلایلی از این تابع استفاده میکردم:
سپس برای ذخیره در دیتابیس تکس id را : maxid + 1 قرار میدادم.
Private Function maxid()
rs1 = cnn.Execute("select max(id) as mn from bank ")
maxid = rs1!mn
End Function
حال میخواهم در vb.net استفاده کنم لطفا راهنمایی فرمایید چطوری میشه در vb.net از این فاکشن استفاده کرد. لطفا راهنمایی فرمایید: دستور insert را برای شما می آورم تا کامل برای بنده توضیح دهید. این هم دستور insert در bv.net:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim StrQuery As String
If Txtname.Text = "[هیج مقداری انتخاب نشده]" Then Txtname.Text = ""
If Txtfamily.Text = "[هیج مقداری انتخاب نشده]" Then Txtfamily.Text = ""
StrQuery = String.Format("EXEC prc_Bank_insert @id={0},@name=N'{1}',@family=N'{2}'", maxid() + 1, Txtname.Text, Txtfamily.Text)
SqlRun.RunNonQuery(StrQuery)
End Sub
حال یک فاکشن برای این دستور فوق بنویسید.که به جای تکست Id چگونه فاکشن بسازم.
سپس برای ذخیره در دیتابیس تکس id را : maxid + 1 قرار میدادم.
Private Function maxid()
rs1 = cnn.Execute("select max(id) as mn from bank ")
maxid = rs1!mn
End Function
حال میخواهم در vb.net استفاده کنم لطفا راهنمایی فرمایید چطوری میشه در vb.net از این فاکشن استفاده کرد. لطفا راهنمایی فرمایید: دستور insert را برای شما می آورم تا کامل برای بنده توضیح دهید. این هم دستور insert در bv.net:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim StrQuery As String
If Txtname.Text = "[هیج مقداری انتخاب نشده]" Then Txtname.Text = ""
If Txtfamily.Text = "[هیج مقداری انتخاب نشده]" Then Txtfamily.Text = ""
StrQuery = String.Format("EXEC prc_Bank_insert @id={0},@name=N'{1}',@family=N'{2}'", maxid() + 1, Txtname.Text, Txtfamily.Text)
SqlRun.RunNonQuery(StrQuery)
End Sub
حال یک فاکشن برای این دستور فوق بنویسید.که به جای تکست Id چگونه فاکشن بسازم.