رفتن به مطلب
  • 0

mfeily

سوال

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

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

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

لینک ارسال
به اشتراک گذاری در سایت های دیگر

3 پاسخ به این سوال تاکنون داده شده است

ارسال‌های توصیه شده

سلام

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

اینم کدش

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

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...