set rs = server.createobject("adodb.recordset")
'这里ProdId 是数据库里，你要做自增的字段
sql = "select * from bproduc where ProdId is not null"
rs.cursorlocation = 3
rs.open sql,conn,1,1
if rs.bof and rs.eof then'数据库没有数据，则设为1，暂时存到autoid
autoid=1
else
totalid=rs.RecordCount'有数据，根据数据库记录总数增1存到autoid

function nohtml(str)
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
re.Pattern="(\<.[^\<]*\>)"
str=re.replace(str," ")
re.Pattern="(\<\/[^\<]*\>)"

String reg = "\\{\\w*\\}(\\w*)";

Pattern ptt = Pattern.compile(reg, Pattern.CASE_INSENSITIVE);

Matcher m_other = ptt.matcher("{hezzla}你好");

System.out.println(m_other.replaceAll("$1"));