Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
DataRowAdding事件
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT SEQ_BIZ_BASE_INFO.NEXTVAL FROM DUAL"
dt = cmd.ExecuteReader()
e.DataRow("SEQ_ID")=dt.DataRows(0)("SEQ_ID")
数据库是ORACLE 10g
这样就行了:
Dim cmd As New SQLCommand
cmd.Connection Name = "数据源名称"
cmd.CommandText = "SELECT SEQ_BIZ_BASE_INFO.NEXTVAL FROM DUAL"
e.DataRow("SEQ_ID")= cmd.ExecuteScalar
真的可以了,谢!