分页: 1/1 第一页 1 最后页 [ 显示模式: 摘要 | 列表 ]
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
Tags: , ,
2007/04/28

asp连接数据库ACCESS2007的代码

| 不指定 十万度 on 14:36 | From 本站原创
由于Access 2007 在数据格式上有了很大变化,因此数据提供者已经不是 jet db 4.0 了,Microsoft.ACE.OLEDB.12.0 才是 *.accdb 的数据提供者。
连接方法看下面的代码。

Set conn=server.CreateObject("adodb.connection")
conn.provider="microsoft.ACE.oledb.12.0"
conn.open server.mappath("access2007.accdb")   '连接access2007


Set conn=server.CreateObject("adodb.connection")
conn.provider="microsoft.JET.oledb.4.0"
conn.open server.mappath("access2003.mdb")   '连接access2003及2000
Tags: ,
2006/05/22

NB文章添加FLASH幻灯新闻的方法

| 雨 十万度 on 10:45 | From 本站原创
NB是我见过最好的ASP CMS系统,功能的强大,代码的简洁,系统的整合,都超越国内其它的ASP CMS系统。尤其NB的创作者(说实话,我并不清楚他的名字),低调,勤奋,负责的处世作风,在现在这个浮躁的网络上已经很少见了。
1.拷贝下面代码,另存为huandeng.asp
Tags: , ,
2006/04/12

asp实现从Excel导入到Access

| 雨 十万度 on 23:36 | From 本站原创
做的一个案子,以前没有接触过,到网上查了一下资料,asp实现的,希望有高手指正。代码如下:
Tags: ,
分页: 1/1 第一页 1 最后页 [ 显示模式: 摘要 | 列表 ]