28,391
社区成员
发帖
与我相关
我的任务
分享
Dim sqlContent
sqlContent="update content set 标题=replace(标题,'2007','[替换为2008]') where id=170"
conn.open connjobdata,1,3
Err.Clear
On Error Resume Next
conn.BeginTrans
conn.ExeCute(sqlContent)
If Err.Number<>0 Then
Response.Write err.Description
Else
conn.CommitTrans
Response.Write("SQL语句执行成功,请返回查看!")
End If
Response.End