帮忙写一段asp代码？？？

数据库里有值 name txt这两个！帮忙写一个写入记录代码！每次写入时不会新加记录！而是在一条记录上复盖！在提交表单中还可以读取写入的内容！最好可以写的详细些！比如读取数据库的代码也写出来！

Set g_conDB = Server.CreateObject("ADODB.Connection")

g_conDB.Open "Provider=microsoft.jet.oledb.4.0;Data Source=C:\a.mdb"

set rs=Server.CreateObject("ADODB.RecordSet")

'写入记录

g_strSQL = "select top 1 * from YourTable"

rs.open g_strSQL,g_conDB,1,3

rs.addnew

rs("name")="aaa"

rs("txt")="bbb"

rs.update

set rs=nothing

'读取记录

sql="select top 1 * from YourTable"

rs.open sql,g_conDB,1,1

response.write rs("name")

response.write(" | ")

response.write rs("txt")

set rs=nothing