آموزش دیتا بیس

[mfeily 10]

سلام به اساتید محترم

یه آموزش میخوان در ارتباط با نحوه ورود اطلاعات از یک ادیت تکس به درون دیتا بیس

فرض کنید من یک لیر دارم که دوتا تکس و یک دکمه درونش هست و میخوام با وارد کردن نام و فامیل و زدن دکمه اطلاعات اینزرت بشه تو بانک اطلاعاتی که قبلا یا فیلدهای id و fnameو lnameساخته شده کانکشن هم زده شده به نرم افزار شناسونده شده لایبری هم اد شده به طور کلی مراحل اولیه انجام شده فقط کد درون کلید واسم مشکل شده چطوری کد اینزرتو بنویسم ممنون میشم راهنمایی کنید .(از تاپیکها چیزی نفهمیدم )

[Farzad Musavi 576]

سلام

آموزشش هس تو انجمن به اضافه سورس

اینم کدش

Sub add_btn_Click
   If fname_txt.Text="" OR lname_txt.Text="" Then
   Msgbox("لطفا تمامی فیلد ها را پر کنید","خالی بودن فیلد")
   Else
   cursor1=sql1.ExecQuery("SELECT Num FROM My_DB")
   If cursor1.RowCount>0 Then
   For i=0 To cursor1.RowCount-1 
   cursor1.Position=i
   Dim new_num As Int
   new_num=cursor1.GetInt("Num")
   Next
   End If
   new_num=new_num+1
   sql1.ExecNonQuery("INSERT INTO My_DB VALUES('" &new_num&"','" &fname_txt.Text&"','"&lname_txt.Text&"','"&city_txt.Text&"')")
   load_data
   fname_txt.Text=""
   lname_txt.Text=""
   city_txt.Text=""
   fname_txt.RequestFocus
   End If

End Sub

[mfeily 10]

ممنون از لطفتون

[mfeily 10]

میشه آدرس انجمن و بگی ممنون میشم