System.Web.UI.ScriptManager”的方法“get_EnableCdn”没有实现

解决VS2010打开VS2008项目并升级至.NET4.0后的问题,通过修改web.config文件中的assemblyBinding设置,确保项目正常运行。

在vs2010打开vs2008项目时,由.net2.0换成.net4.0后出现的问题,后再web.config改动一下

 

在<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1"> 中添加appliesTo="v2.0.50727",如下图

再次运行就好了

using System; using System.Collections.Generic; using System.Data; using System.Linq; using System.Web; using System.Web.UI; using System.Web.UI.WebControls; public partial class Cart : System.Web.UI.Page { protected void Page_Load(object sender, EventArgs e) { if (!IsPostBack) { BindCart(); } } private void BindCart() { // 获取购物车数据 DataTable cart = GetCartData(); // 绑定到GridView CartGridView.DataSource = cart; CartGridView.DataBind(); // 计算并显示总金额 decimal total = 0; foreach (DataRow row in cart.Rows) { total += Convert.ToDecimal(row["Subtotal"]); } TotalAmountLabel.Text = total.ToString("F2"); } private DataTable GetCartData() { // 这里应该从数据库或Session中获取购物车数据 // 这里只是一个示例,实际应用中需要替换为真实的数据获取逻辑 DataTable dt = new DataTable(); dt.Columns.Add("ProductID", typeof(int)); dt.Columns.Add("Name", typeof(string)); dt.Columns.Add("ImagePath", typeof(string)); dt.Columns.Add("Price", typeof(decimal)); dt.Columns.Add("Quantity", typeof(int)); dt.Columns.Add("Subtotal", typeof(decimal)); // 示例数据 - 实际应用中应从数据库或Session中获取 dt.Rows.Add(1, "商品1", "images/product1.jpg", 99.99, 2, 199.98); dt.Rows.Add(2, "商品2", "images/product2.jpg", 199.99, 1, 199.99); return dt; } protected void CartGridView_RowCommand(object sender, GridViewCommandEventArgs e) { if (e.CommandName == "UpdateQuantity") { int rowIndex = Convert.ToInt32(e.CommandArgument); GridViewRow row = CartGridView.Rows[rowIndex]; TextBox quantityTextBox = (TextBox)row.FindControl("QuantityTextBox"); int newQuantity = Convert.ToInt32(quantityTextBox.Text); int productId = Convert.ToInt32(CartGridView.DataKeys[rowIndex].Value); // 更新购物车中商品数量 UpdateCartItemQuantity(productId, newQuantity); // 重新绑定数据 BindCart(); } } protected void CartGridView_RowDeleting(object sender, GridViewDeleteEventArgs e) { int productId = Convert.ToInt32(CartGridView.DataKeys[e.RowIndex].Value); // 从购物车中删除商品 RemoveFromCart(productId); // 重新绑定数据 BindCart(); } private void UpdateCartItemQuantity(int productId, int newQuantity) { // 实际应用中应该更新数据库或Session中的购物车数据 // 这里只是示例 } private void RemoveFromCart(int productId) { // 实际应用中应该从数据库或Session中移除商品 // 这里只是示例 } protected void CheckoutBtn_Click(object sender, EventArgs e) { // 结算逻辑 // 可以跳转到结算页面或直接处理订单 // 示例: 显示结算成功消息 ScriptManager.RegisterStartupScript(this, GetType(), "checkoutSuccess", "alert('结算成功,感谢您的购买!');", true); // 清空购物车 ClearCart(); // 重新绑定空购物车 BindCart(); } private void ClearCart() { // 实际应用中应该清空数据库或Session中的购物车数据 // 这里只是示例 } }把控件内容补充完整
06-19
我为你提供订单管理的后台页面,请你重新为我生成支付页面的前后端完整代码。using System; using System.Data; using System.Data.SqlClient; using System.Web.UI; using System.Web.UI.WebControls; public partial class orders : System.Web.UI.Page { protected void Page_Load(object sender, EventArgs e) { if (!IsPostBack) { // 检查用户是否登录 if (Session["user_id"] == null) { Response.Redirect("login.aspx?returnUrl=orders.aspx"); return; } BindOrders(); } } private void BindOrders() { int userId = Convert.ToInt32(Session["user_id"]); // 查询用户的所有订单 string sql = @" SELECT o.order_id, o.order_date, o.total_amount, o.payment_status, o.shipping_address FROM orders o WHERE o.user_id = @user_id ORDER BY o.order_date DESC"; SqlParameter[] parameters = { new SqlParameter("@user_id", userId) }; DataTable dtOrders = GetData(sql, parameters); if (dtOrders.Rows.Count > 0) { rptOrders.DataSource = dtOrders; rptOrders.DataBind(); } else { pnlNoOrders.Visible = true; } } protected void rptOrders_ItemDataBound(object sender, RepeaterItemEventArgs e) { if (e.Item.ItemType == ListItemType.Item || e.Item.ItemType == ListItemType.AlternatingItem) { // 获取当前订单ID DataRowView row = (DataRowView)e.Item.DataItem; int orderId = Convert.ToInt32(row["order_id"]); // 查询订单明细 string sql = @" SELECT oi.quantity, oi.unit_price, e.event_id, e.title, e.show_time, e.venue, e.city, e.cover_img FROM order_items oi JOIN events e ON oi.event_id = e.event_id WHERE oi.order_id = @order_id"; SqlParameter[] parameters = { new SqlParameter("@order_id", orderId) }; DataTable dtItems = GetData(sql, parameters); // 绑定订单明细 Repeater rptOrderItems = (Repeater)e.Item.FindControl("rptOrderItems"); rptOrderItems.DataSource = dtItems; rptOrderItems.DataBind(); } } protected void btnPay_Click(object sender, EventArgs e) { Button btn = (Button)sender; int orderId = Convert.ToInt32(btn.CommandArgument); // 跳转到支付页面 Response.Redirect("pay.aspx?order_id={orderId}"); } protected void btnCancel_Click(object sender, EventArgs e) { Button btn = (Button)sender; int orderId = Convert.ToInt32(btn.CommandArgument); // 取消订单逻辑 string sql = "UPDATE orders SET payment_status = 2 WHERE order_id = @order_id"; SqlParameter[] parameters = { new SqlParameter("@order_id", orderId) }; if (ExecuteNonQuery(sql, parameters) > 0) { // 重新绑定订单列表 BindOrders(); // 显示成功消息 ScriptManager.RegisterStartupScript(this, GetType(), "showalert", "alert('订单已取消');", true); } } // 获取封面图片URL public string GetCoverImage(object coverImg) { if (coverImg == DBNull.Value || string.IsNullOrEmpty(coverImg.ToString())) { return ResolveUrl("~/Pic/temp.jpg"); } string imagePath = coverImg.ToString().Trim(); if (imagePath.StartsWith("~/")) { return ResolveUrl(imagePath); } if (!imagePath.StartsWith("Pic/")) { imagePath = "Pic/" + imagePath; } if (!imagePath.StartsWith("~/")) { imagePath = "~/" + imagePath; } return ResolveUrl(imagePath); } // 获取状态CSS类 public string GetStatusCssClass(int status) { switch (status) { case 1: return "status-paid"; // 已支付 case 2: return "status-canceled"; // 已取消 default: return "status-unpaid"; // 未支付 } } // 获取状态文本 public string GetStatusText(int status) { switch (status) { case 1: return "已支付"; case 2: return "已取消"; default: return "待支付"; } } // 通用数据访问方法 private DataTable GetData(string sql, SqlParameter[] parameters = null) { string connStr = System.Configuration.ConfigurationManager.ConnectionStrings["TicketDB"].ConnectionString; using (SqlConnection conn = new SqlConnection(connStr)) { SqlCommand cmd = new SqlCommand(sql, conn); if (parameters != null) { cmd.Parameters.AddRange(parameters); } SqlDataAdapter da = new SqlDataAdapter(cmd); DataTable dt = new DataTable(); da.Fill(dt); return dt; } } // 执行非查询SQL private int ExecuteNonQuery(string sql, SqlParameter[] parameters = null) { string connStr = System.Configuration.ConfigurationManager.ConnectionStrings["TicketDB"].ConnectionString; using (SqlConnection conn = new SqlConnection(connStr)) { conn.Open(); SqlCommand cmd = new SqlCommand(sql, conn); if (parameters != null) { cmd.Parameters.AddRange(parameters); } return cmd.ExecuteNonQuery(); } } }
最新发布
06-22
Imports System.Data Imports NPOI.HSSF.UserModel Imports NPOI.SS.UserModel Imports System.Collections.Generic Partial Class MIT2_AcceptQuery Inherits System.Web.UI.Page Dim db As SqlDb = New SqlDb() Dim ds As DataSet Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load If Not IsPostBack Then Dim sql = "SELECT DISTINCT 公司編號,公司名稱 FROM MITDEVIL.料號_count" ddlDataSet(pear, sql, "公司名稱", "公司編號") End If End Sub Sub ddlDataSet(ByVal dll As DropDownList, ByVal sql As String, ByVal text As String, ByVal value As String) ds = db.FillDataSet(sql) dll.Items.Clear() dll.DataSource = ds dll.DataTextField = text dll.DataValueField = value dll.DataBind() dll.Items.Insert(0, "") End Sub Protected Sub BTN_search_Click(sender As Object, e As System.EventArgs) Handles BTN_search.Click Dim sql As String = "SELECT 驗收單號 ,驗收序號 ,驗收人員 ,CONVERT(varchar(10),資料日期,111) 資料日期 ," & _ " 廠商編號 ,廠商名稱 ,料號 ,品名規格, 數量, 價格 ,單位 ,幣別 ,備註 ,廠別 ,匯率 ,異動類型 ," & _ " CONVERT(varchar(10),異動日期 ,111) 異動日期 ,集團類別 ,Price_Copy,Money,Date_Price_Copy " & _ " FROM [MITDEVIL].[計劃異動] WHERE 1=1 " If pear.Text = "" Then System.Web.UI.ScriptManager.RegisterStartupScript(UpdatePanel1, GetType(UpdatePanel), "AjaxMsgBox", "alert('請選擇基準公司!');", True) Exit Sub Else sql = sql + " AND 公司編號='" + pear.SelectedItem.Value + "'" End If If part_number.Text <> "" Then sql = sql + " AND 料號='" + part_number.Text + "'" End If If stradate.Value <> "" Then sql = sql + " AND 資料日期 >='" + stradate.Value + "'" End If If enddate.Value <> "" Then sql = sql + " AND 資料日期 <= '" + enddate.Value + "'" End If If createdate.Value <> "" Then sql = sql + " AND convert(char(10),創建日期,111) = convert(char(10),'" + createdate.Value + "',111)" End If sql = sql + " ORDER BY 資料日期 DESC " ViewState("AcceptDT") = db.FillDataSet(sql).Tables(0) GridView1.DataSource = db.FillDataSet(sql) ViewState("sql") = sql GridView1.DataBind() End Sub Protected Sub btn_export_Click(sender As Object, e As System.EventArgs) Handles btn_export.Click Dim arr As New ArrayList Try arr.Add("驗收單號") arr.Add("驗收序號") arr.Add("驗收人員") arr.Add("資料日期") arr.Add("廠商編號") arr.Add("廠商名稱") arr.Add("料號") arr.Add("品名規格") arr.Add("數量") arr.Add("價格") arr.Add("單位") arr.Add("幣別") arr.Add("備註") arr.Add("廠別") arr.Add("匯率") arr.Add("異動類型") arr.Add("異動日期") arr.Add("集團類別") arr.Add("價格冊單價") arr.Add("價格冊幣別") arr.Add("價格冊生效日期") SaveDate(CreateExcel(db.FillDataSet(ViewState("sql")), arr), "驗收單資料.xls") Catch ex As Exception Page.ClientScript.RegisterClientScriptBlock(Me.GetType(), "MsgBox", "alert(轉檔失敗,請重試或者聯繫系統負責人');", True) ' Return End Try End Sub Private Function CreateExcel(ByVal ds As DataSet, ByVal arrs As ArrayList) As NPOI.SS.UserModel.IWorkbook Dim workbook As IWorkbook = New NPOI.HSSF.UserModel.HSSFWorkbook() Dim sheet As New ArrayList Dim sheet1 As NPOI.SS.UserModel.ISheet = workbook.CreateSheet(arrs(0)) sheet.Add(sheet1) If arrs.Count = 4 Then Dim sheet4 As NPOI.SS.UserModel.ISheet = workbook.CreateSheet(arrs(3)) sheet.Add(sheet4) End If Dim headstyle As ICellStyle = workbook.CreateCellStyle Dim headfontstyle As HSSFFont = workbook.CreateFont 'Dim textfontstyle As HSSFFont = workbook.CreateFont Dim textstyle As HSSFCellStyle = workbook.CreateCellStyle Dim textstyle2 As HSSFCellStyle = workbook.CreateCellStyle Dim textstyle3 As HSSFCellStyle = workbook.CreateCellStyle Dim textstyle4 As HSSFCellStyle = workbook.CreateCellStyle Dim formact As HSSFDataFormat = workbook.CreateDataFormat Dim arr As New ArrayList With headfontstyle .Boldweight = NPOI.SS.UserModel.FontBoldWeight.Bold End With 'With textfontstyle ' .Boldweight = NPOI.SS.UserModel.FontBoldWeight.Bold ' .Color = NPOI.SS.UserModel.FontColor.Red 'End With With headstyle .Alignment = NPOI.SS.UserModel.HorizontalAlignment.Center ' .VerticalAlignment = SS.UserModel.VerticalAlignment.Center '.WrapText = True .SetFont(headfontstyle) .BorderBottom = NPOI.SS.UserModel.BorderStyle.Thin .BorderLeft = NPOI.SS.UserModel.BorderStyle.Thin .BorderTop = NPOI.SS.UserModel.BorderStyle.Thin .BorderRight = NPOI.SS.UserModel.BorderStyle.Thin End With With textstyle .Alignment = NPOI.SS.UserModel.HorizontalAlignment.Left .BorderBottom = NPOI.SS.UserModel.BorderStyle.Thin .BorderLeft = NPOI.SS.UserModel.BorderStyle.Thin .BorderTop = NPOI.SS.UserModel.BorderStyle.Thin .BorderRight = NPOI.SS.UserModel.BorderStyle.Thin End With With textstyle2 '日期格式的 .Alignment = NPOI.SS.UserModel.HorizontalAlignment.Center .BorderBottom = NPOI.SS.UserModel.BorderStyle.Thin .BorderLeft = NPOI.SS.UserModel.BorderStyle.Thin .BorderTop = NPOI.SS.UserModel.BorderStyle.Thin .BorderRight = NPOI.SS.UserModel.BorderStyle.Thin .DataFormat = HSSFDataFormat.GetBuiltinFormat("yyyy/MM/dd") End With With textstyle3 '數值帶千分位格式的 .Alignment = NPOI.SS.UserModel.HorizontalAlignment.Right .BorderBottom = NPOI.SS.UserModel.BorderStyle.Thin .BorderLeft = NPOI.SS.UserModel.BorderStyle.Thin .BorderTop = NPOI.SS.UserModel.BorderStyle.Thin .BorderRight = NPOI.SS.UserModel.BorderStyle.Thin '.DataFormat = HSSFDataFormat.GetBuiltinFormat("G/通用格式") .DataFormat = formact.GetFormat("0.00") End With With textstyle4 '數值格式的 .Alignment = NPOI.SS.UserModel.HorizontalAlignment.Right .BorderBottom = NPOI.SS.UserModel.BorderStyle.Thin .BorderLeft = NPOI.SS.UserModel.BorderStyle.Thin .BorderTop = NPOI.SS.UserModel.BorderStyle.Thin .BorderRight = NPOI.SS.UserModel.BorderStyle.Thin .DataFormat = formact.GetFormat("0") End With arr.Add(textstyle) arr.Add(textstyle2) arr.Add(textstyle3) arr.Add(textstyle4) '開始寫入SHEET1 '创建行 Dim row As NPOI.SS.UserModel.IRow = sheet(0).CreateRow(0) For k As Integer = 0 To arrs.Count - 1 '创建单元格 Dim cell As NPOI.SS.UserModel.ICell = row.CreateCell(k) '设置单元格值 cell.SetCellValue(arrs(k).ToString) cell.CellStyle = headstyle Next For i As Integer = 0 To ds.Tables(0).Rows.Count - 1 '创建行 row = sheet(0).CreateRow(i + 1) For j As Integer = 0 To ds.Tables(0).Columns.Count - 1 '创建单元格 Dim cell As NPOI.SS.UserModel.ICell = row.CreateCell(j) '设置单元格值 'cell.SetCellValue(ds.Tables(0).Rows(i)(field.Item(j).ToString).ToString) ' cell.CellStyle = textstyle SetCellValueByColumnType(row, j, ds.Tables(0).Rows(i)(j), ds.Tables(0).Columns(j), arr) Next Next For i As Integer = 0 To ds.Tables(0).Columns.Count - 1 sheet(0).AutoSizeColumn(i) Next Return workbook End Function Private Sub SetCellValueByColumnType(ByVal myExcelRow As NPOI.SS.UserModel.IRow, ByVal myNewCellIndex As Integer, _ ByVal myValue As Object, ByVal myDataColumn As DataColumn, ByVal arr As ArrayList) If myExcelRow Is Nothing Then Exit Sub If myNewCellIndex < 0 Then Exit Sub If myValue Is Nothing Then Exit Sub If myDataColumn Is Nothing Then Exit Sub Select Case (myDataColumn.DataType.ToString()) Case "System.String" '://字符串类型 myExcelRow.CreateCell(myNewCellIndex).SetCellValue(myValue.ToString().Trim) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(0) Case "System.DateTime" '://日期类型 If Not IsDBNull(myValue) Then myExcelRow.CreateCell(myNewCellIndex).SetCellValue(Convert.ToDateTime(myValue).ToShortDateString) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(1) Else myExcelRow.CreateCell(myNewCellIndex).SetCellValue(myValue.ToString().Trim) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(0) End If Case "System.Boolean" '://布尔型 If Not IsDBNull(myValue) Then If Convert.ToBoolean(myValue) Then myExcelRow.CreateCell(myNewCellIndex).SetCellValue("True") Else myExcelRow.CreateCell(myNewCellIndex).SetCellValue("False") End If End If Case "System.Int16", "System.Int32", "System.Int64" '://整型 If Not IsDBNull(myValue) Then myExcelRow.CreateCell(myNewCellIndex).SetCellValue(Convert.ToInt64(myValue)) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(3) Else myExcelRow.CreateCell(myNewCellIndex).SetCellValue(myValue.ToString().Trim) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(0) End If Case "System.Byte" If Not IsDBNull(myValue) Then myExcelRow.CreateCell(myNewCellIndex).SetCellValue(Convert.ToByte(myValue)) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(0) Else myExcelRow.CreateCell(myNewCellIndex).SetCellValue(myValue.ToString().Trim) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(0) End If Case "System.Decimal" '://浮点型 If Not IsDBNull(myValue) Then myExcelRow.CreateCell(myNewCellIndex).SetCellValue(Convert.ToDecimal(myValue)) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(2) Else myExcelRow.CreateCell(myNewCellIndex).SetCellValue(myValue.ToString().Trim) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(0) End If Case "System.Double" If Not IsDBNull(myValue) Then myExcelRow.CreateCell(myNewCellIndex).SetCellValue(Convert.ToDouble(myValue)) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(2) Else myExcelRow.CreateCell(myNewCellIndex).SetCellValue(myValue.ToString().Trim) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(0) End If Case Else myExcelRow.CreateCell(myNewCellIndex).SetCellValue(myValue.ToString().Trim) myExcelRow.GetCell(myNewCellIndex).CellStyle = arr(0) End Select End Sub Private Sub SaveDate(ByVal workbook As NPOI.SS.UserModel.IWorkbook, ByVal ExcelName As String) Dim ms As IO.MemoryStream Try '建立資料流 ms = New IO.MemoryStream() '寫入資料流 workbook.Write(ms) '在頁面輸出資料 Dim filename As String = "attachment;filename=" & HttpUtility.UrlEncode(ExcelName, Encoding.UTF8).ToString() Response.AddHeader("Content-Disposition", filename) Response.BinaryWrite(ms.ToArray()) Catch ex As Exception Finally '釋放資源 If Not ms Is Nothing Then ms.Dispose() ms.Close() End If End Try End Sub Protected Sub GridView1_PageIndexChanging(sender As Object, e As System.Web.UI.WebControls.GridViewPageEventArgs) Handles GridView1.PageIndexChanging GridView1.PageIndex = e.NewPageIndex GridView1.DataSource = ViewState("AcceptDT") GridView1.DataBind() End Sub End Cl给gridciew1绑定一个翻页功能
06-21
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值