• Miércoles 1 de Mayo de 2024, 09:40

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.


Temas - venusita

Páginas: [1]
1
Crystal Reports / CROSSTAB NUMERO DE HOJAS
« en: Viernes 28 de Agosto de 2009, 00:39 »
UNA GRANDISIMA PREGUNTA Y DUDA!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Tengo mi reporte con un crosstab con una columna que se puede incrementar n veces segun los registros regresados por la consulta.......... pero cuando sobrepasa el limite de la hoja no realiza otra hoja nueva ya que por lo general los datos se incrementan hacia abajo como cuando se hace un reporte normal pero cuando es hacia la derecha...........como hacerle para que incremente las hojas segun los datoss...

Alguna sugerencia .........

2
VB .NET / ¿Como permitir el foco solo en celdas editables del grid?
« en: Viernes 24 de Julio de 2009, 00:09 »
Hola que tal.. tengo un problema  :no:  ........ tengo mi datagridview donde muestro ciertos datos...... solo ciertos rows son editables (readonly=false) todos los demas son readonly=true.

Al momento de dar enter o tab, como le puedo hacer para que solo permita el foco en las celdas moficables ya que recorre todas las celdas del grid....
Hice un codigo que suma y resta segun sea el caso si funciona, pero al momento de modificar la celda y  dar enter o tab o flecha derecha,siempre se posiciona en el row de abajo..... mi codigo es el siquiente:

'Aqui es donde al terminar de editar la celda y dar enter siempre me pone el foco en la celda de abajo.
Private Sub dgv_res_CellEndEdit(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles dgv_res.CellEndEdit
        Try
            Dim int As Integer
            Dim inx As Integer

            'Call teclas(13)
            '---------------------------------------------------------------------------------
            'Va sumando la cantidad que el usuario va tecleando en cada numero de la tienda
            '---------------------------------------------------------------------------------
            For inx = 2 To dgv_res.ColumnCount - 3
                If Not IsDBNull(dgv_res.Item(inx, e.RowIndex).Value) Then
                    int += dgv_res.Item(inx, e.RowIndex).Value
                End If
            Next
            dgv_res.Item(dgv_res.ColumnCount - 2, e.RowIndex).Value = int
       Catch ex As Exception
            MsgBox(ex.message, MsgBoxStyle.Critical, "Error")
        End Try
    End Sub


'Este es el codigo por ejemplo para el enter.
                   If dgv_res.CurrentCell.ColumnIndex < dgv_res.ColumnCount - 4 Then
                        'Siguiente columna
                        InMiFil = dgv_res.CurrentCell.RowIndex - 1
                        InMiCol = dgv_res.CurrentCell.ColumnIndex + 1
                    Else
                        InMiCol = 2
                        InMiFil = dgv_res.CurrentCell.RowIndex + 2
                    End If
                    'Posicionar columna
                    If InMiFil < dgv_res.Rows.Count - 1 Then
                        If InMiFil > -1 Then dgv_res.CurrentCell = dgv_res.Rows(InMiFil).Cells(InMiCol)
                    End If


Si el usuario no modiifica la celda y solo se muve entre ellas, si me funcioa el codigo ya lo tengo para las teclas arriba,abajo,deracha,izquierda,enter y tab. Pero si el usuario modifica la celda y da enter o cualquiera de las opciones que mencione no se posiciona en la celda siquiente hacia la derecha.

Alguien sabe de alguna propiedad especifica para solo permitir el foco en celdas editables del grid. Sin necesidad de hacer todo los sumar restar o x.  en la posicion actual que se encuentra la selección.

Ayuda por favorrrrrrrrrr     :brickwall:      :oops:

3
VB .NET / ¿Como mostrar fotos en crystal report?
« en: Martes 23 de Junio de 2009, 18:44 »
Hola que tal, tengo un problema  :oops:  . En mi reporte de crystal report se muestran los datos de los empleados pero la fotografia no puedo lograr mostrarla, el campo de mi tabla lo llamo foto y hay almaceno la ruta donde se guarda la foto tomada. En realidad en la Tabla no guardo la foto solo la ruta.....

Como le puedo hacer para mostrar esas fotografias en el reporte de crystal, utilizo visual basic 2005.

Ya intente de varias formas y de ninguna me la muestra: Por ejemplo  creo y asigno la tabla por codigo
            dt.Columns.Add("cveempl", System.Type.GetType("System.Int32"))
            dt.Columns.Add("foto", System.Type.GetType("System.Byte[]")) .......... etc...
despues con el select para recuperar los empleados voy llenando mi tabla
                drow = dt.NewRow
                drow(0) = dtr_emp("cveempl")
                drow(13) = ImageToByte(System.Drawing.Image.FromFile(strutafoto))

'funcion para convertir a byte la imagen , esta funcion la encontre en este mismo foro, de un usuario que tenia el mismo problema pero nunca postearon nada (nunca le ayudaron).
Public Function ImageToByte(ByVal pImagen As Image) As Byte()
        Dim mImage() As Byte
        Try
            If Not IsNothing(pImagen) Then
                Dim ms As New System.IO.MemoryStream
                pImagen.Save(ms, pImagen.RawFormat)
                mImage = ms.GetBuffer
                ms.Close()
                Return mImage
            End If
        Catch
        End Try
    End Function

de hecho e utilizado otra funcion como esta

fs = New FileStream('aqui coloco la ruta guardada en la tabla, FileMode.Open)
 br = New BinaryReader(fs)
 Dim imgbyte(fs.Length) As Byte
 imgbyte = br.ReadBytes(Convert.ToInt32((fs.Length)))
 drow(13) = imgbyte 'este es el campo ya convertido.
  br.Close()
 fs.Close()



Ya en mi reporte de crystal con el databaseexpert cargo la tabla (otra que cree en el dataser del proyecto de visual), para poder acomodar los campos.los CREO igual y en el mismo orden que aqui en el codigo......
YA AL MOMENTO DE LLAMAR AL REPORTE SI ME MUESTRA TODOS LOS DATOS EXCEPTO LA IMAGEN NO ME MARCA ERROR ALGUNO,SOLO NO LA MUESTRA EN LOS REGISTROS EL CAMPO FOTO LO COLOCA ASI.  SYSTEM.BYTE[] , ESO MUESTRA EN EL REPORTE.  de hecho mi campo foto es como si fuera un campo cualquira al jalarlo da la tabla al reporte.. y me he fijado que debe ser como un cuadro.................................AYUDA PLEASEEEEEEEEEEEEEEEEEEE

4
Visual Basic 6.0 e inferiores / ¿Como saber directorio actual commondialog?
« en: Martes 31 de Marzo de 2009, 19:34 »
commondialog.  :wacko:
InitDir
Devuelve o establece el directorio de archivos inicial.
 
Sintaxis  objeto.InitDir [= cadena]
 
La sintaxis de la propiedad InitDir consta de las siguientes partes:
 
objeto Nombre que define al CommonDialog
cadena Expresión de cadena que especifica el directorio de archivos inicial.
 
Si no se especifica esta propiedad, se utilizará el directorio actual. .

Lo que necesito saber es como saber cual es ese directorio actual porque yo no utilizo esa propiedad initdir   :no:  , ya que lo tengo que mostrar al iniciar la forma, y debo colocar en un textbox el path
del directorio en que se quedo el commondialog, sin que este haya sido abierto. Es decir abro el cuadro de dailogo selecciono una ruta y un archivo lo abro ya despues cierro mi sistema, llega otro usuario y al abrir el sistema debe aparecer la ultima ruta accesada. ¿Es posible saber el directorio actual de un commondialog?  

5
VB .NET / ¿¿Dataset y consulta sql?
« en: Sábado 14 de Febrero de 2009, 17:00 »
:blink:  hola que tal espero me puedan ayudar con algo no puedo solucionar....., en visual 2005 ......

Utilizo mis tablas de la base de datos y hago mis consultas muy bien, el problema es que utilizo tablas temporales pero para no crearlas en la base de datos las realizo en un dataset. El problema surge cuando tengo que hacer una consulta uniendo la tabla de base de datos con la del dataset: ejemplo como seria normalmente:

SELECT  Aux.*,empleados.cveempl,empleados.nombre "
FROM     empleados,Aux"
WHERE     empleados.Cvesucursal=Aux.cvesucursal "
       AND depto='G' ""
       AND estatus= 'AC'"



 :wacko:     en mi caso la tabla Aux es la tabla que esta en el dataset y empleados es la de la BD, como le hago para poder realizar una consulta similar uniendo las dos tablas......... es posible?Huh?Huh?Huh?... espero haberme explicado.. ya que por ejemplo para realizar una consulta del dataset la realizo asi::

  valor = dts_premio.Tables("aux").Compute("sum(importe)", "lugar=" & inlugar2 & "")

 :good:  y si me regresa el sum.... pero nose como unir las dos tablas como en el primero ejemplo   :unsure:   ..... es necesario que las una ya que tengo que saber cuantos registros regreso la consulta para realizar unos calculos...........     :comp:

6
VB .NET / ¿Como usar el For each?
« en: Martes 6 de Enero de 2009, 19:38 »
Hola que tal tengo un problema.... lo que pasa a razon de que ya no existen los arrays de controles como en visual 6, o al menos no se como se usan en visual 2005, quiero usar el for each next. para llenar unos combobox que tengo en el formulario..... son 10, para no declarar tanto codigo queria saber si se puede con el for each... ayuda pleaseee.....

for each combobox in form2
      combobox.items.add("Ejemplo1")
      combobox.items.add("Ejemplo2")
next

se supone que tiene que ser algo asi.. pero no me sale ayuda porfavor.............

7
VB .NET / ¿como llenar un DATASET?
« en: Miércoles 26 de Noviembre de 2008, 16:37 »
Hola que tal.... tengo un problema no puedo llenar un dataset desde un store procedure ...  :ouch:

al llenar el Dataset desde una consulta normal si se llena y muestra bien los datos en mi reporte, pero al hacerlo desde unl SP es como si se llenara pero vacio... :brickwall:  .... asi lo estoy llenando:

Dim dts As New DataSet
Dim dta As NpgsqlDataAdapter
Dim rpt1 As New rpt

 sql = "select * from sol(" parametro1 ",'" parametro2 "','" parametro3",'"parametro4"')"
dta = New Npgsql.NpgsqlDataAdapter(sql, conexion)
dta.Fill(dts, "tabla")
rpt1.SetDataSource(dts.Tables("tabla"))


*Nota: los parametros que manda no se llaman asi solo los asigne asi aqui para hacer referencia a que son los parametros.

no marca error ni nada,pero muestra el reporte vacio sin datos.  la tabla donde se llena el dataset la cree con los mismos campos en el mismo orden en que recupera la consulta.  :blink:

8
VB .NET / ¿Como llenar solo un campo del DATASET?
« en: Jueves 20 de Noviembre de 2008, 19:55 »
Hola que tal.. tego un problemita... lo que pasa que tengo que hacer un reporte donde muestre x campos y aparte el total de dias que trasncurrieron de tal fecha a otra......

Si puedo llenar el dataset para hacer refeerencia al reporte de esta forma::

 cmdr = New DataAdapter(Sql, conexion)
 cmdr.Fill(dtsreporte, "ctsol")

 rpts1.SetDataSource(dtsreporte.Tables("datos"))


frm_reporte1.crv_reporte.ReportSource = rpt_solicitudes1

Bueno falta codigo pero esto es lo escencial, mi tabla tiene 7 campos de esos 7 se llenan 6 con la consulta donde recupero los datos, el ultimo campo que es los dias transcurridos lo tengo que sacar mediante otra consulta independiente de donde se llena el dataset, entonces mi pregunta es:::


¿Es posible llenar un campo del dataset sin que se borren los demas campos???...espero explicarme. ya intente de todo no puedo hacer la consulta en una sola que me arroje los datos y el calculo...... lo hice con una formula pero el codigo lo pongo desde visual y no desde el record del crystal... si me arroja el resultado pero me pone el mismo para todos los datos......ayuda plisssss...

9
VB .NET / Problema con Control de usuario!!!!!!!!!
« en: Martes 23 de Septiembre de 2008, 01:50 »
:rolleyes: Hola que tal... estoy realizando una barra toolstrip personalizada (con los botones comunes 1er regitro,ultimo,nuevo,editar,etc) con mis propios iconos. para realizar el control hago lo siguiente:
 
1.- Creo un nuevo proyecto WindowsControlLibrary
2.- ya en el control agrego el toolstrip con sus respectivos toolstripbuttons
3.-genero la aplicacion y listo me creo la dll llamada barraherramientas y la clase/control de usuario se llama Barra1

Mi problema es el siguiente:  :(
 
El control que realize es solo para no estar diseñando a cada rato la barra, pero ya en los formularios donde la voy a usar kiero programar cada boton. y no puedo no encontrado la forma ya que el control de usuario al agregarlo a la forma es como si fuera el solo sin los botones y yo kiero programar cada boton  :comp:   . ejemplo:

'-----Esta es la clase/control de usario----------------------------
 Private Sub Barra11_Click1(ByVal sender As Object, ByVal e As System.EventArgs) Handles Barra11.Click

  End Sub

pero yo kiero programar cada componente del toolstrip   :brickwall:  .......... me explico?????  como normalmente  se hace.   :hitcomp:

Páginas: [1]