 |
|
ช่วยแนะนำโค็ดให้หน่อยครับ vb08 กับฐานข้อมูล access03 ตึงข้อมูลระหว่างวันที่ |
|
 |
|
|
 |
 |
|
ผมลองอ่านดูครับ รู้สึกงงๆ
ผมต้องเขียนโค็ดแบบไหนครับมาใส่ตรงเครื่องหมายคำถามทั้งสองอัน ที่เป็นค่าระหว่างวันที่ทั้งสอง
ผมลองใช้โค็ดนี้ในฟิล netTotal โดยแทนค่าในเครื่องหมายคำถามเป็นตัวเลข ก็ดึงข้อมูลมาได้"SELECT*FROM CashSale WHERE NetTotal BETWEEN 100 AND 2300"
แต่ถ้าต้องการดึงในฟิล SaleDate ยังไม่รู้จะเขียนยังไงนะครับ

|
 |
 |
 |
 |
Date :
2011-06-06 18:11:26 |
By :
Gumbee |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
เข้าใจผิดครับ หรือผมอาจจะเบล่อครับ ลองด฿ตัวอย่างการส่งแบบ Parameter ครับ
Code (VB.NET)
Dim dtAdapter As OleDbDataAdapter
Dim dt As New DataTable
strSQL = "SELECT * FROM files WHERE FilesID = @sFilesID "
dtAdapter = New OleDbDataAdapter(strSQL, objConn)
objCmd = dtAdapter.SelectCommand
objCmd.Parameters.Add("@sFilesID", OleDbType.Integer).Value = Request.QueryString("FilesID")
dtAdapter.Fill(dt)
Go to : ASP.NET Access BLOB Binary Data and Parameterized Query
|
 |
 |
 |
 |
Date :
2011-06-06 18:16:26 |
By :
webmaster |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
Private Sub ButtonCalculate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonCalculate.Click
Dim strSQL As String = "SELECT*FROM CashSale WHERE SaleDate BETWEEN @sDate AND @eDate"
da.SelectCommand = New OleDbCommand(strSQL, cn)
cm = da.SelectCommand
cm.Parameters.Add("@sDate", OleDbType.Date).Value = DTPstart.Value
cm.Parameters.Add("@eDate", OleDbType.Date).Value = DTPend.Value
Try
da.Fill(ds, "CS")
Catch ex As OleDbException
MsgBox(ex.Message)
Exit Sub
End Try
DGVcashsale.DataSource = ds.Tables("CS")
End Sub
ขอบคุณ mr.win มากครับ เขียนแบบข้างบนครับ
|
 |
 |
 |
 |
Date :
2011-06-06 18:49:43 |
By :
Gumbee |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
|
|