Visual Basic.NET - Problema fechas sql

 
Vista:

Problema fechas sql

Publicado por Edu (30 intervenciones) el 15/03/2007 13:32:14
Cuando hago un select a una base sql server, me funciona bien, pero cuando quiero buscar en el mismo select entre dos fechas determinadas me da error, el codigo el:

Dim daentradas As New SqlClient.SqlDataAdapter("Select * from entradas " _
& "where fecha between # " & fecha1 & "# and #" & fecha2 & " # ", conex)
Dim entradas As New DataSet
daentradas.Fill(entradas, "entradas")
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Problema fechas sql

Publicado por maria (29 intervenciones) el 15/03/2007 16:00:20
Utiliza
CadSQL = "SELECT * From Entradas where (Contabilidad.FechaContabilidad between CONVERT(DATETIME, '" + Format(Fecha1.Value, "yyyy/MM/dd") + " 00:00:00',102) and CONVERT(DATETIME, '" + Format(Fecha2.Value, "yyyy/MM/dd") + " 23:59:59',102))
Espero que te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problema fechas sql

Publicado por Edu (30 intervenciones) el 15/03/2007 23:13:53
Gracias Chicos funciona OK
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Problema fechas sql

Publicado por Hugin (83 intervenciones) el 15/03/2007 16:12:30
Create un Procediemto almacenado y le pasas los parametros de fecha Ok alli lo Tienes

Create Procedure BuscarXFechas
@Fecha1 DateTime,
@Fecha2 DateTime
As
/*select * from orders where Convert(varchar(8),OrderDate,112) Between Convert(varchar(8),@Fecha1,112) And
Convert(varchar(8),@Fecha1,112)
*/
Select * From ORDERS Where OrderDate BetWeen @Fecha1 And @Fecha2

y desde vb.net lo llamas asi

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim cnx As New SqlConnection("userid=sa;database=northwind;server=Server2")

Dim dt As New DataTable
Dim ds As New DataSet
Dim da As New SqlDataAdapter("BuscarXFechas", cnx)
da.SelectCommand.CommandType = CommandType.StoredProcedure
da.SelectCommand.Parameters.Add("@Fecha1", SqlDbType.DateTime)
da.SelectCommand.Parameters("@Fecha1").Value = Me.DateTimePicker1.Value

da.SelectCommand.Parameters.Add("@Fecha2", SqlDbType.DateTime)
da.SelectCommand.Parameters("@Fecha2").Value = Me.DateTimePicker2.Value

da.Fill(ds, "Orders")

Me.DataGridView1.DataSource = ds.Tables(0)
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar