CLR: .Net / Mono / Boo / Otros CLR > VB .NET
Error Al Insertar Fecha (sql 2005)
Sagma:
gracias por la colaboracion, pero aun sigo teniendo problemas, fijate:
cuando esta de esta manera sale el siguiente mensaje:
--- Código: Text --- Dim FPro As DateTimeFPro = DateTime.Now
--- Citar ---Error de conversion al convertir una cadena de caracteres a datetime.
--- Fin de la cita ---
y cuando pongo de esta forma sale el siguiente mensaje:
--- Código: Text --- Dim FPro As DateTimeFPro = DateTime.NowFPro = Format(FPro, "dd/MM/yyyy")
--- Citar ---la conversion de tipo de dato char a datetime produjo un valor datetime fuera del intervalo
--- Fin de la cita ---
muchas gracias, pero fijate que he echo de esta manera y si lo carga:
--- Código: Text --- 'Dim FPro As DateTime = New DateTime(2006, 12, 12, 0, 0, 0)
lo inserta, pero como veras son fechas fijas, y la hora es cero.
gracias de nuevo por la ayuda :comp:
senzao18:
--- Cita de: "senzao18" --- Trata con lo siguiente....
Consulta2 = Consulta2 & _
"(CONVERT(Datetime, CONVERT(Varchar, '" & _
Valores(Cont + 1) & _
"', 101), 101) "
--- Fin de la cita ---
Trataste quitando el primer "(" se me barrio está de más jeje....
Que te marca con lo que te pasé.....???
Voy a buscar el codigo que yo uso para fechas.... haber que show....
senzao18:
--- Cita de: "senzao18" ---
--- Cita de: senzao18,Noviembre 24, 2006 10:37 am ---
Voy a buscar el codigo que yo uso para fechas.... haber que show....
--- Fin de la cita ---
Pues aui está el codigo... lo uso con un select.. y me funciona bien...
--- Código: Text --- Function DPVALE(ByVal strPlaza As String, ByVal Fecha As Date) As DataSet Dim strQuery As String = _ "Select movimientosdp.Plaza, movimientosdp.AsociadoID,CreditoDPVale.CodigoSAP as CodigoClienteSAP, " & _ "sum(Case When TipoDocumento in('Abono','Canc Abono') Then " & _ " Abono - Cargo " & _ " Else " & _ " 0 " & _ " END " & _ ") as Abono, " & _ "sum(Case When TipoDocumento in('Bonificacion','Canc Bonificacion') Then " & _ " Abono - Cargo " & _ " Else " & _ " 0 " & _ " END" & _ ") as Bonificacion " & _ "from movimientosdp " & _ " INNER JOIN CreditoDPVale ON MovimientosDP.AsociadoID = CreditoDPVale.AsociadoID " & _ "Where TipoDocumento in ('Abono','Bonificacion','Canc Abono','Canc Bonificacion') AND Plaza =@Plaza AND " & _ "FechaMovimiento = @Fecha " & _ "GROUP BY movimientosdp.Plaza, movimientosdp.AsociadoID,CreditoDPVale.CodigoSAP " & _ "Order by movimientosdp.Plaza,movimientosdp.AsociadoID,CreditoDPVale.CodigoSAP " Dim oResult As DataSet Dim sccnnConnection As New SqlConnection(oAppContext.ApplicationConfiguration.DataStorageConfiguration.GetConnectionString) Dim sccmdSelect As SqlCommand sccmdSelect = New SqlCommand With sccmdSelect .Connection = sccnnConnection .CommandText = strQuery .CommandType = System.Data.CommandType.Text .Parameters.Add(New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Bit, 1, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing)) '.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Referencia", System.Data.SqlDbType.Int)) .Parameters.Add(New System.Data.SqlClient.SqlParameter("@Plaza", System.Data.SqlDbType.VarChar)) .Parameters.Add(New System.Data.SqlClient.SqlParameter("@Fecha", System.Data.SqlDbType.DateTime)) .Parameters("@Plaza").Value = strPlaza .Parameters("@Fecha").Value = Fecha.ToShortDateString '.Parameters("@Referencia").Value = Referencia End With Dim oCatalogoCorridasAdapter As SqlDataAdapter oCatalogoCorridasAdapter = New SqlDataAdapter oCatalogoCorridasAdapter.SelectCommand = sccmdSelect Try sccnnConnection.Open() oResult = New DataSet oCatalogoCorridasAdapter.Fill(oResult, "DPVALE") Catch ex As Exception Throw ex Finally If (sccnnConnection.State <> ConnectionState.Closed) Then Try sccnnConnection.Close() Catch End Try End If End Try sccmdSelect.Dispose() sccmdSelect = Nothing sccnnConnection.Dispose() sccnnConnection = Nothing Return oResult End Function
Es un select algo raro pero el ejemplo de fecha ahi está cualquier duda.. haces tu post.
--- Fin de la cita ---
Sagma:
hola amigo, :( , la verdad estoy por volverme mono, pero aun sigo.
mira la imagen, de esa manera lo estoy haciendo, segun tu ejemplo que has pasado.
y aun sigo con el mensaje, y no puedo ingresar el dato a la DB.
--- Citar ---Conversion failed when converting datetime from character string
--- Fin de la cita ---
pero fijate, que estuve tratando primero en la DB del Sql 2005 y tambien me daba el mismo error, pero si se quita el p.m., todo ok. B)
--- Código: Text --- SET DATEFORMAT dmy; insert into planes(DESCRIPCIONplan,CPERIODOplan,GLOSAplan,ESTADOplan,FPROCESO) values ('asdasd',2,'zxczxc',1,CONVERT(datetime,CONVERT(varchar,'25/11/2006 13:43:53')))
ahora la pregnta del millon, como se hace para que no tengo " p.m. ", ya que estoy tratando con:
--- Código: Text --- Dim FPro As DateTime FPro = DateTime.Now FPro = Format(FPro, "dd/MM/yyyy hh:mm:ss")
y aun me sigue saliendo el mensaje:
--- Citar ---Conversion failed when converting datetime from character string
--- Fin de la cita ---
gracias por la colaboracion
senzao18:
Ah ok....
Trata poniendo 102 en lugar de 101.... eso puede funcionar.....
Aunque yo siempre le mongo
strFecha = Format(FEcha,"Short Date")
o
Feche.ToShortDate
Este ultimo ya en el armado de la cadena....
lo que pasa que si lo asigno a una tipo date... seguira poniendo la hora con 00:00:00
Navegación
[#] Página Siguiente
[*] Página Anterior
Ir a la versión completa