با سلام و درود خدمت دوستان عزیز
امروز آموزش ارتباط با ما تحت وب رو برای شما مهیا کرده ایم .
امیدوارم مورد قبول شما عزیزان واقع گردد.
مشکلی بود در نظرات بیان کنید تا رسیدگی شود .
ابتدا شما باید ی جدول داخل دیتابیس خودتون ایجاد کنید و اطلاعات دیتابیس رو داخل فایل php زیر وارد کنید:
خط اول که چیز خاصی نداره و فقط واسه اتصاله
DBName:اسم دیتابیس ،USERNAME ,PAssword اینها هم که کاملا مشخصه
داخل ۲ و ۳ و ۴ هم اومدیم متغییر تعریف کردیم(یکی واسه عنوان،بکی هم واسه ایمیل،یکی هم واسه توضیحات)
خط ۵ هم اومدیم داخل دیتابیس گذاشتیم (بجای tbl_Name اسم جدول دیتابیس خودتونو بنویسید)
-بریم سراغ بیسیک
اول ی لایوت میزاریم که سه تا ادیت تکست داره و ی باتن برای ارسال
ی متغییر از نوع httpjob تعریف می کنیم
Dim ht_add As HttpJob
اکتیویتی لود لیوت می کنیم و کد های زیر را داخل sub click می نویسیم
Sub button1_Click
If EditText1.Text = "" Or EditText2.Text = "" Or EditText3.Text = "" Then
ToastMessageShow("همه موارد را پر کنید",False)
Return
End If
If EditText1.Text.Length < 4 Then
ToastMessageShow("نام خانوادگی نمیتواند کمتر از ۴ حرف باشد",False)
Return
End If
If EditText3.Text.Length < 10 Then
ToastMessageShow("توضیحات نمیتواند کمتر از ۱۰ حرف باشد",False)
Return
End If
ht_add.PostString("http://*****/add.php","user="&EditText1.Text&"&email="&EditText2.Text&"&desc="&EditText3.Text)
End Sub
چند تا خط اول که واسه کنترله خودتون بهش شاخه برگ بدین
و اما خط اخر
اومدیم postString کردیم مطالبی که داخل ادیت تکست ها هستن
به جای http://*****/add.php هم آدرس فایل php خودتون رو بدین
مدرس : آقا سجاد
