作者kobeslaker (thewonder)
看板Visual_Basic
标题Re: 请问有关时间互减的问题
时间Sat Jan 7 16:10:36 2006
※ 引述《fumizuki (小狮子)》之铭言：
: 1.
: "Select 资料表1.时间1-资料表2.时间2 As 时间 From 资料表1,资料表2"
: Print Int(tbl.Fields("时间") * 24 * 60)
: ※ 引述《kobeslaker (thewonder)》之铭言：
: : 因为是不同资料表
: : 不知道该怎麽减?
: : 若是要存成同个资料表
: : 要怎麽设置呢?
: : 因为insert into的语法好像没有where条件式
: : 我不知道如何让按钮二按下时 把结束时间存到先前已在的编号那一栏
: : 所以才存成两个资料表
: : 希望高手能帮忙开解疑问 orz
: 设计资料表一定会设计流水号，你可以用变数记录这个流水号
: 要存结束时间时 就下sql指令 select * from 资料表 where 流水号=xxxx
: 然後直接修改第二个时间栏位，再执行update指令
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
Dim time2 As Date = Now()
Dim connStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;
Data Source=" & MapPath("car.mdb")
Dim conn As New OleDbConnection(connStr)
conn.Open()
Dim sqla As String = "select DateDiff(DateInterval.Hour,time1,time2)
from car where memno ='" & TextBox1.Text & "' "
这个sql语法可以显示出时间差吗 ?
Dim cmd As New OleDbCommand(sqla, conn)
cmd.ExecuteNonQuery()
'conn.Close()
DataGrid1.DataSource = cmd.ExecuteReader()
DataGrid1.DataBind()
conn.Close()
Me.Label5.Text = "计费!!"
End Sub
这边还有哪里有错呢?
"无值提供给一或多个必要参数。"
不太知道这问题出在哪 ?
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 163.25.118.31
1F：推 fumizuki:唔 .net的sql语法跟旧版的不一样吗.... 01/07 23:05
2F：推 fumizuki:.net 我没试过 01/07 23:05