vb中sql语句！ - VB / 数据库(包含打印，安装，报表)
Set cn = New ADODB.Connection
cn.Open "provider=Microsoft.jet.OLEDB.4.0;data source=" & App.Path & "\member.mdb"
Set rs = New ADODB.Recordset
rs.Open "select * from attendance1 where 学号 like '" & Text9.Text & "' and 到寝日期 like '" & DTPicker1.Value & "'", cn, adOpenKeyset, adLockOptimistic
If rs.RecordCount > 0 Then
MsgBox "此同学以到！", vbInformation, "提示"
Else
cn.execute("insert into attendance1(学号,到寝日期，到寝时间）values ('" & Text9.Text & "',#" & Format(Now(), "YYYY-MM-DD") & "#,'" & Format(Now(), "hh点mm分") & "')"
MsgBox "添加完毕", vbInformation, "提示"
access数据库 表 attendance1 字段 学号 到寝日期(时间/日期类型) 到寝时间(文本类型)
添加一次后，再添加就会弹出此同学已到！数据库中无重复数据！
但是把换成sql数据库 表attendance1 字段 学号 到寝日期(datetime类型) 到寝时间(文本类型)
cn.Open "provider=sqloledb;data source=127.0.0.1;initial catalog=student;user id=sa;password=sa;"
就一直弹出添加完毕....没有此同学以到...数据库中 有重复数据！
这是为什么？要怎么改才能没有重复的数据呢？
看半天看不懂写的是什么
...我再改改
我也有些晕。。。。
T
相关问答：
现在有两张表：文章主表A(articleId,articleTitle)，文章评论表B(commentId,articleId,commentTitle)
现在我想实现这样的功能：列出文章列表，其中每篇文章标题下面列出此文章的前2个文章评论，请问sql语句怎么写啊 ......
如何在SQL2005中设定定时作业，比如说定时清理某些表的数据，
或者是定时的将某些表的数据导出excel！
在线等待，急急急，最好是详细步骤！
之前我做的作业有点问题！
帮UP
参考:http://hi.baidu.com/toiota ......
vb中 现在我要把数据库里存储的一个附件的内容替换了，怎么做，只是替换我指定的位置，不是全部替换
请将问题说明白，存储字段格式，如果是Binary格式的比较麻烦，如果是字串，直接替换。最好不要进行指定位置替换� ......
需求如下：
学院 academy（aid,aname）
班级 class（cid,cname,aid）
学生 stu(sid,sname,aid,cid)
住宿区 region(rid,rname)
宿舍楼 build(bid,rid,bnote) bnote是‘男’/‘女’
宿舍 dorm(did,rid,bid，bedn ......
