últimos mensajes de: TheGhost(Z)

Mostrar Mensajes
Páginas: 1 2 3 4 5 6 7 8 9 10 11 12 [13] 14 15 16 17 18 19 20 21

121	Programación / Programación Visual Basic / Re: DISTINCT SQL	en: 15 Julio 2007, 06:52 am
Lo de telefono no lo borre..... fue un error al postearlo... si pongo: Código: DISTINCT (*) ME ARROJA LOS 30 REGISTROS... PERO SI PONGO: Código: DISTINCT NOMBRES ME ARROJA 15 REGISTROS, PORQUE LOS OTROS 15 SON DUPLICADOS.. LO MALO ES QUE AL PONER SOLO NOMBRES LA TABLA SELECIONA SOLO EL CAMPO NOMBRES Y LOS CAMPOS APELLIDOS Y CIUDAD NO FIGURAN EN LA TABLA. ES POR ESO QUE AL LEERLO ME DA ERROR DE QUE NO ENCUENTRA LOS CAMPOS APELLIDOS Y CIUDAD. PARA QUE TAMBIEN MUESTRE LOS CAMPOS APELLIDOS CIUDAD TENRIA QUE PONER ASI.. " Código: DISTINCT NOMBRES, APELLIDOS, TELEFONOS FROM CLIENTES" PERO CON ESTA INSTRUCCION ME ARROJA LOS 30 REGISTROS....

122	Programación / Programación Visual Basic / DISTINCT SQL	en: 14 Julio 2007, 18:41 pm
''Tengo la tabla CLIENTES con los campos: ''NOMBRE ''APELLIDOS ''CIUDAD Código: Dim Rs As New Recordset Rs.Open "Select DISTINCT (NOMBRE) From CLIENTES ", DBConex, adOpenStatic, adLockOptimistic If Rs.RecordCount > 0 Then Dim Cadena As String For i = 1 To Rs.RecordCount Cadena = Cadena & Rs!Ciudad & " " & Rs!Telefono & Chr(13) Rs.movenext Next i MsgBox Cadena End If Hay 30 Registros.. al cargar a la cadena me dice que no encuentra los campos Rs!Ciudad y Rs!Telefono. Luego modifique a: Código: Cadena = Cadena & Rs!Nombre & Chr(13) Ahora si me funciona. cargo 15 registros, pero no me sirve obtener solo los nombres, sino que tambien los apellidos y ciudad aunque se repitan.. ¿como puedo hacer para que me muestre todos los campos y que no se repitan los valores del campo Nombre.? Tambien intente com: Código: Rs.Open "Select DISTINCT (NOMBRE), Apellidos, Ciudad From CLIENTES ", DBConex, adOpenStatic, adLockOptimistic Cargo los 30 registros sin validar nada... es decir con repeticiones en el campo nombres...

123

Programación / Programación Visual Basic / Listview A Excel (Aliner celda)

en: 13 Julio 2007, 23:30 pm

Holas, veran estoy exportando el contenido de un Listview a EXcel. Tengo un ''
problema al Aliner las celdasIzqueirda, centrarm, derecha
gracias por la yuda desde ya..

Código:

Private Sub ExportarListadoMSExcel()
Dim AppExcel As Object    
Set AppExcel = CreateObject("Excel.application")
With AppExcel
    .Visible = True 
    .Workbooks.Add '' Agregamos un Libro Nuevo

    Dim nFila As Integer
    nFila = 1 '' Agregos los titulos a nuestra columnas
    .Cells(nFila, 1) = "Id"
    .Cells(nFila, 2) = "Pais"
    .Cells(nFila, 3) = "Estado"
    Dim i As Long
    For i = 1 To Me.ListView1.ListItems.Count
        nFila = nFila + 1
        .Cells(nFila, 1) = Me.ListView1.ListItems(i).Text
        .Cells(nFila, 2) = Me.ListView1.ListItems(i).ListSubItems(1).Text
        .Cells(nFila, 3) = Me.ListView1.ListItems(i).ListSubItems(2).Text
    Next i
    
    .range("A1:C1").Font.Bold = True
    .range("A1:C1").Interior.Color = RGB(192, 200, 200)
    .Cells.EntireColumn.AutoFit

    '' ************* ERROR AL ALINEAR ayuda porfa.. **********************
    .Range("C1").TextAlign = fmTextAlignCenter
    .Range("A1:H1").HorizontalAlignment = xlCenter
    .cell(1,).TextAlign = fmTextAlignCenter
    '' ************************************************

    .ActiveWorkbook.SaveAs App.Path & "listado.xls" ''Guardas la hoja actual

End With

End Sub

124	Programación / Programación Visual Basic / Re: Consulta Con fechas	en: 12 Julio 2007, 00:54 am
je je je... eso mismo es!... Gracias, al parecer lee en el formado mes/dia/año, pero cuando abro el acces esta registrado con el formado dia/mes/año.. cosa rara como dices, pero he puesto el formato y ahora sí. funciona! Gracias...

125	Programación / Programación Visual Basic / Consulta Con fechas	en: 9 Julio 2007, 05:26 am
Por alguna razon no me funciona esta consulta.. SQL = "Where FechaOperacion BETWEEN #" & FechaInicio & "# And #" & FechaFin & "#" SQL = "Where FechaOperacion = #" & CDate(FechaInicio) & "#"

126	Programación / Programación Visual Basic / Re: ¿Un Formulario MDIChild Puede tener un fomulario contenedor?	en: 2 Mayo 2007, 19:35 pm
Bueno, para que me entiendad les dare un ejemlo. Lo que deseo hacer es similar al buscador de Microsft Acces. Supongamos que tengan cualquier formularioClientes en acces. este se ejecuta como MDCHILD, cuando haces CTR+B se carga un formulario Buscador pero tomando como padre, si se podriad ecir, al formularioClientes. Quier hacer esso mismo. Tengo un FormLario MDIPadrePrograma MDIChildClientes MdiChidListadoClientes con un listview cagados los clientes. un boton que diga buscar. Al cliclear en ese boton llamo a una ventanita bsucar con cajas de texto. Lo que deseo es que esa ventanita este vinculado al mi MDIChilListadoClientes. Normalmente usaba. Código: FormBuscar.Show, MDIChildListadoClientes Asi mi formulario Buscar se sobreponia en el MDIChildListadoCLiente. Si POner VBmodal, porque sino me para todo el sistema.

127	Programación / Programación Visual Basic / Re: ¿Un Formulario MDIChild Puede tener un fomulario contenedor?	en: 29 Abril 2007, 15:26 pm
Me sale error "371" No se puede usar el objeto especificado como un formulario propietario para Show() Tambien probe con: Código: FormBuscar.Show , FormMDIChilListados Y sigue arrojando error

128	Programación / Programación Visual Basic / ¿Un Formulario MDIChild Puede tener un fomulario contenedor?	en: 26 Abril 2007, 19:06 pm
Holas, Veran tengo un formulario MDI Padre con un fomrulario MDCHILD. Etse Child contiene un listado. Y un command Button que llaman a un formulario buscar con: Esta Funciona FormBuscar.Show VBModal (Pero no es lo que deseo) FormBuscar.Show, FormMDIChilListados Esta me arroja error... Alguien, sabe como solucionar esto?.

129	Programación / Programación Visual Basic / Re: Como averiguo la ruta del disco duro?	en: 2 Abril 2007, 16:34 pm
No conocia lo de Environ tampoco

130	Programación / Programación Visual Basic / Re: Ejecutar una aplicacion en Web	en: 2 Abril 2007, 16:07 pm
Código: ¿como lo agrego a la pagina web? Supongo que el exe lo puedes alojar en el mismo directorio donde tengas los GIF's JPG's etc. Puedes acceder a ella como cualquier otro archivo: Código: <a href="\Archivos\lol.exe">Mira mi archivo exe</A> Pero no del todo es facil, porque generalmente esa etiqueda html hace que salga la ventanita de "Descargar archivo" con la pregunta ¿Desea abrir o guardar este archivo?. Tambien si el exe usa OCX's o DLL's no podra funcionar, a menos que se instale previamente en el ordenador. Como dice Sancho.Mazorka los activex si se pueden.. Saludos, Suerte

Páginas: 1 2 3 4 5 6 7 8 9 10 11 12 [13] 14 15 16 17 18 19 20 21