https://www.doczj.com/doc/482518947.html,导出Excel表的方法
2006-08-03 08:23
public void Create Excel/'>Excel(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控件：
https://www.doczj.com/doc/482518947.html,/download/Office/'>Office XPDev/sample/1. 0/WIN98MeXP/EN-US/Dsoframerctl.exe
3、由datagrid生成：
public void To Excel/'>Excel(System.Web.UI.Control ctl)
{
HttpContext.Current.Response.AppendHeader("Content-Disposition","atta chment;filename=Excel/'>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();
}
用法：To Excel/'>Excel(datagrid1);
4、这个用dataview ，代码好长
public void Output Excel/'>Excel(DataView dv,string str)
{
//dv为要输出到Excel/'>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]).Horizo ntalAlignment = 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-M M-dd");
xSt.get_Range(excel.Cells[rowIndex,colIndex],excel.Cells[rowIndex,col Index]).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,col Index]).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]).Horizontal Alignment = 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]).HorizontalAli gnment = 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[XlBorde rsIndex.xlEdgeLeft].Weight = XlBorderWeight.xlThick;//设置左边线加粗xSt.get_Range(excel.Cells[4,2],excel.Cells[4,colIndex]).Borders[XlBor dersIndex.xlEdgeTop].Weight = XlBorderWeight.xlThick;//设置上边线加粗xSt.get_Range(excel.Cells[4,colIndex],excel.Cells[rowSum,colIndex]).B orders[XlBordersIndex.xlEdgeRight].Weight = XlBorderWeight.xlThick;//设置右边线加粗
xSt.get_Range(excel.Cells[rowSum,2],excel.Cells[rowSum,colIndex]).Bor ders[XlBordersIndex.xlEdgeBottom].Weight = XlBorderWeight.xlThick;//设置下边线加粗
excel.Visible=true;
//xSt.Export(Server.MapPath(".")+"\\"+this.xlfile.Text+".xls",SheetEx portActionEnum.ssExportActionNone,Microsoft.Office/'>Office.Interop.O WC.SheetExportFormat.ssExport HTML);
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(https://www.doczj.com/doc/482518947.html,));
// 添加头信息，指定文件大小，让浏览器能够显示下载进度
Response.AddHeader("Content-Length", file.Length.ToString());
// 指定返回的是一个不能被客户端读取的流，必须被下载
Response.ContentType = "application/ms-excel";
// 把文件流发送到客户端
Response.WriteFile(file.FullName);
// 停止页面的执行
Response.End();
数据库数据导入导出方法 1逻辑导入 备份方法： 在主机服务器的DOS提示符下输入： EXP USERID=ZLHIS/HIS BUFFER=4096 FILE=D:\20040101.dmp LOG=D:\20040101.log OWNER=(ZLHIS) ROWS=Y INDEXES =Y CONSTRAINTS =Y GRANTS=Y DIRECT=N 表示只导出zlhis用户的数据对象 Buffer：该值越大，导出的时间略短。 File：表示导出的dmp的文件路径 Log：表示导出的日志文件路径 其余参数可以通过exp help=y查询。 2逻辑导出 在主机服务器的DOS提示符下输入： IMP USERID=ZLHIS/HIS FROMUSER=(ZLHIS) TOUSER=(ZLHIS) BUFFER=30720 FILE=D:\20040101.dmp LOG=D:\20040101.log ROWS=Y INDEXES=Y CONSTRAINTS =Y GRANTS =Y SHOW=N COMMIT =Y IGNORE=Y 表示只导入zlhis用户的数据对象 Buffer：该值越大，导入的时间略短。 File：表示导入的dmp的文件路径 Log：表示导入的日志文件路径 Ignore：Oracle在恢复数据的过程中，当恢复某个表时，该表已经存在，就要根据ignore 参数的设置来决定如何操作。若ignore=y，Oracle不执行CREATE TABLE语句，直接将数据插入到表中，如果插入的记录违背了约束条件，比如主键约束，则出错的记录不会插入，但合法的记录会添加到表中。若ignore=n，Oracle不执行CREATE TABLE语句，
Private Sub cmdSwatch_Click() Dim xls As excel.Application Dim xlbook As excel.Workbook 'On Error GoTo exlError Dim i As Integer If Dir(Text1.Text) <> "" Then '此目录下如有同名文件给出提示,并作相应处理 If MsgBox("文件已存在，是否覆盖！", vbYesNo + vbQuestion, "另存为工程造价文件") = vbNo Then Exit Sub Else Kill (Text1.Text) '删除文件 End If End If '************打开工作表*************** Set xls = New excel.Application xls.Visible = True Set xlbook = xls.Workbooks.Add '********************************* For i = 0 To 14 If Check2(i).Value = vbChecked Then Select Case i Case 8 ToExcelJDanJiaSum.ToExcelJDanJiaSum xlbook, xls Case 9 ToExcelADanJiaSum.ToExcelADanJiaSum xlbook, xls Case 10 ToExcelCailiao.ToExcelCailiao xlbook, xls
Case 11 ToExcelTsf.ToExcelTsf xlbook, xls Case 12 ToExcelZgcl.ToExcelZgcl xlbook, xls End Select End If Next For i = 0 To 6 If Check3(i).Value = vbChecked Then Select Case i Case 0 ToExcelMan.ToExcelMan xlbook, xls Case 1 ToExcelFSD_CL.ToExcelFSD_CL xlbook, xls Case 2 ToExcelHNT.ToExcelHNT xlbook, xls Case 3 ToExcelZsf.ToExcelZsf xlbook, xls Case 4 ToExcelJingChang.ToExcelJingChang xlbook, xls Case 5 ToExcelJDanJia.ToExcelJDanJia xlbook, xls Case 6 ToExcelADanJia.ToExcelADanJia xlbook, xls End Select End If Next xlbook.SaveAs Text1.Text '保存EXCEL文件
C:\Users\student01>exp ceshi/seentao tablespaces=(system,ceshi) file=d:\ceshi4.d mp C:\Users\student01>exp system/seentao owner=ceshi file=d:\ceshi5.dmp C:\Users\student01>exp ceshi/seentao tablespaces=(system,ceshi) transport_tables pace=y file=d:\ceshi6.dmp Export: Release 10.2.0.1.0 - Production on 星期二8月5 14:33:53 2014 Copyright (c) 1982, 2005, Oracle. All rights reserved. 连接到: Oracle Database 10g Enterprise Edition Release 10.2.0.1.0 - Production With the Partitioning, OLAP and Data Mining options EXP-00044: 必须以'SYSDBA' 身份连接, 才能进行时间点恢复或可传输的表空间导入EXP-00000: 导出终止失败 C:\Users\student01>imp ceshi/seentao file=d:\ceshi.dmp fromuser=ceshi C:\Users\student01>imp ceshi/seentao file=d:\ceshi.dmp full=y C:\Users\student01>imp ceshi/seentao file=d:\ceshi00.dmp fromuser=ceshi 数据泵导入导出 C:\Users\student01>sqlplus/nolog SQL*Plus: Release 10.2.0.1.0 - Production on 星期二8月5 15:27:06 2014 Copyright (c) 1982, 2005, Oracle. All rights reserved. SQL> conn/as sysdba 连接数据库 已连接。 SQL> select * from dba_directories where directory_name='DATA_PUMP_DIR'; OWNER DIRECTORY_NAME ------------------------------ ------------------------------ DIRECTORY_PATH -------------------------------------------------------------------------------- SYS DATA_PUMP_DIR C:\oracle\product\10.2.0\db_1\admin\orcl\dpdump\ SQL> exit 从Oracle Database 10g Enterprise Edition Release 10.2.0.1.0 - Production With the Partitioning, OLAP and Data Mining options 断开 C:\Users\student01>expdp ceshi/seentao dumpfile=ceshi.dmp 数据泵导出数据库 C:\Users\student01>md d:\pump C:\Users\student01>sqlplus/nolog SQL*Plus: Release 10.2.0.1.0 - Production on 星期二8月5 15:39:07 2014 Copyright (c) 1982, 2005, Oracle. All rights reserved.
用VB操作excel方法汇总 Private Sub Command3_Click() Dim i As Long Dim j As Long Dim objExl As Excel.Application '声明对象变量 Me.MousePointer = 11 '改变鼠标样式 Set objExl = New Excel.Application '初始化对象变量 objExl.SheetsInNewWorkbook = 1 '将新建的工作薄数量设为1 objExl.Workbooks.Add '增加一个工作薄 objExl.Sheets(objExl.Sheets.Count).Name = "book1" '修改工作薄名称 objExl.Sheets.Add , objExl.Sheets("book1") '增加第二个工作薄在第一个之后 objExl.Sheets(objExl.Sheets.Count).Name = "book2" objExl.Sheets.Add , objExl.Sheets("book2") '增加第三个工作薄在第二个之后 objExl.Sheets(objExl.Sheets.Count).Name = "book3" objExl.Sheets("book1").Select '选中工作薄
金算盘软件维护集锦 此为201003版本，本期讲一下“导入导出”的一些注意事项，以“往来期初”导入导出为例。 导入导出这个功能是十分有用的，特别是在实施时，对于数据量较大一些基础信息，如果采用手工录入，将会费时费力，影响效率。利用我们软件的“导入导出”功能，将会大大提高工作效率。但如果有些细节不注意，会导入不成功。现说明如下。 导入任何信息之前，最好先在我们软件里做几笔数据，再导出来，其目的就是要利用导出文件的格式对要导入的信息进行编辑、整理，再将编辑、整理的信息导入到软件里。我们软件的导出文件有两个，后缀名分别是INI、Dat，以往来期初为例，其导出的文件是Format.INI、RPInit.Dat。 编辑、整理信息，实际上就是对Dat文件里的内容进行编辑。很多服务人员都习惯以“记事本、写字板”方式打开，实际上最好的方式是在Excel处理为好。无论那一种方式，只要格式正确都可以成功导入。 1、以记事本方式进行处理，编辑界面如下。 要注意，此方式下每两行记录为一条完整的“导入导出”信息。格式给人感觉有点乱，一不小心就容易出错。除非取消“自动换行”选项，才会成为一行记录就是一条导入信息。 更为重要的是，编辑完成保存时，一定要注意所保存文件的“编码”不要搞错，一但搞错将无法导入。如下图：
编码有“ANSI、Unicode、Unicode big endian、UTF-8”这四种，只有保存为“ANSI”编码才能完全导入成功。对于Unicode、Unicode big endian这两种编码，是根本导不成功的。对于UTF-8这种编码，导入信息不完整，且提示信息让人看不懂，如下图所示： 由上图可看出，提示有1条导入成功、4条导入失败，而实际上，我所做的“应收应付”导入信息总共只有4条。如果此时点“是”，系统会导入其中一条，其它三就导不成功。 因此，以“记事本”方式编辑导入信息时，关键一点就是保存时的“编码”不要搞错。要记住，只能是ANSI这种编码。 2、以写字板方式进行处理，编辑界面如下。 这种方式比“记事本”方式要好得多，至少格式规范、不易出错，且一行记录就是一条导入信息，不存在“换行”操作。 但此方式编辑内容后，保存时要注意“保存类型”（这里不存在“编码”之说），如下图：
本文件为您介绍DB2数据库中表结构的导入和导出的两种常用方法，供您参考选择，希望能够对您有所帮助。 方法一 在控制中心的对象视图窗口中，选择所要导出表结构的数据表，按住Ctrl或Shift可多选，单击鼠标右键，选择－>生成DDL即可。 方法二 ◆第一步：打开DB2的命令行工具，在DB2安装目录的BIN文件夹下新建一个文件夹data，并且进入该目录。 创建该目录： mkdir data 进入该目录： cd data ◆第二步：导出表结构，命令行如下： db2look -d dbname -e -a -x -i username -w password -o ddlfile.sql 执行成功之后，你会在刚才新建的文件夹下找到该sql文件。 ◆第三步：导出数据，命令行如下： db2move databasename export -u username -p password 至此，导出数据结束。 2导出表中数据 export to [path(例:D:"TABLE1.ixf)] of ixf select [字段(例: * or col1,col2,col3)] from TABLE1; export to [path(例:D:"TABLE1.del)] of del select [字段(例: * or col1,col2,col3)] from TABLE1; 导入表的数据 import from [path(例:D:"TABLE1.ixf)] of ixf insert into TABLE1; load from [path(例:D:"TABLE1.ixf)] of ixf insert into TABLE1;
'************************************************************************* '** '** VB将数据导出到EXCEL,没有安装EXCEL的一样也可以导出. '** '** 调用方式: s_Export2Excel(Ado.Recordset) 或s_Export2Excel(Rds.RecordSet) '** 支持Rds 与Ado 的记录导出 '** '************************************************************************* '得到所有数据类型,有些数据类型EXCEL不支持,已经替换掉 Public Function f_FieldType$(ByVal sType&) Dim iRe$ Select Case sType Case 2, 3, 20 iRe = "int " Case 5 iRe = "float " Case 6 iRe = "money " Case 131 iRe = "numeric " Case 4 iRe = "real " Case 128 iRe = "binary " Case 204 iRe = "varbinary " Case 11 iRe = "bit " Case 129, 130 iRe = "char " Case 17, 72, 131, 200, 202, 204 iRe = "varchar " Case 201, 203 iRe = "text " Case 7, 135 iRe = "datetime " Case 205 iRe = "image " Case 128 iRe = "timestamp " End Select f_FieldType = iRe
数据库 系统分别拥有一份独立的Oracle数据库逻辑备份文件（后缀为dmp的操作系统文件），每个子系统的导入数据库结构和基础数据的操作是单独执行的。 第一步，以超级管理用户进入Oracle创建用户和授权 第二步：创建表空间（create tablespace law datafile 'D:/oradate/law.dbf' size 300m autoextend on next 50m;） 第三步： --删除用户(第一次可以不用执行，以后想要重新导入数据库才执行这个语句)
drop user law_test cascade; --创建用户和授权 create user law_test identified by law_test default tablespace law; --授权 grant connect,resource,select any dictionary , unlimited tablespace,create any view, create materialized view to law_test; 导入数据库 1、第一步：用Oracle数据库备份恢复命令，导入数据库结构和基础 数据，格式如下： imp ｛数据库用户名｝／｛数据库用户密码｝file=”｛带完整路径的Oracle数据库逻辑备份文件｝” imp law_test/law_test file=d:\db\law_test.dmp full=y 2，第二步，看到的导入的页面
最后的提示说导入成功的提示； 导出数据库 exp ｛数据库用户名｝／｛数据库用户密码｝file=”｛带完整路径的Oracle数据库逻辑备份文件｝” exp law_test/law_test file=”d:\law_test.dmp”;
vb导出数据到Excel Public Function ExporToExcel(strOpen As String,cn As ADODB.Connection) '入参为SQL查询语句,cn为当前活动的连接 '********************************************************* '* 名称：ExporToExcel '* 功能：导出数据到EXCEL '* 用法：ExporToExcel(sql查询字符串) '********************************************************* Dim Rs_Data As New ADODB.Recordset Dim Irowcount As Integer Dim Icolcount As Integer Dim FILENAME As String Dim xlApp As New Excel.Application Dim xlBook As Excel.Workbook Dim xlSheet As Excel.Worksheet Dim xlQuery As Excel.QueryT able With Rs_Data If .State = adStateOpen Then .Close End If .ActiveConnection = Cn .CursorLocation = adUseClient .CursorType = adOpenStatic .LockType = adLockReadOnly .Source = strOpen .Open End With With Rs_Data If .RecordCount < 1 Then MsgBox ("没有记录!") Exit Function End If '记录总数 Irowcount = .RecordCount '字段总数 Icolcount = .Fields.Count End With Set xlApp = CreateObject("Excel.Application") Set xlBook = Nothing Set xlSheet = Nothing
数据库表导入与导出方法 SERVER、ACCESS、EXCEL数据转换，详细说明如下： 一、SQL SERVER 和ACCESS的数据导入导出 常规的数据导入导出： 使用DTS向导迁移你的Access数据到SQL Server，你可以使用这些步骤: ○1在SQL SERVER企业管理器中的Tools（工具）菜单上，选择Data Transformation ○2Services（数据转换服务），然后选择 czdImport Data（导入数据）。 ○3在Choose a Data Source（选择数据源）对话框中选择Microsoft Access as the Source，然后键入你的.mdb数据库(.mdb文件扩展名)的文件名或通过浏览寻找该文件。 ○4在Choose a Destination（选择目标）对话框中，选择Microsoft OLE DB Prov ider for SQL Server，选择数据库服务器，然后单击必要的验证方式。 ○5在Specify Table Copy（指定表格复制）或Query（查询）对话框中，单击Copy tables（复制表格）。 ○6在Select Source Tables（选择源表格）对话框中，单击Select All（全部选定）。下一步，完成。 Transact-SQL语句进行导入导出： 1.在SQL SERVER里查询access数据: SELECT * FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0', 'Data Source="c:\DB.mdb";User ID=Admin;Password=')...表名 2.将access导入SQL server 在SQL SERVER 里运行: SELECT * INTO newtable FROM OPENDATASOURCE ('Microsoft.Jet.OLEDB.4.0', 'Data Source="c:\DB.mdb";User ID=Admin;Password=' )...表名 3.将SQL SERVER表里的数据插入到Access表中 在SQL SERVER 里运行： insert into OpenDataSource( 'Microsoft.Jet.OLEDB.4.0', 'Data Source=" c:\DB.mdb";User ID=Admin;Password=')...表名
用友NC财务软件数据导出方法 重要提示:以下操作是在用友NC中进行的,请先运行用友NC财务软件,然后按以下步骤执行数据导出. 一、导出期初余额 1. 第一步: 财务会计→总账→账簿查询→科目余额表(双击) 2.查询 3.设置查询条件
科目级次选 择很重要 这个勾最好 去掉 (1)选择年份 (2)导出期初数选择1－12月(也可以直接选择1月，只不过没有累计发生额) (3)导出发生额选择某一个月，比如导出２月的发生额则选择200X.02 －200X.02 (4)科目级次:选择1-最低级(比如是5) 说明：科目级次必须选择1级到最低级,不能只是一级,也不能只是末级. 单击[确定] 4. 打印→按显示打印(重要) 不要选错呀! 5.输出
6.选择：导出类型为：Excel 7.输入文件名，比如：yue 并.单击;保存,工作表名可以不管。 导出发生额当然要分多次导出（一般在导出期初数时，余额表中已包含1月的发生额）。(当然,发生额不用导出,因为可以从凭证汇总发生额) 二、用友NC导出凭证 1. 第一步： 总账→账簿查询→序时账(这一步很重要,如果不对有可能凭证没有科目编码) 2.选择月份 （选择一个月,要分次导出）,如果不分次导出，当凭证很多时，会不完整。 3 其余操作同期初余额输出 4.选择：导出类型为：文本文件(最好,导入数据对内存要求低)或Microsoft Excel 97 5.输入文件名，比如：Pz1 并.单击;保存,工作表名可以不管。 重要说明： 在导出用友凭证时，当一次导出的凭证太多(比如:超过3000张)时,有可能凭证导出结果(不全或不正确,因用友软件偶尔会漏一两个分录) 因此,应根据凭证分次导出(最好是一个月或三个月一次凭证，全年分12次导出)特殊情况:如果一个月的凭证就已经很多,按一个月导出也不行时,则一个月的凭证要分次导出.方法是：
数据泵技术是Oracle Database 10g 中的新技术，它比原来导入/导出(imp,exp)技术快15－45倍。速度的提高源于使用了并行技术来读写导出转储文件。 expdp使用 使用EXPDP工具时，其转储文件只能被存放在DIRECTORY对象对应的OS目录中，而不能直接指定转储文件所在的OS目录。因此使用EXPDP工具时，,必须首先建立DIRECTORY对象，并且需要为数据库用户授予使用DIRECTORY对象权限。 首先得建DIRECTORY： SQL> conn /as sysdba SQL> CREATE OR REPLACE DIRECTORY dir_dump AS '/u01/backup/'; SQL> GRANT read,write ON DIRECTORY dir_dump TO public; 1) 导出scott整个schema --默认导出登陆账号的schema $ expdpscott/tiger@db_esuiteparfile=/orahome/expdp.par expdp.par内容: DIRECTORY=dir_dump DUMPFILE=scott_full.dmp LOGFILE=scott_full.log --其他账号登陆, 在参数中指定schemas $ expdp system/oracle@db_esuiteparfile=/orahome/expdp.par expdp.par内容: DIRECTORY=dir_dump DUMPFILE=scott_full.dmp
LOGFILE=scott_full.log SCHEMAS=SCOTT 2) 导出scott下的dept,emp表 $ expdpscott/tiger@db_esuiteparfile=/orahome/expdp.par expdp.par内容: DIRECTORY=dir_dump DUMPFILE=scott.dmp LOGFILE=scott.log TABLES=DEPT,EMP 3) 导出scott下除emp之外的表 $ expdpscott/tiger@db_esuiteparfile=/orahome/expdp.par expdp.par内容: DIRECTORY=dir_dump DUMPFILE=scott.dmp LOGFILE=scott.log EXCLUDE=TABLE:"='EMP'" 4) 导出scott下的存储过程 $ expdpscott/tiger@db_esuiteparfile=/orahome/expdp.par expdp.par内容: DIRECTORY=dir_dump DUMPFILE=scott.dmp
数据导入和导出之导入数据 一、从键盘键入数据（Entering Data From the Keyboard） 数量不大用手采集的数据，推荐通过键盘输入这些数据。 1、第一步打开一个临时的电子数据表窗口（空组窗口）用以输入数据。为此，从主菜单选择Quick/Empty Group (Edit Series)，打开一个未命名的空组窗口。 2、第二步建立并命名序列。点击空组窗口右侧滚动条上向上箭头一次，在左列显示出第二obs标签。这第二个obs标签所在的行，就是我们可以键入和编辑多个序列名的地方。选中待输入第一个序列名的位置（即点击第二个obs的右侧的第一个单元），在工具条下的命令行键入第一个序列名并按ENTER。这个键入的序列名称从命令行消失，出现在第一个和第二个obs的右侧的第一个单元中，成为第一列待输入的序列名。它们下面的各个元格中出现NA编码，等待输入数据。 3、在后续列上重复选定键入序列名的操作一次就增加一个序列。 在空组中重命名序列，选择决定重命名的序列名，进行编辑并按回车。EViews提示对重命名进行确认。
4、点击相应的单元，键入数据。按回车后，光标进入下一个单元。根据使用者的偏好也可用光标键在电子数据表中定位。 5、完成数据输入后，关闭组窗口。如果要保留这个组，点击Name按钮命名这个组。命名后的组将保存在工作文件中。如果无需保存这个组，在EViews要求确认删除时回答“Yes”。 二、复制和粘贴（Copying and Pasting） 利用Windows的剪接板是在EViews内和EViews与其它应用程序之间移动数据最便利的方法之一。剪贴板是从Excel和其它支持 copy-and-paste的Windows应用程序之间导入数据到EViews最简单和最自然的工具。 从Windows应用程序中复制 下面的讨论涉及到使用Excel数据表的例子，但是，例子中的基本原则仍可用于其它Windows应用程序。 假设Excel工作表中有欲导入EViews的有债券收益和利率的数据。打开Excel工作表：
如何在VB中实现输出到Excel visual basic 2009-12-04 12:38:22 阅读61 评论0字号：大中小订阅 首先要在工程中添加引用“Microsoft Excel 9.0 Object Library” 我们使用三个对象 Excel.Application Excel.WorkBook Excel.WorkSheet 然后我们的目标是： 能新建一个Excel文件。讲某些行列进行合并，设置列宽，填入一个数据，将这个Excel 保存。 Public Sub '定义对象 Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Dim xlSheet1 As Excel.Worksheet Dim xlSheet2 As Excel.Worksheet Set xlApp = CreateObject("Excel.Application") Set xlBook = xlApp.Workbooks.Add Set xlSheet1 = xlBook.Worksheets("sheet1") Set xlSheet2 = xlBook.Worksheets("sheet2") '参数是下标！！！一定是按照Sheet1,Sheet2,Sheet3这样的顺序来的。
https://www.doczj.com/doc/482518947.html, = "值班表" '修改工作簿的名称，就是将显示的名称换掉 https://www.doczj.com/doc/482518947.html, = "呼拉拉" '同上 xlSheet1.PageSetup.Orientation = xlLandscape '打印设置-- 设置为横向 xlSheet1.PageSetup.TopMargin = 20 '一下四部分为设置Excel的显示格式 xlSheet1.PageSetup.BottomMargin = 20 xlSheet1.PageSetup.LeftMargin = 8 xlSheet1.PageSetup.RightMargin = 8 xlApp.Visible = True 'Excel文件是不是显示 With xlSheet1 .Columns.item(1).ColumnWidth() = 2 '列宽大小 .Range(.Cells(1, 1), .Cells(3, 1)).Merge '合并 .Cells(1, 1).Value = "123" '填入数据 End With xlApp.Visible = False '这样写，Excel的操作就不显示了。 xlBook.SaveAs ("I:\1\gantyian.xls") '文件保存为另一个文件名 'xlBook.Save '这个方法和上面一样。只是上面的方法是生成文件。这个仅仅是保存而已。xlBook.Close '必须文件关闭，不然Excel.exe的进程会一直驻留内存。 Set xlBook = Nothing '清空 Set xlSheet = Nothing
Oracle数据库导入导出方法: 1.使用命令行： 数据导出： 1.将数据库TEST完全导出,用户名system密码manager导出到D:\daochu.dmp中 exp system/manager@TEST file=d:\daochu.dmp full=y 2.将数据库中system用户与sys用户的表导出 exp system/manager@TEST file=d:\daochu.dmp owner=(system,sys) 3.将数据库中的表inner_notify、notify_staff_relat导出 exp aichannel/aichannel@TESTDB2 file= d:\data\newsmgnt.dmp tables=(inner_notify,notify_staff_relat) 4.将数据库中的表table1中的字段filed1以"00"打头的数据导出 exp system/manager@TEST file=d:\daochu.dmp tables=(table1) query=\" where filed1 like '00%'\" 上面是常用的导出，对于压缩，既用winzip把dmp文件可以很好的压缩。 也可以在上面命令后面加上compress=y来实现。 数据的导入： 1.将D:\daochu.dmp 中的数据导入TEST数据库中。 imp system/manager@TEST file=d:\daochu.dmp imp aichannel/aichannel@HUST full=y file=file= d:\data\newsmgnt.dmp ignore=y 上面可能有点问题，因为有的表已经存在，然后它就报错，对该表就不进行导入。 在后面加上ignore=y 就可以了。 2.将d:\daochu.dmp中的表table1导入 imp system/manager@TEST file=d:\daochu.dmp tables=(table1) 2.plsql: 数据导出: TOOLS-Export user objects(用户对象) TOOLS-Export tables(表)
Oracle 数据导入导出详细步骤 说明： 1.请先设置好 oracle 实例的环境变量 [grneas 是当前已安装的数据库实例名 ] Windows 下在 cmd 命令窗口执行： set ORACLE_SID=grneas Linux/AIX 下在终端窗口执行： export ORACLE_SID=grneas Windows 下查看该变量是否正确的命令： echo %ORACLE_SID% Linux/AIX 下查看该变量是否正确的命令： echo $ORACLE_SID 2.进入 sqlplus 窗口的命令：所有操作系统都用： sqlplus /nolog conn / as sysdba 一、 Oracle 数据导出（备份） 1.创建目录（导出文件存放位置） 在 sqlplus 窗口下执行： grant read,write on directory expdpdir to system,grneas; 其中： expdpdir 为目录名， grneas 是 EAS 用户名
3.数据导出 windows 在 cmd 窗口， linux 、AIX 在终端 ssh 窗口直接执行：(不要进入 sqlplus 窗口) expdp grneas/kingdee@grneas schemas=grneas directory=expdpdir dumpfile=grneas_20110706.dmp logfile=grneas_20110706.log 说明： 1).以上命令要在同一行输入再回车 2).其中的 grneas/kingdee@grneas 是指要连接的数据库实例、用户及密码，若已在前面设置好环境变量 ORACLE_SID 为当前要导出的实例，则可不加 @grneas 3).schemas=grneas表示要导出的 EAS 用户(方案)为 grneas, 在oracle 下，数据库对象在不同用户间是隔离的，每个用户都有自己的一些表、视图等，所以我们只要导出 EAS 用户的数据就可以了 4).directory=expdpdir 表示导出时使用的目录，也就是文件存放的位置
3楼这是在CSDN上邹键的东西，推荐给大家。 从Excel文件中,导入数据到SQL数据库中,很简单,直接用下面的语句: /*===================================================================*/ --如果接受数据导入的表已经存在 insertinto表select*from OPENROWSET(’MICROSOFT.JET.OLEDB.4.0’ ,’Excel5.0;HDR=YES;DATABASE=c:\\test.xls’,sheet1$) --如果导入数据并生成表 select*into表from OPENROWSET(’MICROSOFT.JET.OLEDB.4.0’ ,’Excel5.0;HDR=YES;DATABASE=c:\\test.xls’,sheet1$) /*===================================================================*/ --如果从SQL数据库中,导出数据到Excel,如果Excel文件已经存在,而且已经按照要接收的数据创建好表头,就可以简单的用: insertintoOPENROWSET(’MICROSOFT.JET.OLEDB.4.0’ ,’Excel5.0;HDR=YES;DATABASE=c:\\test.xls’,sheet1$) select*from表 --如果Excel文件不存在,也可以用BCP来导成类Excel的文件,注意大小写: --导出表的情况 EXECmaster..xp_cmdshell’bcp数据库名.dbo.表名out"c:\\test.xls"/c-/S"服务器名"/ U"用户名"-P"密码"’ --导出查询的情况 EXECmaster..xp_cmdshell’bcp"SELECTau_fname,au_lnameFROMpubs..authorsORDERBYau_ lname"queryout"c:\\test.xls"/c-/S"服务器名"/U"用户名"-P"密码"’ 说明. c:\\test.xls为导入/导出的Excel文件名. sheet1$为Excel文件的工作表名,一般要加上$才能正常使用.
数据导入和导出_01 数据对象 一、序列（Series） Eviews的序列包含了某个变量的一组观察值。在序列中与每个观察值相关联的是日期或者观察值的标签（序号）。对于工作文件中的日期型序列，假定观察值在整个时间区间上是按特定的时间频率（年、季、月、星期和日中之一）有规则地观察得到的；对于非日期型的序列，则假定观察值不遵从任何特定的频率。 1、建立序列（Creating a series） 建立序列的主要方法有几种。 （1）方法一，选择Object/New Objects再选择序列（series），此时允许给序列命名，或者让新序列记作untitled，点击OK。EViews打开新序列的电子数据表观察，新序列所有观察值被赋给了编码为NA的缺失数据。可以对它们进行编辑，或者用表达式给它们赋值。
（2）方法二，用数学表达式生成序列。点击Quick/Generate Series 并键入定义序列的表达式。这种方法的深入讨论参见：Working with Series。
2、编辑序列（Editing a series） 编辑序列，即对序列中的个别观察值进行编辑。步骤： 第一步，打开序列的电子数据表观察。如果序列的观察不显示为电子数据表观察，点击Sheet按钮或从序列的菜单上选择View/Spreadsheet，将观察改为序列缺省观察——电子数据表观察。 第二步，确保电子数据表观察处于编辑模式下。 EViews允许对电子数据表观察进行保护数据模式与编辑数据模式的设置，通过按压Edit +/-按钮在编辑模式与保护模式之间进行切换。 第三步，更改某一个观察值：在编辑模式下，选择单元格，键入数值，然后按EBTER。 注意，有些单元格始终处于保护模式。如果选择了一个处于保护模式下的单元格，EViews在编辑窗口显示信息：“the cell cannot be edi ted.”。EViews不允许对这类单元进行编辑。 第四步，完成数据编辑以后，还应点击Edit +/-，关闭编辑模式，以免数据受到意外的损害。 3、改变电子数据表的显示格式（Changing the Spreadsheet Display） EViews提供了几种不同的格式，在电子数据表中查看序列中的数据。