请问SSH框架里如何向数据库里批量增加数据？ service里怎么写 有源代码最好

service直接调用下面的dao方法即可；

//dao里面的方法

private void testSaveUser()throws Exception

{

//打开Session

Session session = HibernateUtil.currentSession()

//开始事务

Transaction tx = session.beginTransaction()

//循环100 000次，插入100 000条记录

for (int i = 0 i <1000000 i++ )

{

//创建User实例

User u1 = new User()

u1.setName("xxxxx" + i)

u1.setAge(i)

u1.setNationality("china")

//在Session级别缓存User实例

session.save(u1)

//每当累加器是20的倍数时，将Session中的数据刷入数据库，并清空Session缓存

if (i % 20 == 0)

{

session.flush()

session.clear()

tx.commit()

tx = session.beginTransaction()

}

}

//提交事务

tx.commit()

//关闭事务

HibernateUtil.closeSession()

}

您好，您这样：

Sub Copy_Data()

Dim wb As Workbook, rng As Range, sht As Worksheet

Dim sht_Name, theDate

sht_Name = "Sheet1" '假设所有报表文件中的数据都在 Sheet1

Set sht = ActiveSheet '保存当前工作表对象

fn = Dir(ThisWorkbook.Path &"\报表-*.xls", vbReadOnly) '打开第一个报表文件

Do While fn <>"" '开始循环

Set wb = Workbooks.Open(fn) '以只读模式打开报表文件

'取得报表文件中的日期字符串

theDate = Mid(fn, InStr(fn, "\报表-") + 4, Len(fn) - InStr(fn, "\报表-") - 7)

'将报表文件中的数据复制到当前工作表

With wb.Worksheets(sht_Name)

.Range(.Range("A2"), .Range("A1").End(xlToRight).End(xlDown)).Copy _

Destination:=sht.Range("A65536").End(xlUp).Offset(1, 1)

End With

wb.Close (False) '关闭报表文件，不保存

sht.Activate '激活当前工作表

Range(Range("A65536").End(xlUp).Offset(1, 0), Range("B65536").End(xlUp).Offset(0, -1)) = DateValue(Format(theDate, "0000-00-00")) '在A列填充报表文件的日期信息

fn = Dir

Loop '循环下一个报表文件

End Sub

---