excel导入sql

　<%
　　'On Error Resume Next
　　'导入Excel电子表格数据到SQL Sever数据库 By Dicky 2004-12-27 16:41:12
　　Function Open_Conn(SqlDatabaseName,SqlPassword,SqlUsername,SqlLocalName,SqlConn)
　　'创建数据库连接对象并打开数据库连接
　　 Dim ConnStr
　　 'SQL Server数据库连接参数：数据库名、用户密码、用户名、连接名（本地用local，外地用IP）
　　 ConnStr = "Provider=Sqloledb; User ID=" & SqlUsername & "; Password=" & SqlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source=" & SqlLocalName & ";"
　　 Set SqlConn = Server.CreateObject("ADODB.Connection")
　　 SqlConn.Open ConnStr
　　 If Err Then
　　　Err.Clear
　　　Set SqlConn = Nothing
　　　Response.Write "数据连接错误!"
　　　Response.End
　　 End If
　　End Function
　　
　　Function Close_Conn(SqlConn)
　　'关闭数据库连接并清除数据库连接对象
　　 If IsObject(SqlConn) Then
　　　SqlConn.Close
　　　Set SqlConn = Nothing
　　 End If
　　End Function
　　
　　Call Open_Conn("Shat_EDG","","sa","(local)",SqlConn) '打开本地SQL Server数据库连接
　　Call Open_Conn("Shat_EDG","","sa","ssh03",SqlConn1) '打开远程SQL Server数据库连接
　　
　　Function Get_EMP_CnName(NTACCNT)
　　'根据用户NT帐号得到用户中文名
　　 Dim Sql1,Rs1
　　 Sql1 = "Select EMP_CNAME From RF_EMPLOYEE Where EMP_NTACCNT='"&NTACCNT&"'"
　　 Set Rs1 = Server.CreateObject("Adodb.RecordSet")
　　 Rs1.Open Sql1,SqlConn1,1,1
　　 If Rs1.Eof Then
　　　Get_EMP_CnName = ""
　　 Else
　　　Get_EMP_CnName = Rs1("EMP_CNAME")
　　 End If
　　 Rs1.Close
　　 Set Rs1 = Nothing
　　End Function %>
　　<html>
　　<head>
　　<title>导入Excel电子表格数据到SQL Sever数据库</title>
　　<body bgcolor="#ACD9AF">
　　<center><b>导入Excel电子表格数据到SQL Sever数据库</b></center>
　　<FORM METHOD="POST" name="form1">
　　

时间： 2024-08-02 00:43:28

excel导入sql的相关文章

ASP.NETR把Excel导入SQL数据库的自定义类

ASP.NETR把Excel导入SQL数据库的自定义类 以下是引用片段:public class SaveToSql {   public string strNewCodeId = string.Empty;   public string strNewCode = string.Empty;   public string strNewDes = string.Empty;   public string strOldCodeId = string.Empty;   public strin

excel-用ADO将Excel导入sql server 2008 报error# 3092错误

问题描述 用ADO将Excel导入sql server 2008 报error# 3092错误 我用ADO将一张excel表导入到sql server中去,代码如下: hr=m_pConnection->Open(_bstr_t("Provider=SQLOLEDB;server=TOUCH;Database=MR_NXT;Uid=touch0413;Pwd=LJm_1989915"),"","",adModeUnknown); m_pCo

new-VB6实现excel导入SQL SERVER7程序问题

问题描述 VB6实现excel导入SQL SERVER7程序问题 Set cnn = New ADODB.Connection cnn.Open "Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa;Initial Catalog=labor;Data Source=RPC_004" cnn.CursorLocation = adUseClient Set RS = New ADODB.Recordset STR = &q

C#,将excel导入sql 表里的时候，如何读取excel第一行标头的内容阿

问题描述 C#,将excel导入sql表里的时候,如何读取excel第一行标头的内容阿.也就是指定单元格的内容.谢谢 解决方案 解决方案二:http://www.cnblogs.com/GodSpeed/archive/2008/03/14/1105178.html解决方案三:如果仅需要读取标题信息的话可用使用OleDbConnection的GetSchema方法解决方案四:将excel作为数据库读取,加载到datatable里面,就可以取到表头了.解决方案五:能说详细点吗,我是新手.另,我已经

EXCEL导入sql 用C#体现？

问题描述 表结构建立好后,以下是SQL代码?我想能够用excel导入到sqlServer后显示以下代码返回的所有行在导出到excel?代码该如何写,本人新手@.@感谢!SQL-代码selectname,workshop,sum(integral)frombirthdaywherefdate>='2014-07-01'groupbyworkshop,namehavingsum(integral)>=50orderbyworkshop,name; 解决方案 解决方案二:如果就这需求,根本就不用借助

我将excel导入sql数据，总是提示在位置0处没有数据行

问题描述 privatevoidbtn_Import_Click(objectsender,System.EventArgse){OpenFileDialogdlg=newOpenFileDialog();dlg.Filter="Excel文件|*.xls";if(dlg.ShowDialog()==DialogResult.OK){stringstrPath=dlg.FileName;stringsConnectionString="Provider=Microsoft.J

格式导致的Excel导入sql出现异常的解决方法_MsSql

本来程序是正常运行的,有时候会因为用户的excel文档没有按要求的格式来做,才会出现一些异常情况.本以为这次也是一样,后来拿到数据一看,并没有发现什么异常,而且自己又照着做了一些数据,竟然也会出现异常,只好怀疑是自己的程序有问题了. 常言说的好,最难找的是最后一个错误,这话确实不错.我几乎动用了我所掌握的各种手段,程序上真的没办法找出有啥问题了.在一个问题上折腾久了,浪费时间不说,还容易让自己的情绪低落.到后来,还是转去怀疑用户的数据有问题,无意中做了一下格式调整,竟然发现异常不见了. Exce

excel导入sql sever-求完整的JSP页面上传excel 将数据导入数据库的代码

问题描述 求完整的JSP页面上传excel 将数据导入数据库的代码 找的的代码都会各种报错 上传的jsp页面的action要指向哪个文件? 解决方案 这篇文章主要介绍了JSP上传excel及excel插入至数据库的方法,涉及JSP文件上传及针对excel的读取.写入数据库等操作技巧,需要的朋友可以参考下 本文实例讲述了JSP上传excel及excel插入至数据库的方法.分享给大家供大家参考.具体如下: 此导入excel是与pojo绑定的,(缺点)excle表头必须是pojo的字段值 1. htm

格式导致的Excel导入sql出现异常的解决方法

本来程序是正常运行的,有时候会因为用户的excel文档没有按要求的格式来做,才会出现一些异常情况.本以为这次也是一样,后来拿到数据一看,并没有发现什么异常,而且自己又照着做了一些数据,竟然也会出现异常,只好怀疑是自己的程序有问题了. 常言说的好,最难找的是最后一个错误,这话确实不错.我几乎动用了我所掌握的各种手段,程序上真的没办法找出有啥问题了.在一个问题上折腾久了,浪费时间不说,还容易让自己的情绪低落.到后来,还是转去怀疑用户的数据有问题,无意中做了一下格式调整,竟然发现异常不见了. Exce