• Viernes 8 de Noviembre de 2024, 12:32

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - miky_p

Páginas: [1]
1
Crystal Reports / Alguien Tiene Un Manual De Cristal Reports
« en: Viernes 14 de Julio de 2006, 11:08 »
hola de nuevo, agradeceria mucho si alguien tubiera un manual de cristal reports en español, con ejemplos, y si me lo pudiera enviar a :

maty40@hotmail.com

de ante mano muchas gracias.

2
VB .NET / Re: Manual De Vb .net
« en: Viernes 14 de Julio de 2006, 10:53 »
hola a atodos, xfa si alguien tiene el manual me lo envia a mi correo

maty40@hotmail.com

3
VB .NET / Vb.net No Acepta Parametro De Sql
« en: Viernes 14 de Julio de 2006, 10:44 »
buenas a todos, una consulta stoy haciendo un mantenimiento y quiero insertar un nuevo registro y q me aparesca el numero consecutivo, para esto hice un procedimiento en Sql (con varios type y uno de ellos es un select)y al parecer en Sql Funciona, pero al pasar el parametro de retorno al VB.net es te me retorna 0 y no el numero (habiendo + de 10 filas ya ingresadas)

mi codigo en VB.net es algo asi (esta en una clase)

Código: Text
  1.  
  2. Public Function AREAS_CORRELATIVO() As Int32
  3.         Dim objcn As New SqlConnection("server=.;database=una;uid=sa")
  4.         Dim objcmd As New SqlCommand
  5.  
  6.         objcmd.Connection = objcn
  7.         objcmd.CommandText = "XXX_AREAS"
  8.         objcmd.CommandType = CommandType.StoredProcedure
  9.  
  10.         Dim objpar1 As New SqlParameter("@TYPE", SqlDbType.SmallInt)
  11.         objpar1.Value = 5
  12.         objcmd.Parameters.Add(objpar1)
  13.         .
  14.         .
  15.         .
  16.         Dim objpar7 As New SqlParameter("@SALIDA_Correlativo", SqlDbType.Int)
  17.         objpar7.Direction = ParameterDirection.Output
  18.         objpar7.Value = 0
  19.         objcmd.Parameters.Add(objpar7)
  20.  
  21.         objcn.Open()
  22.  
  23.         AREAS_TRABAJO_INFOP_CORRELATIVO = objcmd.Parameters("@SALIDA_Correlativo").Value
  24. End Function
  25.  
  26.  


la tabla AREA el campo codigo es int
mi codigo en SQL es asi (tiene type = 1 "insert", type = 2 "delete", etc):

Código: Text
  1.  
  2.  
  3. CREATE PROCEDURE XXX_AREAS
  4. (@TYPE smallint,
  5. @CoAr INT, --- SOLO FUNCIONA PARA UPDATE, ELIMINAR, BUSQUEDA
  6. @DeAr VARCHAR(25),
  7. @SALIDA_Correlativo int output)
  8. AS
  9. DECLARE @CORRELATIVO INT
  10. BEGIN
  11.  
  12. -------- INSERTAR
  13.   IF @TYPE = 1
  14.   BEGIN
  15.     INSERT INTO AREA (DeAr) VALUES(@DeAr)
  16.   END
  17.                 .
  18.                 .
  19.                 .
  20.  
  21. ------- NUMERO CORRELATIVO
  22.   IF @TYPE = 5
  23.   BEGIN
  24.        SELECT @CORRELATIVO=COUNT(*) FROM AREA
  25.        SET @SALIDA_Correlativo = @CORRELATIVO + 1
  26.   END
  27. END
  28. GO
  29.  
  30.  

y al probarlo en SQL sale

Código: Text
  1.  
  2. DECLARE @SALIDA_RPARETRA INT
  3. exec XXX_AREAS_DE_TRABAJO_RPARETRA 5, '0', 'Almacen', @SALIDA_Correlativo OUTPUT
  4. PRINT @SALIDA_Correlativo
  5.  
  6. ---------------------------------------------------------------------------
  7. 15
  8.  
  9.  


no entiendo x q no me devuelve el valor, si alguien me pudiera ayudar me seria de mucha ayuda, de ante mano muchas gracias    :huh:  ;)

4
VB .NET / Re: Anchors Y Formularios Hijos ?
« en: Viernes 14 de Julio de 2006, 09:09 »
yo llamo mis form's asi

Dim Mi_Form As New Form2
Mi_Form.MdiParent = Me
Mi_Form.Show()

y pongo el WindowState=Maximized del Form2.

espero q te sirva de algo.  :blink:

5
VB .NET / Re: Cargar Datos A Una Tabla
« en: Viernes 14 de Julio de 2006, 08:53 »
no entiendo bien q quieres hacer, cargar un campo ó campos de una tabla en un txt, datagrid ó guardar datos en una tabla desde un txt, datagrid ?????????

 :(   :huh:   :(

Páginas: [1]