Question

VB2010使用SQL查询ACCESS2010数据库表中“有效期”在当前日期后90天内的记录

“有效期”为日期类型
where串的内容：WhereStr = " where DateDiff(day,有效期,'" & Now & "')<=90"
objConn.Open()objDa.Fill(objDs, "管理人员")objGSTable = objDs.Tables("管理人员")objConn.Close()
运行到objGSTable = objDs.Tables("管理人员")时出现错误：

请帮忙看看这是哪里出了什么错，应该怎么修改，感谢！！！
已找到解决方法：
WhereStr = " where datediff('d',now,有效期)<=90"

Answer 1

1、增加字段：
CString msql = "ALTER TABLE student ADD COLUMN ziduan char(50)";
mdatabase.ExecuteSQL(msql);//添加名为zizhuan的字段到名为student的表中。
2、新纪录：
msqlstr = "INSERT INTO student (学号,姓名,数学) VALUES ('2011','jack','99')";
mdatabase.ExecuteSQL(msql);//添加学号为2011，姓名为jack，数学为99的一行记录 到表student中。
3、删除：
CString msql = “DELETE FROM student WHERE 学号 = '2011'”;
mdatabase.ExecuteSQL(msql);//删除学号为2011的一行记录。

希望对你有所帮助!

Answer 2

建议在数据库里先执行sql，没问题了，在拼程序里