• پایان فعالیت بخشهای انجمن: امکان ایجاد موضوع یا نوشته جدید برای عموم کاربران غیرفعال شده است

صفحه لوگین با asp.net

r2_irooni

Registered User
تاریخ عضویت
18 دسامبر 2005
نوشته‌ها
398
لایک‌ها
54
محل سکونت
تو خونمون که پیش خونتونه
سلام یه برنامه کوچیک با asp.net میخوام
یه صفحه که توسط 2 فیلد یوزر و پسورد دیتا بیس رو چک میکنه
اگر درست بود ریدایرکت میکنه به یه صفحه دیگخ
اگر رایگان هست یه حالی به این بی نوا بدین نیازمندم
اگر پول میگیرید قیمت بهم بدین:D
 

r2_irooni

Registered User
تاریخ عضویت
18 دسامبر 2005
نوشته‌ها
398
لایک‌ها
54
محل سکونت
تو خونمون که پیش خونتونه
سلام خدمت دوستان عزیزی که جوابمو ندادن:)

ببینین من دارم این کد رو مینویسم برای لاگین

کد:
Imports System.Data
Imports System.Data.OleDb
Partial Public Class _Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
        Dim con As OleDbConnection
        Dim dw As New DataView
        Dim da As OleDbDataAdapter
        Dim ds As New DataSet
        Dim dt As New DataTable
        Dim strsql, strcon As String

        strcon = "provider = microsoft.jet.oledb.4.0;" & "data source = d:\university.mdb"
        con = New OleDbConnection(strcon)
        con.Open()
        strsql = "select * from student where name like   '" & CStr(textbox1.text) & "' and stno=" & Val(textbox2.text) & ""
        da = New OleDbDataAdapter(strsql, con)
        da.Fill(ds."student")
        If dt.Rows.Count <> 0 Then
            Menu1.Enabled = False
        Else
            Menu1.Enabled = False
            Response.Redirect("default2.aspx")
        End If
        con.Close()
    End Sub


    Protected Sub Menu1_MenuItemClick(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.MenuEventArgs) Handles Menu1.MenuItemClick

    End Sub
End Class


ولی وقتی کامپایل میکنم این خطا رو میزنه :
کد:
Source Error:

Line 21:         strsql = "select * from student where name like   '" & CStr(textbox1.text) & "' and stno=" & Val(textbox2.text) & ""
Line 22:         da = New OleDbDataAdapter(strsql, con)
Line 23:         da.Fill(ds, "student")
Line 24:         If dt.Rows.Count <> 0 Then
Line 25:             Menu1.Enabled = True


Source File: C:\Documents and Settings\mrg\My Documents\Visual Studio 2008\Projects\Project1\WebApplication8\WebApplication8\Default.aspx.vb    Line: 23

Stack Trace:

آقا حداقل جواب این سوالمو بدید:(
 

Bahram.ws

Registered User
تاریخ عضویت
8 آگوست 2005
نوشته‌ها
1,132
لایک‌ها
73
سن
40
محل سکونت
On The Fly
این کدهارو که فکر کنم از جایی کپی کردی...بیخیال مهم نیست

تو دیتابیس یک table داری به نام tblUsers که 2 تا فیلد داره: username و password

شما یه صفحه میسازی توش 2 تا textbox و یک bottom میندازی تا اینجاش که کاری نداره
به textbox ها اسم میدی: txtUserName و txtPassword

اینا که اوکی شد واسه event کلیک bottom اینو مینویسی:

کد:
[LIST=1]
[*]Dim cmd As New SqlCommand("SELECT * FROM tblUsers WHERE UserName = @username AND Password = @password")
[*]cmd.Parameters.AddWithValue("@username", txtUsername.Text)
[*]cmd.Parameters.AddWithValue("@password", txtPassword.Text)
[*]cmd.Connection = New SqlConnection("ConnectionString ro inja benevis")
[*]cmd.Connection.Open()
[*]Dim dr As SqlDataReader = cmd.ExecuteReader()
[*]Dim IsLogin As Boolean = dr.Read()
[*]dr.Close()
[*]cmd.Connection.Close()
[*]If IsLogin Then
[*]    Response.Redirect("OK.aspx")
[*]End If
[/LIST]
 

half_moon

Registered User
تاریخ عضویت
23 دسامبر 2009
نوشته‌ها
8
لایک‌ها
0
سلام.
من دارم پروژه پایانیم با asp.net می نویسم.
یکی از صفحاتم هم صفحه لاگین است .در واقع همون چیزی که u می خوای اگه کدش رو می خوی به این آی دی pm بده تا جوابت بدم.
id:half_moon61
 

r2_irooni

Registered User
تاریخ عضویت
18 دسامبر 2005
نوشته‌ها
398
لایک‌ها
54
محل سکونت
تو خونمون که پیش خونتونه
سلام.
من دارم پروژه پایانیم با asp.net می نویسم.
یکی از صفحاتم هم صفحه لاگین است .در واقع همون چیزی که u می خوای اگه کدش رو می خوی به این آی دی pm بده تا جوابت بدم.
id:half_moon61

این کدهارو که فکر کنم از جایی کپی کردی...بیخیال مهم نیست

تو دیتابیس یک table داری به نام tblUsers که 2 تا فیلد داره: username و password

شما یه صفحه میسازی توش 2 تا textbox و یک bottom میندازی تا اینجاش که کاری نداره
به textbox ها اسم میدی: txtUserName و txtPassword

اینا که اوکی شد واسه event کلیک bottom اینو مینویسی:

کد:
[LIST=1]
[*]Dim cmd As New SqlCommand("SELECT * FROM tblUsers WHERE UserName = @username AND Password = @password")
[*]cmd.Parameters.AddWithValue("@username", txtUsername.Text)
[*]cmd.Parameters.AddWithValue("@password", txtPassword.Text)
[*]cmd.Connection = New SqlConnection("ConnectionString ro inja benevis")
[*]cmd.Connection.Open()
[*]Dim dr As SqlDataReader = cmd.ExecuteReader()
[*]Dim IsLogin As Boolean = dr.Read()
[*]dr.Close()
[*]cmd.Connection.Close()
[*]If IsLogin Then
[*]    Response.Redirect("OK.aspx")
[*]End If
[/LIST]

مرسی از دو دوست عزیزم:)
 

behnam666

همکار بازنشسته
تاریخ عضویت
21 ژوئن 2007
نوشته‌ها
1,746
لایک‌ها
756
سن
38
محل سکونت
خونمون
اینم یه کد همراه با توضیحات.ببین واسه ریداکت هم کاری نداره خودت اضافه کن.ولی اگه مشکلی بود بگو. البته asp هست.
 

فایل های ضمیمه

  • LOGING.zip
    15.9 KB · نمایش ها: 43

ali.kolahdoozan

Registered User
تاریخ عضویت
13 فوریه 2007
نوشته‌ها
935
لایک‌ها
70
سن
42
محل سکونت
کف شهر
اگر گیرت رفع نشد . خبر بده من کمکت میکنم . کلا اگر کسی در asp.net و sql گیری داره بگه من هستم . اما سوال به درد خور باشه . لقمه آماده هم دست کسی نمی دم . باید مخ خودش را به کار بندازه
 
بالا