因为大多数的数据库（Access，MS SQL Server） 都把单引号当作分割符号使用的，所以不可以直接将单引号插入到数据库中，你必须在执行SQL语句之前， 分别将每一个单引号替换成两个单引号： 
    MyData=Replace(MyData,"’","’’",1) 
然后，再保存到数据库中就行了。