用ASP.NET如何实现EXCEL中的用户积分导入SQL数据库

ASP代码中如何把EXCEL数据导入到SQL SERVER数据库中?~

'定义打开Excel表格的函数
Function OpenExcel(path)
dim excel,rs,strsql
On Error Resume Next
Set rs = Server.CreateObject("ADODB.RecordSet")
Set excel = Server.CreateObject("ADODB.Connection")
excel.Open "Driver={Microsoft Excel Driver (*.xls)};DBQ=" & path
If Err.number 0 Then
Response.Write "请检查上传的Excel文件内部格式，文件无法打开，导入失败！"
Response.End
End If
strsql = "SELECT * FROM [Sheet1$]" '在这里指定工作薄名称,默认是Sheet1$
Set rs = excel.Execute(strsql)
Set OpenExcel = rs
End Function


'读取文件中的内容
Dim rsInfo
Set rsInfo = Server.CreateObject("ADODB.RecordSet")
Set rsInfo = OpenExcel("E:/a.xls") '这里的文件路径请用Server.Path来获取

'检查读取结果
If rsInfo.State 1 Then
Response.Write "请检查Excel文件中的工作表命名是否为Sheet1，导入失败！"
Response.End
End If

If rsInfo.EOF And rsInfo.BOF Then
Response.Write "没有找到Excel表中的数据，导入失败！"
Response.End
End If

If IsNull(rsInfo.Fields(0)) or Trim(rsInfo.Fields(0))="" Then
Response.Write "没有找到Excel表中的数据，导入失败！"
Response.End
End If

'这里指定导入数据的列数,列数少了退出
If rsInfo.Fields.Count< 7 Then
Response.Write "Excel表中的数据列数不正确，导入失败！"
Response.End
End If

'创建数据库连接
dim dbrs,conn,sql
Set conn = Server.CreateObject("ADODB.Connection")
Set dbrs = Server.CreateObject("ADODB.Recordset")
'注: G_DB_ConnectString是连接数据库的字符串,自己定义
conn.ConnectionString = G_DB_ConnectString
conn.Open '打开数据库连接

'创建临时表
sql = "IF EXISTS (SELECT * FROM sysobjects WHERE xtype='U' and name='tmp_PartRes') "
sql = sql & "BEGIN Drop table tmp_PartRes END "
sql = sql & "Create table tmp_PartRes([ID] int identity(1,1),"
sql = sql & "PartID varchar(100),Brand varchar(100),[Package] varchar(100),"
sql = sql & "BatchNo varchar(100),[Price] varchar(100),[Stock] varchar(100) default('0'),"
sql = sql & "Brief varchar(100),StockFlag int default(1),"
sql = sql & "SuperFlag int default(1),SaleFlag int default(1))"
conn.execute sql

'取表结构 注意: 只取表的结构, 不要数据, 因为我这个是刚创建的临时表, 没有数据,
'如果表中存在数据, 要注意加上条件句, 防止取到数据 如: where ID = -1
sql = "SELECT * FROM tmp_PartRes"
dbrs.CursorLocation = 3 '这一定要设置为3
dbrs.Open sql,conn, 3, 4 '这里的参数必须是3和4

'取到表结构后, 必须要把活动连接及数据库连接关闭,这个很重要, 否则导入速度特慢.
Set dbrs.ActiveConnection = Nothing
conn.close

'提取Excel中的数据, 将excel中的数据放入到数据库表中.
While Not rsInfo.EOF
If Trim(rsInfo.Fields(0)) "" Then
dbrs.AddNew
dbrs("PartID") = Ucase(Trim(rsInfo.Fields(0)))
dbrs("Brand") = Trim(rsInfo.Fields(1))
dbrs("Package") = Trim(rsInfo.Fields(2))
dbrs("BatchNo") = Trim(rsInfo.Fields(3))
dbrs("Price") = Trim(rsInfo.Fields(4))
If Trim(rsInfo.Fields(5))"" Then
dbrs("Stock") = Trim(rsInfo.Fields(5))
Else
dbrs("Stock") = "0"
End If
dbrs("Brief") = Trim(rsInfo.Fields(6))
End If
rsInfo.MoveNext
Wend

'更新记录集到数据库临时表
conn.Open '打开连接
dbrs.ActiveConnection = conn
dbrs.UpdateBatch '批量更新函数

'更新完成后, 关闭连接
dbrs.Close
Set dbrs = Nothing
rsInfo.Close
Set rsInfo = Nothing

没有直接的方法。
1、要操作Excel，首先需要引用Microsoft Office 11.0 Object Library

2、包含
using System.Runtime.InteropServices; // For COMException
using Excel;

3.用该命名空间的类。操作Excel得到其中行列数据。得到数据后，存入SqlServer就行了。

怎么操作Excel，我就不说了。网上多的是。Copy一下，根据自己的实际情况修改。

思路，先把EXcel传到服务器，导入本地的可以进行。先改变数据源的连接改为上传的excel，通过Dataset把EXcel里的数据读出来，分别用asp.net操作Sql语句把数据写入数据库中。

下面是一个"上传文件"按钮事件代码

protected void btnOk_Click(object sender, EventArgs e)
{
string fileName= ex.PostedFile.FileName.ToString().Trim();
if (fileName == "")
{
Response.Write("<script>alert('请选择标准的Excel文件！')</script>");
}
else
{

string NewDocName = "";

string strFile = this.ex.PostedFile.FileName;
int length = strFile.Length;
int intID = strFile.LastIndexOf(".");
int Len = strFile.LastIndexOf("\\") + 1;

string OldDocName = strFile.Substring(Len, intID - Len);

string m, d, h, f, s, docName;
m = System.DateTime.Now.Month.ToString();
d = System.DateTime.Now.Day.ToString();
h = System.DateTime.Now.Hour.ToString();
f = System.DateTime.Now.Minute.ToString();
s = System.DateTime.Now.Second.ToString();
docName = OldDocName + (m + d + h + f + s).ToString();
string type = strFile.Substring(intID, length - intID);//文件类型
NewDocName = docName + type;//获得生成的文件名称

string path = Request.PhysicalApplicationPath + "\\PaperMiniature\\" + NewDocName;
string filepath = "\\PaperMiniature\\" + NewDocName;//文件保存路径
this.txtHidFileName.Value = filepath; // 文件保存路径临时存放在隐藏控件中
this.ex.PostedFile.SaveAs(path);//保存文件上传内容

string sss = Server.MapPath(Page.Request.ApplicationPath);//获得应用程序的路径
string source = sss + "\\PaperMiniature\\" + NewDocName;//完整的文件名

try
{
string cnStr = @"Provider = Microsoft.Jet.OLEDB.4.0 ; Data Source ='" + source + "';Extended Properties=Excel 8.0";

cn = new OleDbConnection(cnStr);

cn.Open();//打开连接
OleDbCommand cmd = new OleDbCommand("select * from [Sheet1$]", cn);

OleDbDataAdapter da = new OleDbDataAdapter("select * from [Sheet1$]", cn);
DataSet ds = new DataSet();
da.Fill(ds, "sheet");

cnTeacher.Open();
DataTable dt = ds.Tables["sheet"];

int n = dt.Rows.Count;//获得教师的Excel的记录数

for (int i = 0; i < n; i++)
{
//调用教师信息录入的存储过程
string sql = @"exec teacher_insert
@name='" + dt.Rows[i]["教师姓名"].ToString() + "',@roleID=" + dt.Rows[i]["权限"].ToString() + ",@sex='" + dt.Rows[i]["性别"].ToString() + "',@sdpet='"
+ dt.Rows[i]["系部"].ToString() + "',@tel='" + dt.Rows[i]["电话"].ToString() + "'";
cmd1 = new SqlCommand(sql, cnTeacher);
cmd1.ExecuteNonQuery();
}
Response.Write("<script>alert('批量导入成功！')</script>");
cnTeacher.Close();
cn.Close();//关闭连接
}
catch
{
Response.Write(@"<script>alert('请确认你的Excel含有如下表头：教师姓名、权限、性别、系部、电话，并且是存在的名为" + "Sheet1$" + "里')</script>");
cn.Close();//关闭连接
}
}

//该方法实现从Excel中导出数据到DataSet中，其中filepath为Excel文件的绝对路径，sheetname为表示那个Excel表；
public DataSet ExcelDataSource( string filepath , string sheetname )
{
string strConn;
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + filepath + ";Extended Properties=Excel 8.0;";
OleDbConnection conn = new OleDbConnection(strConn);
OleDbDataAdapter oada = new OleDbDataAdapter ( "select * from [" + sheetname + "$]", strConn );
DataSet ds = new DataSet ();
oada.Fill ( ds );
return ds ;
}

上面的代码实现了将Excel中的数据写进DataSet中，实现了这一步后，你可以按照自己的需要对获得DataSet进行处理，需要注意的一个问题是，你必须要指定sheetname，即Excel中的哪一个工作单需要导入，否则会出现错误。

导入到了 dataset 你就可以自己去做判断了 如果存在此记录就累加 不存在就新增

研究一下

看这里http://blog.csdn.net/andylaufzf/archive/2008/03/03/2143716.aspx

另外一个。
public class excel : System.Web.UI.Page
{
string strConn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\工料机汇总表（石油）.xls;Extended Properties='Excel 8.0;HDR=NO'";
//OleDbCommand command;
OleDbDataAdapter ada;
DataSet ds=new DataSet();
protected System.Web.UI.WebControls.DataGrid dg;
OleDbConnection connection;

private void Page_Load(object sender, System.EventArgs e)
{
// 在此处放置用户代码以初始化页面
if(!Page.IsPostBack)
{
connection=new OleDbConnection(strConn);
ada=new OleDbDataAdapter("SELECT * FROM [sheet1$]",connection);
ada.Fill(ds,"all");

//ds.Tables["all"].Rows[0].Delete();
//ds.Tables["all"].Rows[1].Delete();
//ds.Tables["all"].Rows[2].Delete();
//ds.Tables["all"].Rows[3].Delete();
//ds.Tables["all"].Rows[4].Delete();
//ds.Tables["all"].Columns.RemoveAt(0);
//dg.DataSource=ds.Tables["all"].DefaultView;
//dg.DataBind();

DataTable dt=ds.Tables["all"];
//dt.Rows[0].Delete();
//dt.Rows[1].Delete();
//dt.Rows[2].Delete();
//dt.Rows[3].Delete();
/*
dt.Columns.RemoveAt(0);
dt.Rows.RemoveAt(0);
*/
dt.Rows.RemoveAt(1);
dt.Rows.RemoveAt(1);
dt.Rows.RemoveAt(1);

//Response.Write("<table border='1'>");
/*
for(int i=0;i<dv.r;i++)
{
Response.Write("<tr>");
object[] o=ds.Tables["all"].Rows[i].ItemArray;
for(int j=0;j<ds.Tables["all"].Columns.Count;j++)
{
Response.Write("<td>");
Response.Write(ds.Tables["all"].Columns[j].DataType.ToString());
Response.Write("</td>");
}
Response.Write("</tr>");
}
*/
//Response.Write("</table>");
Response.Write("<table border='1' bordercolorlight='#000080' bordercolordark='#000080' align='center'>");
for(int i=0;i<dt.Rows.Count;i++)
{
Response.Write("<tr>");
object[] o=dt.Rows[i].ItemArray;
for(int j=0;j<dt.Columns.Count;j++)
{
Response.Write("<td>");
if(!o[j].ToString().Equals(""))
{
Response.Write(o[j].ToString());
}
else
{
Response.Write(" ");//<font color='red'>(i="+i+",j="+j+")</font>
}
Response.Write("</td>");
}
Response.Write("</tr>");
}
Response.Write("</table>");
}
}

#region Web Form Designer generated code
override protected void OnInit(EventArgs e)
{
//
// CODEGEN：该调用是 ASP.NET Web 窗体设计器所必需的。
//
InitializeComponent();
base.OnInit(e);
}

/// <summary>
/// 设计器支持所需的方法 - 不要使用代码编辑器修改
/// 此方法的内容。
/// </summary>
private void InitializeComponent()
{
this.Load += new System.EventHandler(this.Page_Load);

}
#endregion

}
}

asp.net里导出excel表方法汇总

1、由dataset生成

public void CreateExcel(DataSet ds,string typeid,string FileName)
{
HttpResponse resp;
resp = Page.Response;
resp.ContentEncoding = System.Text.Encoding.GetEncoding("GB2312");
resp.AppendHeader("Content-Disposition", "attachment;filename=" + FileName);
string colHeaders= "", ls_item="";
int i=0;

//定义表对象与行对像，同时用DataSet对其值进行初始化
DataTable dt=ds.Tables[0];
DataRow[] myRow=dt.Select("");
// typeid=="1"时导出为EXCEL格式文件；typeid=="2"时导出为XML格式文件
if(typeid=="1")
{
//取得数据表各列标题，各标题之间以\t分割，最后一个列标题后加回车符
for(i=0;i colHeaders+=dt.Columns[i].Caption.ToString()+"\t";
colHeaders +=dt.Columns[i].Caption.ToString() +"\n";
//向HTTP输出流中写入取得的数据信息
resp.Write(colHeaders);
//逐行处理数据
foreach(DataRow row in myRow)
{
//在当前行中，逐列获得数据，数据之间以\t分割，结束时加回车符\n
for(i=0;i ls_item +=row[i].ToString() + "\t";
ls_item += row[i].ToString() +"\n";
//当前行数据写入HTTP输出流，并且置空ls_item以便下行数据
resp.Write(ls_item);
ls_item="";
}
}
else
{
if(typeid=="2")
{
//从DataSet中直接导出XML数据并且写到HTTP输出流中
resp.Write(ds.GetXml());
}
}
//写缓冲区中的数据到HTTP头文件中
resp.End();

}

2、使用微软的C＋＋写的ACTIVEX控件：http://download.microsoft.com/download/OfficeXPDev/sample/1.0/WIN98MeXP/EN-US/Dsoframerctl.exe
3、由datagrid生成：

public void ToExcel(System.Web.UI.Control ctl)
{
HttpContext.Current.Response.AppendHeader("Content-Disposition","attachment;filename=Excel.xls");
HttpContext.Current.Response.Charset ="UTF-8";
HttpContext.Current.Response.ContentEncoding =System.Text.Encoding.Default;
HttpContext.Current.Response.ContentType ="application/ms-excel";//image/JPEG;text/HTML;image/GIF;vnd.ms-excel/msword
ctl.Page.EnableViewState =false;
System.IO.StringWriter tw = new System.IO.StringWriter() ;
System.Web.UI.HtmlTextWriter hw = new System.Web.UI.HtmlTextWriter (tw);
ctl.RenderControl(hw);
HttpContext.Current.Response.Write(tw.ToString());
HttpContext.Current.Response.End();
}

用法：ToExcel(datagrid1);

4、这个用dataview ，代码好长

public void OutputExcel(DataView dv,string str)
{
//
// TODO: 在此处添加构造函数逻辑
//
//dv为要输出到Excel的数据，str为标题名称
GC.Collect();
Application excel;// = new Application();
int rowIndex=4;
int colIndex=1;

_Workbook xBk;
_Worksheet xSt;

excel= new ApplicationClass();

xBk = excel.Workbooks.Add(true);

xSt = (_Worksheet)xBk.ActiveSheet;

//
//取得标题
//
foreach(DataColumn col in dv.Table.Columns)
{
colIndex++;
excel.Cells[4,colIndex] = col.ColumnName;
xSt.get_Range(excel.Cells[4,colIndex],excel.Cells[4,colIndex]).HorizontalAlignment = XlVAlign.xlVAlignCenter;//设置标题格式为居中对齐
}

//
//取得表格中的数据
//
foreach(DataRowView row in dv)
{
rowIndex ++;
colIndex = 1;
foreach(DataColumn col in dv.Table.Columns)
{
colIndex ++;
if(col.DataType == System.Type.GetType("System.DateTime"))
{
excel.Cells[rowIndex,colIndex] = (Convert.ToDateTime(row[col.ColumnName].ToString())).ToString("yyyy-MM-dd");
xSt.get_Range(excel.Cells[rowIndex,colIndex],excel.Cells[rowIndex,colIndex]).HorizontalAlignment = XlVAlign.xlVAlignCenter;//设置日期型的字段格式为居中对齐
}
else
if(col.DataType == System.Type.GetType("System.String"))
{
excel.Cells[rowIndex,colIndex] = "''"+row[col.ColumnName].ToString();
xSt.get_Range(excel.Cells[rowIndex,colIndex],excel.Cells[rowIndex,colIndex]).HorizontalAlignment = XlVAlign.xlVAlignCenter;//设置字符型的字段格式为居中对齐
}
else
{
excel.Cells[rowIndex,colIndex] = row[col.ColumnName].ToString();
}
}
}
//
//加载一个合计行
//
int rowSum = rowIndex + 1;
int colSum = 2;
excel.Cells[rowSum,2] = "合计";
xSt.get_Range(excel.Cells[rowSum,2],excel.Cells[rowSum,2]).HorizontalAlignment = XlHAlign.xlHAlignCenter;
//
//设置选中的部分的颜色
//
xSt.get_Range(excel.Cells[rowSum,colSum],excel.Cells[rowSum,colIndex]).Select();
xSt.get_Range(excel.Cells[rowSum,colSum],excel.Cells[rowSum,colIndex]).Interior.ColorIndex = 19;//设置为浅黄色，共计有56种
//
//取得整个报表的标题
//
excel.Cells[2,2] = str;
//
//设置整个报表的标题格式
//
xSt.get_Range(excel.Cells[2,2],excel.Cells[2,2]).Font.Bold = true;
xSt.get_Range(excel.Cells[2,2],excel.Cells[2,2]).Font.Size = 22;
//
//设置报表表格为最适应宽度
//
xSt.get_Range(excel.Cells[4,2],excel.Cells[rowSum,colIndex]).Select();
xSt.get_Range(excel.Cells[4,2],excel.Cells[rowSum,colIndex]).Columns.AutoFit();
//
//设置整个报表的标题为跨列居中
//
xSt.get_Range(excel.Cells[2,2],excel.Cells[2,colIndex]).Select();
xSt.get_Range(excel.Cells[2,2],excel.Cells[2,colIndex]).HorizontalAlignment = XlHAlign.xlHAlignCenterAcrossSelection;
//
//绘制边框
//
xSt.get_Range(excel.Cells[4,2],excel.Cells[rowSum,colIndex]).Borders.LineStyle = 1;
xSt.get_Range(excel.Cells[4,2],excel.Cells[rowSum,2]).Borders[XlBordersIndex.xlEdgeLeft].Weight = XlBorderWeight.xlThick;//设置左边线加粗
xSt.get_Range(excel.Cells[4,2],excel.Cells[4,colIndex]).Borders[XlBordersIndex.xlEdgeTop].Weight = XlBorderWeight.xlThick;//设置上边线加粗
xSt.get_Range(excel.Cells[4,colIndex],excel.Cells[rowSum,colIndex]).Borders[XlBordersIndex.xlEdgeRight].Weight = XlBorderWeight.xlThick;//设置右边线加粗
xSt.get_Range(excel.Cells[rowSum,2],excel.Cells[rowSum,colIndex]).Borders[XlBordersIndex.xlEdgeBottom].Weight = XlBorderWeight.xlThick;//设置下边线加粗
//
//显示效果
//
excel.Visible=true;

//xSt.Export(Server.MapPath(".")+"\\"+this.xlfile.Text+".xls",SheetExportActionEnum.ssExportActionNone,Microsoft.Office.Interop.OWC.SheetExportFormat.ssExportHTML);
xBk.SaveCopyAs(Server.MapPath(".")+"\\"+this.xlfile.Text+".xls");

ds = null;
xBk.Close(false, null,null);

excel.Quit();
System.Runtime.InteropServices.Marshal.ReleaseComObject(xBk);
System.Runtime.InteropServices.Marshal.ReleaseComObject(excel);
System.Runtime.InteropServices.Marshal.ReleaseComObject(xSt);
xBk = null;
excel = null;
xSt = null;
GC.Collect();
string path = Server.MapPath(this.xlfile.Text+".xls");

System.IO.FileInfo file = new System.IO.FileInfo(path);
Response.Clear();
Response.Charset="GB2312";
Response.ContentEncoding=System.Text.Encoding.UTF8;
// 添加头信息，为"文件下载/另存为"对话框指定默认文件名
Response.AddHeader("Content-Disposition", "attachment; filename=" + Server.UrlEncode(file.Name));
// 添加头信息，指定文件大小，让浏览器能够显示下载进度
Response.AddHeader("Content-Length", file.Length.ToString());

// 指定返回的是一个不能被客户端读取的流，必须被下载
Response.ContentType = "application/ms-excel";

// 把文件流发送到客户端
Response.WriteFile(file.FullName);
// 停止页面的执行

Response.End();
}

---

绥滨县19291844053： asp.net如何操作Excel呢?？
在盲佳可： 两种方式,一种采用OleDb的方式,获取到一个数据集,存在DataTable里 另外一种,采用com方式,就是用.net操作Excel这个软件,这两种方法,在Csdn上都有介绍的

绥滨县19291844053： asp.net 生成excel？
在盲佳可： public void Export(string fileName) { var fileStream = new FileStream(fileName, FileMode.OpenOrCreate, FileAccess.ReadWrite, FileShare.None); fileStream.Close(); XmlDocument xmlDocument = WriteDeclaration(fileName, ＂mso-application＂, ...

绥滨县19291844053： asp怎样生成Excel？
在盲佳可： 有两种方式 一、服务器上装有office控件,这样就可以调用office对象,来生产 二、服务器上没有office控件 ,这样只能通过文件对象来生成,这样生产的xls文件,不具备excel特性.但是用excel能打开. 希望对你有帮助.临沂泰蒙科技,专业网站制作.

绥滨县19291844053： ASP如何让数据库的数据导出为Excel格式?要详细说明?代码或步骤都行!？
在盲佳可： <% '文 件 名:excel.asp '文件功能:生成EXCEL文件 '作 者:高明 '创建时间:2006-03-14 %> 生成EXCEL文件... <% Dim sqlStr,type2,start,over type2=request.form(＂select＂) start=request.form(＂start_date＂) over=request.form(＂end_date＂) ...

绥滨县19291844053： 如何在asp.net中实现将sqlserver数据库表的数据导入到excel中,希望在代码中生成Excel表并带有中文表头? - ？
在盲佳可： 用存储过程实现:直接调用存储过程就可以了.导出表中的数据到Excel,包含字段名,文件为真正的Excel文件,如果...

绥滨县19291844053： asp.net中如何实现excel文档的转换 - ？
在盲佳可： asp.net Excel导入和导出1、Excel数据导入到数据库中://该方法实现从Excel中导出数据到DataSet中,其中filepath为Excel文件的绝对路径,sheetname为表示那个Excel表; public DataSet ExcelDataSource( string filepath , string sheetname ) ......

绥滨县19291844053： asp.net如何将dataset中的数据保存到excel中 - ？
在盲佳可： 将dataset中的数据保存到excel中思路:1、获取数据到asp.net,2、根据页面布局的数据设计excel表头,以及填充的数据3、点击保存,调用createExcel方法,生成excel并且在固定sheet保存数据.页面加载连接数据源,获取数据到dataset中: ...

绥滨县19291844053： 就是在asp.net 中如何实现将excel表与后台数据库联系起来,不过是在前台实现的 - ？
在盲佳可： 先把EXCEL上传到服务器,再象从数据库里读数据一样,把EXCEL的数据读出来,然后再把读出的数据写入数据库.具体 步骤就是这样,代码自己实现吧

绥滨县19291844053： asp网页中如何导入excel - ？
在盲佳可： 两种方法1.拿execl当做数据库来读取2.可以把excel另存为网页文件,就可以当做文本文件处理了,里面代码可以找到处理规律.附上处理excel文档的asp代码(就是第一条的方法) set conn2=CreateObject(＂ADODB.Connection＂) conn2....

绥滨县19291844053： Asp如何生成excel文件? - ？
在盲佳可： 可以生成,最简单的是生成CSV<% dim conn,strconn strconn=＂driver={Microsoft Access driver (*.mdb)};dbq=＂&server.mappath(＂dataBase/mydatabase.mdb＂) '这里改 为你的数据库地址 set conn=server.CreateObject(＂adodb.connection＂) ...