2007/11/23
MsSql、Access两种数据库中插入记录后马上得到自动编号的ID值
在Access数据的操作中,UPdate后,直接id=rs("id")就可取得,SQL却要加一名Rs.MoveLast ,即移到新增记录.
例句如下(MSsql下的SQL语句):
Set Rs=Server.CreateObject("ADODB.RecordSet") '创建要测试的对象
Rs.Open "[TestTable] ",Conn,1,3 '假定开始已经创建Conn,并且数据库已经连接
Rs.AddNew
Rs("ColName1")="ColName1"
Rs("ColName2")="ColName2"
......
Rs("ColNameN")="ColNameN"
Rs.Update '调用Update方法立即将内存中数据写入数据库中,下面这句是关键的
Rs.MoveLast '将记录移动最后一条
ID=testRs("ID") '这样就可以立即得到刚才这个新记录的自动编号了
'不要忘记关闭对象
Rs.Close
Set Rs= Nothing
在Access数据的操作中,UPdate后,直接id=rs("id")就可取得,SQL却要加一名Rs.MoveLast ,即移到新增记录.
例句如下(MSsql下的SQL语句):
Set Rs=Server.CreateObject("ADODB.RecordSet") '创建要测试的对象
Rs.Open "[TestTable] ",Conn,1,3 '假定开始已经创建Conn,并且数据库已经连接
Rs.AddNew
Rs("ColName1")="ColName1"
Rs("ColName2")="ColName2"
......
Rs("ColNameN")="ColNameN"
Rs.Update '调用Update方法立即将内存中数据写入数据库中,下面这句是关键的
Rs.MoveLast '将记录移动最后一条
ID=testRs("ID") '这样就可以立即得到刚才这个新记录的自动编号了
'不要忘记关闭对象
Rs.Close
Set Rs= Nothing
2006/05/09
下载文件 呵呵,不多说,这些小工具其实在网上蛮难找的,好容易找到一个,就传上来留着,主要作用就在GBK,BIG5,UTF-8之间转换,可以预览,非常方便。






