有沒有更好之寫法(編號:5707)

'-----check data1
sql="select * from table1 where field=m_key
set rs=db.execute(sql)
if rs.eof then
sql="insert into table1......"
end if
db.BeginTrans
  db.Execute SQL
  db.CommitTrans
'-----check data2
sql="select * from table2 where field=m_key
set rs=db.execute(sql)
if rs.eof then
sql="insert into table2......"
end if
db.BeginTrans
  db.Execute SQL
  db.CommitTrans
'-----check data3
sql="select * from table3 where field=m_key
set rs=db.execute(sql)
if rs.eof then
sql="insert into table3......"
end if
db.BeginTrans
  db.Execute SQL
  db.CommitTrans