set cmd = server.CreateObject("adodb.command") cmd.activeconnection=conn cmd.commandtext=" select * from news where title=? " cmd.parameters.Append cmd.CreateParameter ("title", 200, 1, 50, "今日新闻") set rs=cmd.execute