ساخت صفحه لاگین

Question

ساخت صفحه لاگین

سوال

به نام خدا

سلام دوستان
اول از همه بابت زحمات بی منتی که برای رفع اشکال کارآموزان و برنامه‌نویسان می کشید و وقت میذارید سپاسگذاری میکنم و امیدوارم خیر و برکتشو توی زندگیتون ببینید.
من مدتیه دارم با آموزش سایتتون برای ایجاد صفحه لاگین کار میکنم که در هفت بخش منتشر کردید منتها هر کاری میکنم اجرا نمیشه
برای ایجاد صفحه لاگین (ثبت نام نمی خوام چون خودم یوز و پس میدم به کاربر) هاست از میهن هاست خریدم و با کدهای شما خیلی تلاش کردم صفحمو درست کنم اما نشد
ممنون میشم که یه صفحه لاگین ساده که فقط کاربر یوز و پس داده شده بهش رو بزنه و وارد بشه بذارید و البته فرض کنید برای نوآموزان برنامه نویسی توضیح می دید نه کسایی که پیش زمینه دارن، مثلا اینکه فایل php‌رو کجای هاست بذاریم، یا گزینه ها چطوری جاگذاری بشن که ارتباط قطعا برقرار بشه و وقتی برقرار شد اکتیویتی جدید رو باز کنه نه اینکه پیغام بده
البته باعث زحمت مجدده اما باز هر طور صلاح دونستید ممنون میشم کمک کنید از بس روی این صفحه کار کردم و هی نتیجه نگرفتم دیگه خسته شدم

ممنونم

حل شد 0

برنامه نویسی اندروید, بیسیک فور اندروید 5 سال ۱۳۹۸/۲/۱۵ ۱۲:۰۸:۲۴ ۱۳۹۸/۲/۱۵ ۱۲:۰۸:۲۴ 8 پاسخ کاربر 1

درباره hamedکاربر

پاسخ ها ( 8 )

morteza همکار سایت
0
۱۳۹۸/۲/۱۶ ۰:۱۴:۲۱ ۹۸/۰۲/۱۶ در ۰۰:۱۴

پاسخ
سلام.

دوست عزیز، الان دقیقا تا کجای کار پیش رفتی و چه چیزهایی رو نوشتی؟

hamed کاربر

0

۱۳۹۸/۲/۱۶ ۱:۲۸:۳۴ ۹۸/۰۲/۱۶ در ۰۱:۲۸

پاسخ

سلام عزیز جان

شب خوش
جسارتا این کدها مربوط به صفحه main و php هاستم هستن

Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Layout1")
ht.Initialize("login",Me)
End Sub
 
Sub Button1_Click
Dim strUsername As String = EditText1.Text.Trim
If strUsername = "" Then
Msgbox("نام کابری را وارد کنید", "خطا")
Return
End If
Dim strPassword As String = EditText2.Text.Trim
If strPassword = "" Then
Msgbox("رمز عبور را وارد کنید", "خطا")
Return
End If
Dim job1 As HttpJob
job1.Initialize("Login", Me)
job1.Download2("hamedafrough.ir/login.php", _
Array As String("username",EditText1,"password",EditText2))
ProgressDialogShow("در حال اتصال به سرور")
End Sub
Sub JobDone (Job As HttpJob)
ProgressDialogHide
Log("JobName = " & Job.JobName & ", Success = " & Job.Success)
If Job.Success = True Then
StartActivity("layout2")
Dim strReturn As String
Log(Job.GetString)
strReturn = Job.GetString
Label3.Text = strReturn
Else
Log("خطا: " & Job.ErrorMessage)
ToastMessageShow("خطا: " & Job.ErrorMessage, True)
End If
Job.Release
End Sub

۱

۲

۳

۴

۵

۶

۷

۸

۹

۱۰

۱۱

۱۲

۱۳

۱۴

۱۵

۱۶

۱۷

۱۸

۱۹

۲۰

۲۱

۲۲

۲۳

۲۴

۲۵

۲۶

۲۷

۲۸

۲۹

۳۰

۳۱

۳۲

۳۳

۳۴

۳۵

۳۶

۳۷

Sub Activity_Create(FirstTime As Boolean)

Activity.LoadLayout("Layout1")

ht.Initialize("login",Me)

End Sub

Sub Button1_Click

Dim strUsername As String = EditText1.Text.Trim

If strUsername = "" Then

Msgbox("نام کابری را وارد کنید", "خطا")

Return

End If

Dim strPassword As String = EditText2.Text.Trim

If strPassword = "" Then

Msgbox("رمز عبور را وارد کنید", "خطا")

Return

End If

Dim job1 As HttpJob

job1.Initialize("Login", Me)

job1.Download2("hamedafrough.ir/login.php", _

Array As String("username",EditText1,"password",EditText2))

ProgressDialogShow("در حال اتصال به سرور")

End Sub

Sub JobDone (Job As HttpJob)

ProgressDialogHide

Log("JobName = " & Job.JobName & ", Success = " & Job.Success)

If Job.Success = True Then

StartActivity("layout2")

Dim strReturn As String

Log(Job.GetString)

strReturn = Job.GetString

Label3.Text = strReturn

Else

Log("خطا: " & Job.ErrorMessage)

ToastMessageShow("خطا: " & Job.ErrorMessage, True)

End If

Job.Release

End Sub

<?php
/*
* www.beporsam.ir
* beporsam@gmail.com
* Social Id: @beporsam
*/
$host = 'localhost';
$userdb = 'hamedafr';
$passdb = '';
$dbname = 'hamedafr_misaq';
$conn =mysqli_connect($host,$userdb,$passdb,$dbname);
mysqli_set_charset($conn,"utf8");
//ارتباط با دیتابیس
if (mysqli_connect_errno()){
echo 'خطا در برقراری ارتباط با دیتابس: '.mysqli_connect_error();
}
// گرفتن نام کاربری و رمز عبور
$username = $_GET['username'];
$password = $_GET['password'];
// کوئری اجرای دستورات
$sql = "select * from tbl_user where username = '$username' and password = '$password'";
$result = mysqli_query($conn,$sql);
$row = mysqli_fetch_array($result);
$count = mysqli_num_rows($result);
if ($count == 0) {
echo 'نام کاربری یا رمز عبور اشتباه است';
}
else {
echo $row['username'].'خوش اومدی';
}

۱

۲

۳

۴

۵

۶

۷

۸

۹

۱۰

۱۱

۱۲

۱۳

۱۴

۱۵

۱۶

۱۷

۱۸

۱۹

۲۰

۲۱

۲۲

۲۳

۲۴

۲۵

۲۶

۲۷

۲۸

۲۹

۳۰

۳۱

<?php

/*

* www.beporsam.ir

* beporsam@gmail.com

* Social Id: @beporsam

*/

$host = 'localhost';

$userdb = 'hamedafr';

$passdb = '';

$dbname = 'hamedafr_misaq';

$conn =mysqli_connect($host,$userdb,$passdb,$dbname);

mysqli_set_charset($conn,"utf8");

//ارتباط با دیتابیس

if (mysqli_connect_errno()){

echo 'خطا در برقراری ارتباط با دیتابس: '.mysqli_connect_error();

}

// گرفتن نام کاربری و رمز عبور

$username = $_GET['username'];

$password = $_GET['password'];

// کوئری اجرای دستورات

$sql = "select * from tbl_user where username = '$username' and password = '$password'";

$result = mysqli_query($conn,$sql);

$row = mysqli_fetch_array($result);

$count = mysqli_num_rows($result);

if ($count == ۰) {

echo 'نام کاربری یا رمز عبور اشتباه است';

}

else {

echo $row['username'].'خوش اومدی';

}

hamed کاربر
0
۱۳۹۸/۲/۲۰ ۱:۳۹:۵۷ ۹۸/۰۲/۲۰ در ۰۱:۳۹

پاسخ
به نام خدا
دوست عزیز، سلطان قلبها

از محبت و وقتی که میذارید ممنونم
مجددا تشکر میکنم

جسارتا اوامر شما انجام شد البته من جای اکتیویتی تست اسم اکتیتیوی خودم رو نوشتم اما به محض وارد کردن یوز و پسی که در دیتابیس تعیین کردم برنامه خارج میشه و پیغام میده کهبرنامتون بسته شد و اگر میخواید دوباره شروعش کنید و در خود بیسیک هم یه سری ارر میده که عکسشونو پیوست کردم خدمتتون
ممنون میشم فرصت کردید ملاحظه کنید و ایرادشو بگید اصلاح کنم

متشکرم

فایل پیوست
- SOLTANE GHALBHA مدیر سایت
  
  1
  ۱۳۹۸/۲/۲۱ ۳:۵۹:۲۹ ۹۸/۰۲/۲۱ در ۰۳:۵۹
  
  پاسخ
  سلام حامد جان
  
  سورس کدتون رو بفرستید تا چک کنم، من طبق همین چیزهایی که بالا گفتم انجام دادم و مشکلی نداشتم

hamed کاربر

0

۱۳۹۸/۲/۲۱ ۱۲:۲۸:۴۵ ۹۸/۰۲/۲۱ در ۱۲:۲۸

پاسخ

به نام خدا
سلام داداش
خدا خیرتون بده
ممنونم

فایل پیوست

SOLTANE GHALBHA مدیر سایت

1

۱۳۹۸/۲/۲۱ ۱۸:۰۲:۰۶ ۹۸/۰۲/۲۱ در ۱۸:۰۲

پاسخ

حامد جان، اون کدهایی که من گذاشتم رو جایگزین نکردی عزیز

این کدهای شما هست:

Sub JobDone (Job As HttpJob)
	ProgressDialogHide
	Log("JobName = " & Job.JobName & ", Success = " & Job.Success)
	If Job.Success = True Then
		StartActivity("layout2")
		Dim strReturn As String
		Log(Job.GetString)
		strReturn = Job.GetString
		Label3.Text = strReturn
	Else
		Log("خطا: " & Job.ErrorMessage)
		ToastMessageShow("خطا: " & Job.ErrorMessage, True)
	End If
	Job.Release
End Sub

۱

۲

۳

۴

۵

۶

۷

۸

۹

۱۰

۱۱

۱۲

۱۳

۱۴

۱۵

Sub JobDone (Job As HttpJob)

ProgressDialogHide

Log("JobName = " & Job.JobName & ", Success = " & Job.Success)

If Job.Success = True Then

StartActivity("layout2")

Dim strReturn As String

Log(Job.GetString)

strReturn = Job.GetString

Label3.Text = strReturn

Else

Log("خطا: " & Job.ErrorMessage)

ToastMessageShow("خطا: " & Job.ErrorMessage, True)

End If

Job.Release

End Sub

با کد زیر جایگزین کن:

Sub JobDone (Job As HttpJob)
	ProgressDialogHide
	Log("JobName = " & Job.JobName & ", Success = " & Job.Success)
	If Job.GetString.Contains("خوش اومدی") Then
		Activity.Finish
		StartActivity("layout2")
	Else
		Log("خطا: " & Job.ErrorMessage)
		ToastMessageShow("خطا: " & Job.ErrorMessage, True)
	End If
	Job.Release
End Sub

۱

۲

۳

۴

۵

۶

۷

۸

۹

۱۰

۱۱

۱۲

Sub JobDone (Job As HttpJob)

ProgressDialogHide

Log("JobName = " & Job.JobName & ", Success = " & Job.Success)

If Job.GetString.Contains("خوش اومدی") Then

Activity.Finish

StartActivity("layout2")

Else

Log("خطا: " & Job.ErrorMessage)

ToastMessageShow("خطا: " & Job.ErrorMessage, True)

End If

Job.Release

End Sub

موفق باشی

hamed کاربر
0
۱۳۹۸/۲/۲۱ ۲۱:۰۴:۰۴ ۹۸/۰۲/۲۱ در ۲۱:۰۴

پاسخ
سلام مجدد به شما دوست بزرگوار
متاسفانه باز هم کار نکرد و از برنامه بیرون پرید
جسارتا سورس رو با تغییراتی که فرمودید گذاشتم
هر موقع وقت کردید ممنون میشم ملاحظه بفرمایید
خیلی ممنونم

فایل پیوست
- جلال کاربر تازه
  
  1
  ۱۳۹۸/۲/۲۳ ۴:۴۷:۰۹ ۹۸/۰۲/۲۳ در ۰۴:۴۷
  
  پاسخ
  این پاسخ ویرایش شد.
  
  آقای حامد
  
  آدرس پی اچ پی رو اشتباه نوشتی، یا آی پی هست یا هاست آنلاین. آی پی سرور شخصی که دات آی ار نداره
  
  دوم اینکه شما لایوت رو با اکتیویتی اشتباه گرفتی. من فایل پیوست شما رو دیدم
  
  الان هرچی این اقای مدیر و همکاراش شما رو راهنمایی کنن راه به جایی نمی برد. باید سه ماه دیگه با بیسیک کار بکنی مقدماتش رو بشناسی و بعد این سوالات رو بپرسی. این سوالاتی که الان داری می پرسی به نظرم بخشی میانی کار هست اگر نگیم پیشرفته. امیدوارم جسارت نباشه. منم فقط یک ماه از شما جلوترم اما اشکالات درشت برنامه شما رو می فهمم.
  - hamed کاربر
    
    0
    ۱۳۹۸/۲/۲۴ ۰:۲۰:۱۴ ۹۸/۰۲/۲۴ در ۰۰:۲۰
    
    پاسخ
    
    این پاسخ ویرایش شد.
    
    سلام
    از توضیحتون ممنونم
    کاش دقیق می گفتید کجا رو اشتباه نوشتم
    پی اچ پی مطلقا بلد نیستم
    اما در بحث بیسیک به نظرم به جای لایوت، اکتیویتی باز بشه فرقی نداشته باشه (البته اون layout2‌اسم اکتیویتی هم هست یعنی با لایه دقیقا هم نامن)
    اگر اطلاعات بیشتری دارید یا اشتباه میگم ممنون میشم بهم بگید
احمد آخوندی مدیر سایت
1
۱۳۹۸/۲/۲۴ ۸:۲۰:۱۹ ۹۸/۰۲/۲۴ در ۰۸:۲۰

پاسخ
سلام

از این سورس استفاده کنید، برای دانلود کلیک کنید.

در کنار سورس فایل login.php هم قرار دارد که در هاست آپلود کنید، و آدرس فایل رو در خط ۷۷ بنویسید.

این سورس پس از صحیح بودن نام کاربری و رمز عبور به اکتویتی Test میره و اگه اطلاعات اشتباه بود، پیام “نام کاربری یا رمز عبور اشتباه است” را به کاربر نشون میده.

این سورس دقیقا همون سورس آموزش صفحه لاگین هست، که کدهایی که در پاسخ به این سوال براتون نوشتم رو در این سورس جایگذاری کردم.

موفق باشید.
hamed کاربر
0
۱۳۹۸/۲/۲۴ ۱۳:۳۴:۵۴ ۹۸/۰۲/۲۴ در ۱۳:۳۴

پاسخ
سلام اقای آخوندی

دمت گرم داداش
خیلی برام وقت گذاشتی
یه دنیا ممنونتم

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

ارسال یک پاسخ

پرسش قبلی

پرسش بعدی

SOLTANE GHALBHA مدیر سایت · Accepted Answer · ۱۳۹۸/۲/۱۸ ۱۱:۰۷:۵۲

سلام حامد جان

انشاءالله که دیگر کاربران هم مثل شما رضایت کافی از سایت داشته باشند 🙂

بریم سر اصل ماجرا:

ما در کدهای سمت سرور اومدیم، بررسی کردیم که اگه اطلاعات ارسالی(نام کاربری و رمز عبور) صحیح بود، بیاد و پیغام خوش اومدی و اگه اشتباه بود، پیغام نام کاربری و رمز عبور رو نشون بده، کدهاش هم اینه:

if ($count == 0) {
    echo 'نام کاربری یا رمز عبور اشتباه است';
}
else {
    echo $row['username'].'خوش اومدی';

}

۱

۲

۳

۴

۵

۶

۷

if ($count == ۰) {

echo 'نام کاربری یا رمز عبور اشتباه است';

}

else {

echo $row['username'].'خوش اومدی';

}

اینکه تا اینجا، پس کدهای سمت سرور که نوشتی، صحیح و نیاز به تغییر نداره

ولی در سمت کلاینت(B4A) باید یه تغییری داده بشه، کد زیر رو نوشتیم که اطلاعات رو بره ارسال کنه و بنا به درست و غلط بودن اطلاعات پیام هایی که در سمت سرور نوشتیم رو نشون بده(کدهای بالا):

Sub JobDone (Job As HttpJob)
	ProgressDialogHide
	Log("JobName = " & Job.JobName & ", Success = " & Job.Success)
	If Job.Success = True Then
		Dim strReturn As String 
		Log(Job.GetString)
		strReturn = Job.GetString 
		Label3.Text = strReturn
	Else
		Log("خطا: " & Job.ErrorMessage)
		ToastMessageShow("خطا: " & Job.ErrorMessage, True)
	End If

	Job.Release
End Sub

۱

۲

۳

۴

۵

۶

۷

۸

۹

۱۰

۱۱

۱۲

۱۳

۱۴

۱۵

Sub JobDone (Job As HttpJob)

ProgressDialogHide

Log("JobName = " & Job.JobName & ", Success = " & Job.Success)

If Job.Success = True Then

Dim strReturn As String

Log(Job.GetString)

strReturn = Job.GetString

Label3.Text = strReturn

Else

Log("خطا: " & Job.ErrorMessage)

ToastMessageShow("خطا: " & Job.ErrorMessage, True)

End If

Job.Release

End Sub

کد زیر رو با کد بالا جایگزین کن:

Sub JobDone (Job As HttpJob)
	ProgressDialogHide
	Log("JobName = " & Job.JobName & ", Success = " & Job.Success)
	If Job.GetString.Contains("خوش اومدی") Then
		Activity.Finish
		StartActivity("Test")
	Else
		Log("خطا: " & Job.ErrorMessage)
		ToastMessageShow("خطا: " & Job.ErrorMessage, True)
	End If
	Job.Release
End Sub

۱

۲

۳

۴

۵

۶

۷

۸

۹

۱۰

۱۱

۱۲

Sub JobDone (Job As HttpJob)

ProgressDialogHide

Log("JobName = " & Job.JobName & ", Success = " & Job.Success)

If Job.GetString.Contains("خوش اومدی") Then

Activity.Finish

StartActivity("Test")

Else

Log("خطا: " & Job.ErrorMessage)

ToastMessageShow("خطا: " & Job.ErrorMessage, True)

End If

Job.Release

End Sub

در قطعه کد بالا از خط ۴ تا ۷، اومدیم یه شرط گذاشتیم که اگه پیغامی که از سمت سرور دریافت میشه برابر “خوش اومدی” بود، اکتیویتی فعلی رو ببنده و اکتویتی Test رو اجرا کنه، اگه هم نبود که بنویسه ” نام کاربری یا رمز عبور اشتباه است”.

حالا شما در قطعه کد بالا، بجای عبارت “خوش اومدی”، اون پیغامی که در سمت سرور مشخص کردی که اگه اطلاعات صحیح بود، چاپ رو کنه بنویس.

موفق باشید.

عضویت در سایت

ورود

فراموشی رمز عبور

ورود

عضویت در سایت

ساخت صفحه لاگین

ساخت صفحه لاگین

درباره hamedکاربر

پرسش های مشابه

سورس b4a

چگونگی ساخت دکمه فشاری

دسترسی ها – اعلانات – بیسیک فور اندروید

پخش موزیک پس زمینه اپ

بعد از انتخاب هر لیبل بتونیم داخلش یک مقدار توسط صفحه کلید پایین که از نوع لیبل هست وارد کنیم

پاسخ ها ( 8 )

ارسال یک پاسخ

سامانه آموزشی و خدماتی بپرسم

اولین وب سایت آموزشی و پرسش و پاسخ در ایران