提示错误至少一个参数没有被指定值

str = str & "<td width=""40"" height=""354""><img src=""http://www.yazilind.com/ebay-xiaohao/wangye/images/site_07.gif"" width=""40"" height=""354""></td>"
str = str & "<td width=""355""><table width=""355"" height=""354"" border=""0"" cellpadding=""0"" cellspacing=""0"">"
str = str & "<tbody><tr>"
str = str & "<td><img src="""
str = str & "http://www.yazilind.com/ebay/Sales-"
str = str & rs("cangku").Value
str = str & "/"
str = str & Left$("" & rs("srca").Value & "'", 5)
str = str & "/"
str = str & rs("srca").Value
str = str & ".jpg"""
str = str & " width=""354"" height=""354"" class=""style1""></td>"
str = str & "</tr>"
cnn.Execute ("insert  into cunchu  (huoqu) values ('" & str & " ')  ")
///////
这句提示错误
cnn.Execute ("insert  into cunchu  (huoqu) values ('" & str & " ')  "
请问是什么原因？ str字符串里面有单引号，数据库把它当做字段分隔符，所以replace()替换掉单引号就可以了 str = str & Left$("" & rs("srca").Value & "'", 5)

补充：VB ,  基础类