pedram_ns
پنج شنبه 09 مهر 1388, 08:22 صبح
سلام
من با کد های زیر صفحه ایی برای تغییر رمز ورود ساختم.
<asp:AccessDataSource ID="AccessDataSource1" runat="server"
DataFile="~/App_Data/Database.mdb"
UpdateCommand="UPDATE [Company] SET [Pass] = ? WHERE ([Usr] = ? and [pass]=@txtpass) ">
<UpdateParameters>
<asp:Parameter Name="Pass" Type="String" />
<asp:Parameter Name="Usr" Type="String" />
<asp:Parameter Name="txtpass" Type="String" />
</UpdateParameters>
</asp:AccessDataSource>
code-behind
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
AccessDataSource1.UpdateParameters("Pass").DefaultValue = newpass1.Text
AccessDataSource1.UpdateParameters("usr").DefaultValue = Session("user")
AccessDataSource1.UpdateParameters("txtPass").DefaultValue = txtpass.Text
Try
AccessDataSource1.Update()
Label1.Visible = True
Label1.Text = "رمز ورود شما با موفقیت تغییر یافت."
txtpass.Text = ""
newpass1.Text = ""
newpass2.Text = ""
Catch ex As Exception
Label1.Visible = True
Label1.Text = "رمز ورود تغییر نیافت"
txtpass.Text = ""
newpass1.Text = ""
newpass2.Text = ""
End Try
End Sub
دو تا اشکال هست
1.اگه رمز تغییر کنه یا نکنه پیام می ده که تغییرات صورت گرفت.
2.من یک دکمه linkbuttom برای خروج دارم و textbox های تغییر رمز هم اعتبارسنجی دارن وقتی دکمه خروج رو می زنم textbox ها اعتبار سنجی می شن و خروج صورت نمی گیره.
من با کد های زیر صفحه ایی برای تغییر رمز ورود ساختم.
<asp:AccessDataSource ID="AccessDataSource1" runat="server"
DataFile="~/App_Data/Database.mdb"
UpdateCommand="UPDATE [Company] SET [Pass] = ? WHERE ([Usr] = ? and [pass]=@txtpass) ">
<UpdateParameters>
<asp:Parameter Name="Pass" Type="String" />
<asp:Parameter Name="Usr" Type="String" />
<asp:Parameter Name="txtpass" Type="String" />
</UpdateParameters>
</asp:AccessDataSource>
code-behind
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
AccessDataSource1.UpdateParameters("Pass").DefaultValue = newpass1.Text
AccessDataSource1.UpdateParameters("usr").DefaultValue = Session("user")
AccessDataSource1.UpdateParameters("txtPass").DefaultValue = txtpass.Text
Try
AccessDataSource1.Update()
Label1.Visible = True
Label1.Text = "رمز ورود شما با موفقیت تغییر یافت."
txtpass.Text = ""
newpass1.Text = ""
newpass2.Text = ""
Catch ex As Exception
Label1.Visible = True
Label1.Text = "رمز ورود تغییر نیافت"
txtpass.Text = ""
newpass1.Text = ""
newpass2.Text = ""
End Try
End Sub
دو تا اشکال هست
1.اگه رمز تغییر کنه یا نکنه پیام می ده که تغییرات صورت گرفت.
2.من یک دکمه linkbuttom برای خروج دارم و textbox های تغییر رمز هم اعتبارسنجی دارن وقتی دکمه خروج رو می زنم textbox ها اعتبار سنجی می شن و خروج صورت نمی گیره.