ASP.Net学习之常用模块整理(2)

原创 2007年10月01日 14:12:00
5.DataList分页(其实Repeart也可采用这个,只是改一下控件名而已)

用户控件 
DataList: DlstInfolist
Label:lblCurrentPage 
HyperLink:lnkNext LnkPrev


存储过程:supplyinfo_select


程序代码: [ 复制代码到剪贴板 ]
/*
查询大类下所有的supplyinfo
2006-4-10
*/

create procedure supplyinfo_select

@bigclassid int

as 

select * from supply

where 

Supply_CatID=@bigclassid
GO



c#.Net

程序代码: [ 复制代码到剪贴板 ]
private void dlstsupplyinfolist()
        {

            SqlConnection conndb = new SqlConnection(System.Configuration.ConfigurationSettings.AppSettings["conn"]);

            conndb.Open();


            string bigid=Request.QueryString["bigid"].Trim();


            SqlDataAdapter strbuyinfo = new SqlDataAdapter("supplyinfo_select",conndb); 

            strbuyinfo.SelectCommand.CommandType = CommandType.StoredProcedure;


            strbuyinfo.SelectCommand.Parameters.Add("@bigclassid",bigid);


            DataSet ds = new DataSet();

            strbuyinfo.Fill(ds);


        {


            PagedDataSource objPds = new PagedDataSource();
            objPds.DataSource = ds.Tables[0].DefaultView;
            objPds.AllowPaging = true;
            objPds.PageSize = 5;
            int CurPage;

            if (Request.QueryString["Page"] != null)
                CurPage=Convert.ToInt32(Request.QueryString["Page"]);
            else
                CurPage=1;

            objPds.CurrentPageIndex = CurPage-1; 
            lblCurrentPage.Text = "Page: " + CurPage.ToString();

            if (!objPds.IsFirstPage)
                lnkPrev.NavigateUrl=Request.CurrentExecutionFilePath + "?id="  + bigid +"&Page=" + Convert.ToString(CurPage-1);

            if (!objPds.IsLastPage)
                lnkNext.NavigateUrl=Request.CurrentExecutionFilePath + "?id="  + bigid +"&Page="+ Convert.ToString(CurPage+1);


            DlstInfolist.DataSource=objPds;

            DlstInfolist.DataKeyField="Supply";

            DlstInfolist.DataBind();
            
        }


        }




VB.Net

程序代码: [ 复制代码到剪贴板 ]
Private  Sub dlstsupplyinfolist()
 
            Dim conndb As SqlConnection =  New SqlConnection(System.Configuration.ConfigurationSettings.AppSettings("conn")) 
 
            conndb.Open()
 
 
            Dim bigid As String = Request.QueryString("bigid").Trim() 
 
 
            Dim strbuyinfo As SqlDataAdapter =  New SqlDataAdapter("supplyinfo_select",conndb) 
 
            strbuyinfo.SelectCommand.CommandType = CommandType.StoredProcedure
 
 
            strbuyinfo.SelectCommand.Parameters.Add("@bigclassid",bigid)
 
 
            Dim ds As DataSet =  New DataSet() 
 
            strbuyinfo.Fill(ds)
 
 
 
        {
 
 
            Dim objPds As PagedDataSource =  New PagedDataSource() 
            objPds.DataSource = ds.Tables(0).DefaultView
            objPds.AllowPaging = True
            objPds.PageSize = 5
            Dim CurPage As Integer
 
            If Not Request.QueryString("Page") Is Nothing Then
                CurPage=Convert.ToInt32(Request.QueryString("Page"))
            Else 
                CurPage=1
            End If
 
            objPds.CurrentPageIndex = CurPage-1 
            lblCurrentPage.Text = "Page: " + CurPage.ToString()
 
            If Not objPds.IsFirstPage Then
                lnkPrev.NavigateUrl=Request.CurrentExecutionFilePath + "?id="  + bigid +"&Page=" + Convert.ToString(CurPage-1)
            End If
 
            If Not objPds.IsLastPage Then
                lnkNext.NavigateUrl=Request.CurrentExecutionFilePath + "?id="  + bigid +"&Page="+ Convert.ToString(CurPage+1)
            End If
 
 
 
            DlstInfolist.DataSource=objPds
 
            DlstInfolist.DataKeyField="Supply"
 
            DlstInfolist.DataBind()
 
        }
 
 
End Sub




7.用户密码修改

用户控件:
Button:Btnsubmit
TextBox:TxtNewPwd

存储过程:userpwd_update

C#.Net

程序代码: [ 复制代码到剪贴板 ]
/*
作者:dezai
日期:2006-3-11
用途:用来修改会员的密码
*/

create procedure userpwd_update

@user_ID int,

@user_pwd  char(50)

as
update [user]

set

[UserPwd]=@user_pwd

where 

[userid]=@user_id
GO




c#.Net

程序代码: [ 复制代码到剪贴板 ]
private void Btnsubmit_Click(object sender, System.EventArgs e)
        {
            if(Page.IsValid)
            {
                string userid = Request.QueryString["userid"].Trim();

                SqlConnection conndb = new SqlConnection(System.Configuration.ConfigurationSettings.AppSettings["conn"]);

                conndb.Open();

                SqlCommand Strupdate = new SqlCommand("userpwd_update",conndb);


                Strupdate.CommandType = CommandType.StoredProcedure;


                Strupdate.Parameters.Add("@user_ID",userid);

                Strupdate.Parameters.Add("@user_pwd",TxtNewPwd.Text.Trim());

                Strupdate.ExecuteNonQuery();

                conndb.Close();

                Response.Write("<script language='javascript'>al&#101;rt('Update succesful!');</script>");
            }
            else
            {
                Response.Write("<script language='javascript'>al&#101;rt('Error!');</script>");}


        }




VB.Net


程序代码: [ 复制代码到剪贴板 ]
vb.net


Private  Sub Btnsubmit_Click(ByVal sender As Object, ByVal e As System.EventArgs)
 
 
                Dim userid As String =  Request.QueryString("userid").Trim() 
 
                Dim conndb As SqlConnection =  New SqlConnection(System.Configuration.ConfigurationSettings.AppSettings("conn")) 
 
                conndb.Open()
 
                Dim Strupdate As SqlCommand =  New SqlCommand("userpwd_update",conndb) 
 
                Strupdate.CommandType = CommandType.StoredProcedure
 
 
                Strupdate.Parameters.Add("@user_ID",userid)
 
                Strupdate.Parameters.Add("@user_pwd",TxtNewPwd.Text.Trim())
 
                Strupdate.ExecuteNonQuery()
 
                conndb.Close()
 
                Response.Write("<script language='javascript'>al&#101;rt('Update succesful!');</script>")
 
 
 
End Sub




8.发送E-mail:

用户控件:
Butoon:Button1 
TextBox: TxtSubject
Label:LblUsername

c#

注意:要记得引用Jmail组件

程序代码: [ 复制代码到剪贴板 ]
private void Button1_Click(object sender, System.EventArgs e)
        {
            
            jmail.Message     Jmail=new   jmail.Message();

            DateTime   t=DateTime.Now;       
            String   Subject=TxtSubject.Text.Trim();;       
            String   body="Hello"+LblUsername.Text.Trim();
            String   FromEmail="eastjazz@163.com";       
            String   ToEmail=LblUseremail.Text.Trim();
            //Silent属性:如果设置为true,JMail不会抛出例外错误.   JMail.   Send(   ()   会根据操作结果返回true或false
            Jmail.Silent=true;
            //Jmail创建的日志,前提loging属性设置为true
            Jmail.Logging=true;
            //字符集,缺省为"US-ASCII"
            Jmail.Charset="GB2312";
            //信件的contentype.   缺省是"text/plain")   :   字符串如果你以HTML格式发送邮件,   改为"text/html"即可。
            Jmail.ContentType="text/html";
            //添加收件人
            Jmail.AddRecipient(ToEmail,"","");
            Jmail.From=FromEmail;
            //发件人邮件用户名
            Jmail.MailServerUserName="dezaiiloveu"   ;
            //发件人邮件密码
            Jmail.MailServerPassWord="dezaistudio"   ;
            //设置邮件标题
            Jmail.Subject=Subject;
            //邮件添加附件,(多附件的话,可以再加一条Jmail.AddAttachment(   "c://test.jpg",true,null);)就可以搞定了。[注]:加了附件,讲把上面的Jmail.ContentType="text/html";删掉。否则会在邮件里出现乱码。
            
            //邮件内容
            Jmail.Body=body+t.ToString();
            //Jmail发送的方法
            Jmail.Send("smtp.163.com",false);
            Jmail.Close()   ;

            InkBack.Visible=true;

            InkBack.NavigateUrl="index.aspx";

        }
    }


VB.Net

程序代码: [ 复制代码到剪贴板 ]
Private  Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
 
            Dim Jmail As jmail.Message = New jmail.Message() 
 
            Dim t As DateTime = DateTime.Now 
            Dim Subject As String = TxtSubject.Text.Trim()  
            Dim body As String = "Hello"+LblUsername.Text.Trim() 
            Dim FromEmail As String = "eastjazz@163.com" 
            Dim ToEmail As String = LblUseremail.Text.Trim() 
            'Silent属性:如果设置为true,JMail不会抛出例外错误.   JMail.   Send(   ()   会根据操作结果返回true或false
            Jmail.Silent=True
            'Jmail创建的日志,前提loging属性设置为true
            Jmail.Logging=True
            '字符集,缺省为"US-ASCII"
            Jmail.Charset="GB2312"
            '信件的contentype.   缺省是"text/plain")   :   字符串如果你以HTML格式发送邮件,   改为"text/html"即可。
            Jmail.ContentType="text/html"
            '添加收件人
            Jmail.AddRecipient(ToEmail,"","")
            Jmail.From=FromEmail
            '发件人邮件用户名
            Jmail.MailServerUserName="dezaiiloveu"   
            '发件人邮件密码
            Jmail.MailServerPassWord="dezaistudio"   
            '设置邮件标题
            Jmail.Subject=Subject
            '邮件添加附件,(多附件的话,可以再加一条Jmail.AddAttachment(   "c://test.jpg",true,null);)就可以搞定了。[注]:加了附件,讲把上面的Jmail.ContentType="text/html";删掉。否则会在邮件里出现乱码。
 
            '邮件内容
            Jmail.Body=body+t.ToString()
            'Jmail发送的方法
            Jmail.Send("smtp.163.com",False)
            Jmail.Close()   
 
            InkBack.Visible=True
 
            InkBack.NavigateUrl="index.aspx"
 
End Sub
    }


9.asp.net获取复选框所选的值

c#.net
方法1:

程序代码: [ 复制代码到剪贴板 ]
:
public static string GetCheckBoxListValue(CheckBoxList CBList)
    {
        string strTemp = "";
       
        for (int i = 0; i < CBList.Items.Count; i++)
        {
            if (CBList.Items[i].Selected)
            {
                if (strTemp == "")
                {
                    strTemp = CBList.Items[i].Value;
                }
                else
                {
                    strTemp += "," + CBList.Items[i].Value;
                }
            }
        }

        return strTemp;
    }




方法2:

程序代码: [ 复制代码到剪贴板 ]
CheckBoxListMessage.Text="";
for (int i=0; i<checkboxlist1.Items.Count; i++)
{
if (checkboxlist1.Items[i].Selected)
{
   CheckBoxListMessage.Text += checkboxlist1.Items[i].Text + "<br/>";
}
}



10数据库的备份与恢复

程序代码: [ 复制代码到剪贴板 ]
<%@ Page %>
<HTML>
    <HEAD>
        <title>获取服务器端数据库列表示例</title>
        <% @Import Namespace="System.Data" %>
        <% @Import Namespace="System.Data.SqlClient" %>
        <script language="C#" runat="server">

// 注意本节的数据库连接字符串
string ConnStr = System.Configuration.ConfigurationSettings.AppSettings["conn"];

void Page_Load(object sender, System.EventArgs e)
{
if(!IsPostBack)
{
// 创建连接及执行数据库操作
string db_query = "sp_helpdb";

SqlCommand myCommand = new SqlCommand(db_query, new SqlConnection(ConnStr));
myCommand.Connection.Open();
SqlDataReader dr = myCommand.ExecuteReader();

// 将数据库列表绑定到下拉列表控件(DropDownList)
dbDropDownList.DataSource = dr;
dbDropDownList.DataTextField = "name";
dbDropDownList.DataBind();

//关闭DataReader对象和数据库连接
dr.Close();
myCommand.Connection.Close();
}
}

void dbDropDownList_SelectedIndexChanged(object sender, System.EventArgs e)
{
pathTextBox.Text = @"d:/BACKUP/" + dbDropDownList.SelectedValue + ".bak";
}

void backupButton_Click(object sender, System.EventArgs e)
{
string path = pathTextBox.Text;
string dbname = dbDropDownList.SelectedValue;

string backupSql = "use master;";
backupSql += "backup database @dbname to disk = @path;";

SqlCommand myCommand = new SqlCommand(backupSql, new SqlConnection(ConnStr));

myCommand.Parameters.Add("@dbname", SqlDbType.Char);
myCommand.Parameters["@dbname"].Value = dbname;
myCommand.Parameters.Add("@path", SqlDbType.Char);
myCommand.Parameters["@path"].Value = path;

try
{
myCommand.Connection.Open();
myCommand.ExecuteNonQuery();
infoLabel.Text = "备份成功";
}
catch(Exception ex)
{
infoLabel.Text = "备份失败<br/>" + ex.ToString();
}
finally
{
myCommand.Connection.Close();
}
}

void restoreButton_Click(object sender, System.EventArgs e)
{
string path = pathTextBox.Text;
string dbname = dbDropDownList.SelectedValue;

string restoreSql = "use master;";
restoreSql += "restore database @dbname from disk = @path;";

SqlCommand myCommand = new SqlCommand(restoreSql, new SqlConnection(ConnStr));

myCommand.Parameters.Add("@dbname", SqlDbType.Char);
myCommand.Parameters["@dbname"].Value = dbname;
myCommand.Parameters.Add("@path", SqlDbType.Char);
myCommand.Parameters["@path"].Value = path;

try
{
myCommand.Connection.Open();
myCommand.ExecuteNonQuery();
infoLabel.Text = "恢复成功";
}
catch(Exception ex)
{
infoLabel.Text = "恢复失败<br/>" + ex.ToString();
}
finally
{
myCommand.Connection.Close();
}
}

        </script>
    </HEAD>
    <body>
        <form id="Form1" method="post" runat="server">
            <h3>&nbsp;</h3>
            数据库列表:
            <asp:dropdownlist id="dbDropDownList" runat="server" AutoPostBack="True" OnSelectedIndexChanged="dbDropDownList_SelectedIndexChanged"></asp:dropdownlist>
            <br>
            <br>
            请输入备份目录及备份文件名:
            <asp:textbox id="pathTextBox" runat="server" Width="224px">
C:/BACKUP/Northwind.bak</asp:textbox>(目录必须存在)
            <br>
            <br>
            <asp:button id="backupButton" runat="server" Font-Size="9pt" Text="备份数据库" OnClick="backupButton_Click"></asp:button>
            <asp:button id="restoreButton" runat="server" Font-Size="9pt" Text="恢复数据库" OnClick="restoreButton_Click"></asp:button>
            <br>
            <br>
            <asp:Label id="infoLabel" runat="server"></asp:Label>
        </form>
    </body>
</HTML>




11.C#防注入函数


程序代码: [ 复制代码到剪贴板 ]
  public string SafeRequest(string ParaName,int ParaType) 
  { 
   //如果是1为数字,0为字符串
   string Paravalue=""; 
   Paravalue = ParaName; 
   if (ParaType==1) 
   { 
    if(!(IsNumeric(Paravalue))) 
    { 
     Paravalue="0";
    } 
   } 
   else 
   { 
    Paravalue=Paravalue.Replace("'","’"); 
   } 
   return(Paravalue); 
  } 

  public static bool IsNumeric(string strData) 
  { 
   float fData; 
   bool bValid = true; 
   if(strData.Length>12)
   {
    bValid = false;
   }
   else
   {
    try 
    { 
     fData = float.Parse(strData); 
    } 
    catch (FormatException) 
    { 
     bValid = false; 
    } 
   }
   return bValid; 
  }


  private void Button1_Click(object sender, System.EventArgs e)
  {
   Label1.Text=SafeRequest(TextBox1.Text,1);
  }
 




暂时先整理到这里,慢慢再补上吧,请大家多多指教:)  
 

ASP.Net学习之常用模块整理

  • 2011年10月28日 21:57
  • 88KB
  • 下载

构建ASP.NET MVC4+EF5+EasyUI+Unity2.x注入的后台管理系统(23)-权限管理系统-角色组模块

系列目录 距离上次发布22讲已经有少许日子了,真是太抱歉,最近年关项目比较急,时间太紧,没有时间发布.请大家见谅 接下来我们的目标是 角色组管理 角色组权限设置 用户管理 把角色组授权...
  • ymnets
  • ymnets
  • 2016年02月22日 12:57
  • 760

ASP.NET中常用的三十三种代码 2

16.模板列 www.knowsky.com <ASP:TEMPLATECOLUMN visible="False" sortexpression="demo" headertext="ID"> <I...
  • xingan
  • xingan
  • 2011年04月24日 22:53
  • 428

asp.net典型模块与项目开发大全2

  • 2012年08月17日 08:59
  • 25.44MB
  • 下载

学习asp.net小模块总结

7月底到了新公司,以前只学过JAVA开发,在大四实习期间,由于实习单位的项目都比较老,陆陆续续学习了些Pb和Dephi开发,可能因为先接触Java的原因,对Pb和Dephi控件的形式感觉很别扭,心里也...

asp.net常用代码收集2

  • 2010年07月04日 14:18
  • 508KB
  • 下载

asp.net 常用知识点汇总整理

1、后台动态创建DataTable,并绑定Repeater DataTable dtNew = new DataTable(); dtNew.Column...

ASP.NET常用信息保持状态学习笔记二

2012-05-11 22:06   3、Session          Session数据保存在服务器端中。每个客户端的相关session都独立存储,因为SessionId以coo...
  • YunanWu
  • YunanWu
  • 2012年11月16日 19:59
  • 538

ASP.NET常用信息保持状态学习笔记一

2012-05-08 19:57 1、ViewState:ViewState是ASP.NET中.aspx特有的,通过HTTP报文传递,所有服务器端控件的值都会自动保存在ViewState   中...
  • YunanWu
  • YunanWu
  • 2012年11月16日 19:51
  • 550

黑马程序员之 ASP.NET学习笔记:GridView控件的常用属性及方法

GridView控件的常用属性 (1)AllowPaging属性 该属性默认为False,即不启用分页功能,若要允许分页则将该属性值改为True。 (2)AllowSorting属性 该属性默认为Fa...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:ASP.Net学习之常用模块整理(2)
举报原因:
原因补充:

(最多只允许输入30个字)