标准可部署的wsp自己写代码

<asp:Button ID="sp" runat="server" Text="审批" onclick="sp_Click" />
<asp:Label ID="Label1" runat="server" Text="Label"></asp:Label>

 protected void Page_Load(object sender, EventArgs e)
        {

            Label1.Text = DateTime.Now.ToString("yyyy年MM月dd日");
        }

        protected void sp_Click(object sender, EventArgs e)
        {
            string id = Page.Request["ID"];
            this.UploadFileToDocLib(SPContext.Current.Web, "发送记录", id);

        }
        public void UploadFileToDocLib(SPWeb web, string docLibName,string chname)
        {
            web.AllowUnsafeUpdates = true;//设置允许更改
            SPListItem li = web.Lists["新建"].GetItemById(int.Parse(chname));
            SPList jl = web.Lists.TryGetList(docLibName);//实例化列表名称
            //SPList yp = web.Lists["阅批意见"];//实例化列表名称
            //SPListItem yt = yp.Items.Add();
            SPListItem it = jl.Items.Add();
            it["Title"] = li["Title"];
            //it["来文单位"] = li["来文单位"];
            //it["文号"] = li["文号"];
            //it["来文时间"] = li["来文时间"];
            //it["收文编号"] = li["收文编号"];
            //it["密级"] = li["密级"];
            //it["内容"] = li["内容"];
            //it["拟办意见"] = li["拟办意见"];
            //it["领导批示"] = li["领导批示"];
            //it["阅批意见"] = li["阅批意见"];
            //it["阅批姓名"] = SPContext.Current.Web.CurrentUser.Name;
            //it["阅批日期"] = Label1.Text;
            //yt["Title"] = li["Title"];
            //yt["来文单位"] = li["来文单位"];
            //yt["文号"] = li["文号"];
            //yt["来文时间"] = li["来文时间"];
            //yt["收文编号"] = li["收文编号"];
            //yt["密级"] = li["密级"];
            //yt["内容"] = li["内容"];
            //yt["拟办意见"] = li["拟办意见"];
            //yt["领导批示"] = li["领导批示"];
            //yt["阅批意见"] = li["阅批意见"];
            //yt["阅批姓名"] = SPContext.Current.Web.CurrentUser.Name;
            //yt["阅批日期"] = Label1.Text;
            it["附件"] = li["附件"];
            //yt.Update();
            it.Update();
            li.Delete();
        }
    }