Question

我正在通过vb制作报表，数据库是foxpro，我想查看值之间任意两个日期的详细信息，但错误是apper MISSING OPERAND我在dtpicker和foxpro数据库日期格式中的所有格式是mm / dd / yy，但它仍然显示相同的错误， Plz帮我编码低于 thanx

Private Sub Command1_Click()
Dim str As String
Dim con As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim cmd As New ADODB.Command

con.Open ("Provider=vfpoledb.1;Data Source=.\B042011.dbf")
cmd.ActiveConnection = con

Dim st As String
cmd.CommandText = "select B042011.t_amt from B042011 where B042011.t_trn_dt>=#" & DTPicker1.Value & "# And B042011.t_trn_dt <=#" & DTPicker2.Value & "#"

Set rs = cmd.Execute
rs.MoveFirst
While Not rs.EOF = True
   Combo1.AddItem (rs.Fields("t_amt").Value)
   rs.MoveNext
Wend
End Sub

Answer 1

试试这个

"select B042011.t_amt from B042011 where B042011.t_trn_dt> = CONVERT( _utf8 '" &   dtpicker1.value & "'USING latin1 ) And B042011.t_trn_dt< =CONVERT( _utf8'" & DTPicker2.Value & "'"

我不确定，但这就是我所做的，它的工作原理..，

Visual Basic 6.0到visual foxpro数据库错误。

1 个答案: