PREGUNTAS CONTESTADAS - Crystal Report

 Hay un total de 3030 Preguntas.<<  >> 

    Pregunta:  21775 - MACROS EN PROJECT
Autor:  Patricia Rojas Carter
Necesito realizar una macro en microsoft project , se que es grabar nueva macro, luego le doy las columnas, FechaInicio; FechaTermino , pero cuando abro la macro no sé como tomar estos campos para asignarle datos y trabajar con ellos en VB6.0
  Respuesta:  Gabriel Del Rio
¿Supongo que lo que deseas hacer es un formulario personalizado para crear introducir datos? una vez que grabes la macro deberás entrar al entorno de programacion y editar tu macro (supongo que sabes VB) ahi crearás tu formulario le pondras controles y luego tomaras las referencias de los datos que grabaste en tu macro.

Contactame y te hecho la mano.

    Pregunta:  21830 - COMO PROCESAR UNA DATA DE ACCES 2002 EN VB6
Autor:  HANS DIAZ
SOY UN PRINCIPIANTE Y AGRADECERIA SI ALGUIEN ME PUEDE RESPONDER COMO HACER PARA QUE VB6 ME RECONOSCA EL FORMATO DE BASE DE DATOS DE ACCES(VERSION XP), SE LOS AGRADECERIA.
  Respuesta:  M en C. Carlos Hernandez Huerta
eso es totalmente cierto, en dado caso que quieras trabajar con ADO, sin embargo el vb6 y el vb5 incorporan un control mucho mas potente que te permite enlazar los datos via OBDC de una forma sencilla tan sencilla como usar un ADO, esto es atravez de un DATAENVERIMENT solo tienes que agregarlo a tu proyecto a travez de la opcion objetos insertables, una vez que lo agreges asegurate de tener la conexion obdc de tu base de datos a utilizar dale click derecho y en propiedades cargala, ahora para enlazarla solo tienes que usar la propiedad datasource con el control DE y la propiedad DATAMEMBER para especificar que commando (tabla) vas a usar y la propiedad FIELD para conectar el campo, bien existen algunas cosas que cambian pero yo antes usaba el vb5 y cuando vi la facilidad de esto mejor me dedique al vb6, bueno el vb.net esta mejor todavia, pero como dicen por ahi... "eso es otra historia".. :-) Saludos
  Respuesta:  Luis Miguel Mora.
Saludos, te tengo malas y buenas noticias, las malas son que VB6 No trabaja con ACCES 2000 ni con XP, pero la buena es que despues que hagas tu base de datos le das guardar como y luego la guardas en formato de acces 97 y asi si la lee VB6.

Bueno espero haberte ayudado, cualquier cosa no dudes en escribirme.

    Pregunta:  21832 - ACTIVA/DESACTIVAR EL PROTECTOR DE PANTALLA EN VB6 (WINDOWS9X
Autor:  jesus diego hernandez canizalez
como accesar a la dll del protector de pantalla y poder activarlo y desactivarlo por medio de visualbasic en windows 95,98 ó 2000
  Respuesta:  KAkunI o
es facil solo debes pasarle los parametros necesarios a una funcion de la Api

copia este codigo en un formulario con un boton
esto en el area de declaraciones ***********
' declaraciones para activar el protector de pantalla
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Const comWM_SYSCOMMAND = &H112&
Const cSC_SCREENSAVE = &HF140&
*************
*************
y esto obviamente en el evento click del boton
Private Sub Command1_Click()
Dim Resultado As Long
Resultado = SendMessage(Me.hwnd, comWM_SYSCOMMAND, cSC_SCREENSAVE, 0&)
End Sub
presiona el boton y listo!!!

.....KAkunI......

    Pregunta:  21847 - DLL\'S NECESARIAS PARA HACER INSTALABLE CON JET 4.0
Autor:  luis german gutierrez
No puedo realizar un instalable cuando utilizo acceso a datos con el proveedor Microsoft.jet.oledb.4.0 El programa funciona en mi máquina porque tengo instalado el Microsoft access 2000.

El problema es que si lo instalao en una computadora que no tiene access 2000 marca un error diciendo que \"ADO NO ENCUENTRA EL PROVEEDOR ESPECIFICADO\"

Ya intente con algunas librerias como msjoledb40.dll pero además de esa me faltan otras . Cuales ???
  Respuesta:  flor cueto
intenta abrir tu base con este proveedor

strCn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & nombredebase & ".mdb;" & _
"Jet OLEDB:database Password=pwr;"

If Cn.State <> adStateOpen Then
Cn.Open ConnectionString:=strCn
End If

me dices si te funciono, saludos

    Pregunta:  21935 - ATRIBUTOS EN DIRECTORIOS
Autor:  Jorge Cárdenas Salas
¿Cómo puedo cambiar los atributos a un directorio desde VB, específicamente quiero hacerlo escondido, o crearlo ya escondido?
  Respuesta:  Marito
En un form pone un commandbutton y asocia el siguiente codigo

Private Sub Command1_Click()
'se crea el directorio hola en el escritorio
FileSystem.MkDir ("c:\windows\escritorio\hola")
'le damos el atributo de oculto
Call FileSystem.SetAttr("c:\windows\escritorio\hola", vbHidden)
end Sub

Espero te sirva.
Cualquier cosa avisame.
Salu2.

    Pregunta:  21938 - PROBLEMAS DE MEMORIA
Autor:  Lucrecia Lavirgen
Hola a todos:

Tengo el siguiente problema. Estoy desarrollando un sistema en VB 5.0. El sistema tiene alrededor de 40 formularios y cuando cargo el proyecto me da el mensaje "sin Memoria". Pues lo que hice fue ir y agregarle más memoria ram a mi PC, ahora tiene 384 MB. Pero tampoco me funciona y sigue dando el mismo mensaje. ¿ Que puedo hacer?, porque el sistema es grande y no puedo sacar formularios

Muchas Gracias. Voy a estar esperando la ayuda
  Respuesta:  Robert salinas robles
mira : Lucrecia debes revisar si los formularios estan siendo descargados. Ahora tambien para programar tu debes de usar la menor cantidad de controles posibles, porque bajan la memoria que tu posees. En cuanto tu cantidad de MB ram, no debiese impedimento.
y descargar tambien los Dll's ocupados.

    Pregunta:  21962 - COMO TOMAR LA HORA DEL SISTEMA INCLUYENDO LOS MILISEGUNDOS
Autor:  Raul Lozada
Hola:

Me gustaria que me pudieran ayudar, necesito tomar la hora del sistema, para poder calcular el tiempo transcurrido entre la hora inical y la hora final (estoy haciendo un programa que analiza una gramatica y necesito saber como le hago para calcular el tiempo transcurrido o el tiempo que dura en analizar la sintaxis del codigo). A lo mejor sea algo facil, pero no le encuentro. Estoy utilizando Visual Basic.

Gracias.
  Respuesta:  Luis Miguel Vázquez
Ahi te envio el programa que lo realiza.

' Esto en el formulario

Private Sub Command1_Click()
Dim lngTickCount As Long
lngTickCount = GetTickCount
Call MsgBox("Has usado tu ordenador durante:" & vbCrLf & _
" * " & CStr(lngTickCount) & " milisengundos, o " & vbCrLf & _
" * " & CStr(lngTickCount / 1000) & " segundos, o " & vbCrLf & _
" * " & CStr(lngTickCount / 60000) & " minutos", vbInformation)
End Sub

' Esto otro en un modulo
Public Declare Function GetTickCount Lib "kernel32" () As Long

    Pregunta:  21963 - COMO TRATAR LOS BUTTONMENU
Autor:  Sergio Brillo
Tengo un problema, tengo una barra de heramientas (toolbar) y le he agregado unos bottonmenus, pero no se como saber si me han apretado estos botones para iniciar procedimientos relacionados a esos botones
  Respuesta:  Sergio Brillo
Mediante el evento buttonmenuclick, el codigo que he utilizado es el siguiente:

Private Sub Toolbar1_ButtonMenuClick(ByVal ButtonMenu As MSComctlLib.ButtonMenu)
Select Case (ButtonMenu.Key)
Case "A": stock_pmedio
Case "B": bajo_minimos
End Select
End Sub

    Pregunta:  21975 - OBJETOS QUE SE ENCUENTRAN BAJO EL PUNTERO DEL MOUSE
Autor:  Marvin Callejas
Necesito una función que me retorne una referencia al objeto que se encuentra bajo el puntero del mouse, algo así como el sys(1270) de Visual Fox.
Estoy haciendo un menú similar al de outlook y necesito verificar en el evento timer, si el usuario se encuentra sobre el elemento del menú que he resaltado cuando entra al elemento.
  Respuesta:  Boule Mikhael Najm Bossio
PUEDES UTILIZAR LA OPCION DE MOUSEOVER EN CADA OBJETO QUE DESEES Y CADA VEZ QUE EL PUNTERO ESTE SOBRE EL OBJETO ACTIVAS UNA BANDERA QUE LO RECONOZCA COMO strObject = "OPEN" LUEGO EN EL TIMER A~NADES UN SELECT CASE PARA QUE RECONOZCA EL VALOR DE strObject Y ALLI TIENES EL PROBLEMA RESUELTO

    Pregunta:  21979 - TRAER PROFILE DE OUTLOOK
Autor:  jonathan rivera
Hola a todos!
Quisiera saber como puedo hacer para extraer el profile defaul de mi cliente de outlook por medio de codigo en visual basic.

de antemano muchas gracias.
  Respuesta:  jose hernandez
mete esto en un boton:
Dim MiOjbetoOutlook As Object
Dim perfil As Object
Set MiOjbetoOutlook = GetObject("", "OutLook.Application")
Set mynamespace = MiOjbetoOutlook.GetNamespace("MAPI")
Set perfil = mynamespace.currentuser
If perfil Is Nothing Then
MsgBox ("perfil no disponible")
Exit Sub
Else
MsgBox perfil
End If

|<  <<  179 180 181 182 183 184 185 186 187 188 189  >>  >|