PREGUNTAS CONTESTADAS - Visual Basic

Hay un total de 3030 Preguntas.

<< >>

Pregunta:	15120 - DETERMINAR SI SE HA IMPRIMIDO EL DATAREPORT
Autor:	Cristian Alberto Alballay Saez
Hola : Como puedo saber si se imprimio un informe ???, Necesito modificar una base de datos si es que se imprime o no el informe. Porfa, si alguien me puede ayudar..

Respuesta:	Pedro Herrarte
No se muy bien si funcionara pero si estas utilizando data report, puedes utilizar el evento AsyncProgress para hacer una marca, ya que la impresion es una operacion asincrona y recibes la informacion que necesitas en el evento.

Contestar

Pregunta:	15127 - SCROLLBAR VERTICAL EN UN LISTVIEW
Autor:	Cecilio Méndez Maestre
¿Algún humano sabe como puedo hacer que la barra de desplazamiento del listview sea vertical y no horizontal? Tengo un lisview con una columna y cuando los datos hacen necesario que aparezca la barra de desplazamiento, la columna se divide en dos y aparece la barra de desplazamiento horizontal. Yo quiero que siga manteniendose en una y que la barra de desplazamiento sea vertical. Gracias a todos por leerme y muchas gracias a los que me contesten.

Respuesta:	Fabian Toro
para que la barra vertical aparezca cuando sea necesario(no aparescan todos los registros en el listview), la propiedad FlatScrollBar debe ser False. y para que no aparezca la Horizontal agranda el ancho del listview, automaticament si no es necesaria la barra no la inserta.

Respuesta:	Jose A.
Hola Cecilio. ¿Has probado a poner la Propiedad VIEW del ListView en modo 4 - lvwreport?. Mira a ver si van por ahí los tiros. Un Saludo.

Contestar

Pregunta:	15148 - DATAREPORT - IMPRIMIR FECHA Y HORA DE IMPRESION
Autor:	jose Lara
Como incluyo la Fecha y Hora en un reporte, Creado con DataReport. Es decir, quiero que salga la Fecha y la Hora en que se imprime el reporte.

Respuesta:	Bases de Datos Sistemas C.A.
En el data report le das boton derecho al mouse y aparece algo como insertar compo especial total alli lo tienes, y puede agregar label y desde afuera lo cambias report.seccion.control("fecha").caption=date

Contestar

Pregunta:	15151 - AUTOCAD DESDE VISUAL BASIC
Autor:	Hernan Martinez Lamas
Lei en el foro de lawebdelprogramador sobre una referencia para manejar el autocad desde visual basic, yo estoy necesitando extraer los datos del rotulo de planos hechos con autocad, me sirve para esto??? Tendrian algun codigo de ejemplo para facilitarme?? O decirme donde puedo encontrar informacion sobre esta referencia? Muchas Gracias

Respuesta:

Frank Deivid Bolivar Acevedo

Tal vez este código le puede ayudar, desde una macro en Acad.
Crear un formulario con un botón cmdOK y pegar este código:

Option Explicit
Dim AcadDoc As Object
Dim objBloque As Object
Dim PtoBase As Variant
Dim varAtributos As Variant
Dim i As Integer

Private Sub UserForm_Initialize()
Set AcadDoc = GetObject(, "Autocad.Application").ActiveDocument
End Sub

Private Sub cmdOk_Click()
Me.Hide
AcadDoc.Utility.GetEntity objBloque, PtoBase, "Seleccione bloque con
atributos:"

varAtributos = objBloque.GetAttributes
For i = LBound(varAtributos) To UBound(varAtributos)
MsgBox "Tag: " & varAtributos(i).TagString & vbNewLine & _
"Texto: " & varAtributos(i).textString
Next i
End Sub

Respuesta:	Marito
Tengo un ocx para mandarte o http://download.com.com/3001-2408-1400022.html Salu2. Mario. Espero te sirva.

Contestar

Pregunta:	15192 - ICONOS EN LA PARTE DERECHA EN UN LISTVIEW
Autor:	Coatl Coatl
Estoy trabajando con una version 6 de visual basic y quiero colocar iconos en el encabezado de mi ListView (esta en forma de reporte), ya coloque los iconos utilizando la propiedad imageSmall y los iconos estan perfectos, pero lo que yo quiero es QUE LOS ICONOS SE MUESTREN DEL LADO DERECHO DE LAS ETIQUETAS DEL ENCABEZADO (como la hace el explorer de windows) Ejemplo: Los iconos se muestran así [Icono] Etiqueta \| [Icono] Etiqueta \| [Icono] Etiqueta y yo los quiero así Etiqueta [Icono] \| Etiqueta [Icono] \| Etiqueta [Icono] gracias de antemano!!

Respuesta:	Cecilia Colalongo
Lo que decís se hace con API's de Windows que utilizan precisamente esas rutinas del explorer. Yo lo tengo desarrollado en un OCX que coloca los íconos en la parte derecha y ordena el ListView. Si te interesa mandame un mail y te lo mando ya que aca no puedo agregar archivos.

Contestar

Pregunta:	15205 - ERROR 3706 - ERROR CON ADO Y SERVICE PACK 5 DE VB6.
Autor:	Javier Elizalde Salán
Tengo el siguiente problema: Desde que he actualizado mi ordenador con el Service Pack 5 de VB6, compilo e instalo mis programas sin problemas, pero al ejecutarlos me da el siguiente error: "Error 3706 en tiempo de ejecución: No se encontró el proveedor especificado. Es posible que no esté instalado correctamente" El error se me produce aunque utilice cualquier versión de ADO de las que tengo instaladas. Un saludo.

Respuesta:

Ricardo Vergara

Este error no es de ADO, sino del proveedor de datos que utilizas. En el caso de que utilices el proveedor de datos de Access (Microsoft.Jet.xxx) fíjate en la versión que utilices, pues esta es la que buscará la aplicación para conectarse a la Base de Datos. Este es un error bastante común; Las soluciones son varias:
(1) Si utilizas la última versión de Microsoft.Jet, actualízala bajándote el MSDAC (Microsoft Data Access Components, o Componentes de Acceso a Datos de Microsoft).
(2) Si distribuyes la aplicación SIN el MSDAC (que ocupa unos 8Mb, más o menos), deberás darle a la aplicaciób VARIAS alternativas para JET, es decir, intentar abrir una conexión con Jet.3.51; si va bien, estupendo; si va mal, prueba con Jet.4.0, y así. Para ello deberás implementar todas las posibles conexiones y capturar los posibles errores que te de.
Espero haberte ayudado.

Contestar

Pregunta:	15221 - ACCEDER A REGISTROS BORRADOS EN TABLAS FOX
Autor:	NESTOR GOMEZ
Tengo que acceder, con VISUAL BASIC 6.0,a registros de tablas DBF que han sido borrados con la instruccion DELETE desde FOXPRO 2.5. Estos, con FOXPRO, se ven como registros marcados con un punto a la izquierda del mismo, pero en VISUAL BASIC no puedo acceder a los mismos. COMO PUEDO HACER ???? Gracias.

Respuesta:	Jose Franco
Para accesarlos es necesario que hagas un ODBC de Visual Fox Pro y especificar el directorio donde estan los DBF y poner un cheque en la casilla de "Eliminados".

Contestar

Pregunta:	15299 - NúMERO DE SEMANA DEL AñO
Autor:	Luis Sanz Lucas
Hola: Me gustaría saber si existe alguna función de saber el número de semana en al que está un día determinado, o sea, yo le paso una fecha en el formato que sea y me devuelve el número de semana dentro del año. Muchas gracias.

Respuesta:

Pablo Coatl

Que tal Luis, hace un año aproximadamente estaba buscando lo mismo.
Para resolver el problema utilize codigo SQL de Access 97(realizado mediante una consulta) y asi obtener el numero de semana del año.
El único inconveniente es que debes crear una pequeña base de datos donde almecenes la fecha de inicio de la semana Uno.

El codigo SQL es el siguiente:

'En este ejemplo la Base de DAtos se llama "CONTROL", en ella hay una tabla llamada "Configuracion"
'Esta tabla contiene los campos:
'Fecha Inicial' de tipo Fecha
'Semana Actual' de tipo Numerico, puede ser Byte

'En tu formulario debes tener un Control DTPicker (de preferencia) o en su defecto utilizar un MaskEditBox
'Un boton de Comando
'Un control Data

private sub command1_click()
Dim arc as Database
Dim rs as Recordset
set arc=opendatabase(app.path & "\Control.mdb") 'app.path puedes cambiarlo por la ruta de la base de datos
'en caso de que utilices un mask edit control sustituye dtpicker1 por MaskEdBox1
set rs=arc.openreceordset("SELECT Int((#" & format(DtPicker1.value,"mm/dd/yyyy) & "# -[Configuracion]![Fecha Inicial])/7)+1 AS Semana" _
& " FROM Configuracion;")
if rs.recordcount>0 then
msgbox "La semana es: " & rs(0)
end if
rs.close
arc.close
set arc=nothing
end sub

Solo obtendras las semanas del año que hayas configurado en tu base de datos control, en caso de que coloques fechas menores te dara semanas negativas, si es demasiado superior te dara semanas mayores a 52 o 53
Espero que te sirva este control.
Saludos

Contestar

Pregunta:	15308 - DATAENVIRONMENT
Autor:	Sergio Palacios
He cargado uan tabla de Acces97 a traves del dataenvironmet de VB6 como por ejemplo Puntero = -1 While Not DataEnvironment1.rsCommand_Comex.EOF Puntero1 = Puntero1 + 1 For I = 0 To Contador - 1 DataEnvironment1.rsCommand_Query.Fields(I).Value = _ DataEnvironment1.rsCommand_Comex.Fields(Pos(I)).Value Next I DataEnvironment1.rsCommand_Comex.MoveNext If Puntero1 < Posicion Then DataEnvironment1.rsCommand_Query.AddNew End If Wend Ahora, mi problema es como puedo eliminar los registros cargados en esta tabla? He usado el siguiente comando "DataEnvironment1.rsCommand_Query.Delete" paaaaa fatal Error. Nose como debo hacerlo, agradecere que me puedan ayudar con este cachito. Attte. Sergio Palacios

Respuesta:	Sergio Brillo
Prueba creandote un recordset y aplicando lo siguiente: dim rst as adodb.recordset set rst=new adodb.recordset rst.open "delete from tabla",dataenvironment.conexion,...... esto te vacia la tabla, espero q sea esta la duda q tenias y habertela resuelto, si tienes alguna duda sobre esto escribeme y te lo explico mas a fondo, saludos

Contestar

Pregunta:	15323 - CHECKBOXES EN GRID
Autor:	Apolonio
Hola Amigos: Estoy trabajando en Visual Basic con el grid Microsoft Datagrid 6. Lo he enlazado a un Data que abre un recordset sobre una tabla d Access. Esta tabla contiene un campo de tipo Si/No. Al abrirla, este campo aparece con un ckeckbox. Sin embargo, al mostrarla a traves del grid, el campo Si/No de la tabla aparece como -1 y 0. ¿Como puedo hacerlo para que me aparezca en el grid en formato CheckBox como en Access? Gracias de Antemano

Respuesta:

SEBASTIAN ANDRES HENRIQUEZ OLIVARES

Mira siempre nos ha costado mucho trabajo utilizar los grid estandar de VB. en cualquiera de sus versiones. Te recomiendo que bajes desde www.fpoint.com un control llamado SPREAD 3.5 el cual es mucho mas configurable para utilizar en VB6 ya que en sus propiedades tiene su propio entorno de diseño y te sirve para utilizar menor código a la hora de programar.
Espero haberte ayudado en algo.

Buena Suerte.

Contestar

|< << 141 142 143 144 145 146 147 148 149 150 151 >> >|