Response.Redirect

[hoseinimajd]

با سلام خدمت همه دوستان
من مي خوام تو دستور Response.Redirect اين مفهوم رو بيارم كه
زماني كه user و pass چگ شد سپس اگر درست بود دستور زير رو اجرا كنه
Response.Redirect مثلا فيلد Link در ديتابيس data.mdb در table . user check
اين يوزر
اگر كمك كنيد ممنون مي شم.
خدا نگهدار

 

[mehradmoein]

If condition Then
response.redirect("page")
Else
response.write "your user name / password was wront"
End If
به جای condition هم شرطی که می خواهید رو بزارید.

 

[mehradmoein]

شما در تشخیص این که username و password درست هست یا نه هم مشکل دارید؟

 

[amirlol]

فکر کنم مشکل داشته باشه در غیر اینصورت نباید این سوال رو می پرسید

 

[mehradmoein]

شرمنده.
خوب شما از access استفاده می کنید؟چقدر کار با دیتابیس رو بلد هستید؟
من فرض رو بر این می گیرم که شما با استفاده از یک object به اسم objADO به دیتابیس وصل هستید:
set objADO = server.CreateObject("ADODB.Connection")
objADO.Open "connection string"
objADO.Execute("select * from admin where username= username and password = password")
if not objADO.EOF Then
ISAdmin = "true"
End If
objADO.Close
set objADO = Nothing
If IsAdmin = "true" Then
response.redirect ("admin.asp")
Else
response.redirect("error.asp")
End If
این یک کد ساده برای تشخیص درست یا غلط بودن username و password . به جای connection string باید مقدار مربوط به دیتابیس خودتون رو بزارید و به جای admin در select * from admin باید اسم table که اسم ها داخل اون هستن رو بزارید.به جای username دوم باید username که می خواهید رو بزارید و می تونید این مقدار رو از یک فرم بدست بیارید.در مورد password هم همین طور.

 

[mehradmoein]

باز هم معذرت می خوام که از اول نفهمیدم که اصل سوال شما در باره ی تشخیص username و password بوده.
راستی هر سوالی که درباره ی کد بالا داشتید من درخدمتم.

 

[amirlol]

باز هم معذرت می خوام که از اول نفهمیدم که اصل سوال شما در باره ی تشخیص username و password بوده.
راستی هر سوالی که درباره ی کد بالا داشتید من درخدمتم.

کارت حرف نداره ولی چرا کامل توضیح نمی دی و باز می خوای طرف رو تو خمکاری بزاری تا بپرسه برام جای سوال داره

 

[mehradmoein]

شرمنده,آخه زیاد وقت ندارم.بعد هم شاید طرف مقابل خیلی از این کدها رو بلد باشه و توضیح من بی مورد باشه.واسه ی همین می گم که هر جا سوال داشتید بپرسید.الان هم اگه می شه بگید که کجای این کدها نامفهوم هست.راستی شما قبلا با data base کار کردید.یعنی روش connect شدن و ... رو بلد هستید؟

 

[hoseinimajd]

سلام
اولاً ممنون که به سئوالم پاسخ دادید
دوماً که بله من نحوه connect شدن رو بلدم فقط مشکل این هستش که دستور rispons redirect صفحه ای رو برای کاربر باز کنه که آدرسش در دیتا بیس هست و لزوما برای هر کاربر می تونه آدرسه یکسانی نباشه .

 

[mehradmoein]

set objADO = server.CreateObject("ADODB.Connection")
objADO.Open "connection string"
objADO.Execute("select * from admin where username= username and password = password")
if not objADO.EOF Then
ISAdmin = "true"
redirect_url = objADO("redirect_field")
End If
objADO.Close
set objADO = Nothing
If IsAdmin = "true" Then
response.redirect (redirect_url)
Else
response.redirect("error.asp")
End If
به جای redirect_field اسم اون field رو بزنید که آدرس صفحه ی redirect توش هست.