Iniciar sesión
Crear cuenta
Crear cuentaCrear cuenta| Hay un total de 3030 Preguntas. | << >> |
| Pregunta: | 22718 - ERROR EN ADO - AN OBJECT WAS OPEN |
| Autor: | Eduardo Jiménez Vargas |
| Estoy probando una conección desde VB con SQLSERVER, pero al realizar el open al objecto connecction, me envia un error que dice AN OBJECT WAS OPEN, alguien podria decirme que esta pasando. | |
| Respuesta: | Gabriel Koatz |
| Fijate que lo debes estar abriendo mas de una vez.Si necesitas ayuda mandame un mail que te mando ejemplos de conecciones a SQL Server.Saludos... | |
| Pregunta: | 22829 - COMO GENERAR EJECUTABLES PARA WINDOWS CE CON EL VBCE |
| Autor: | Modesto R |
| Hola:
A ver, mi problema es el siguiente, me he creado una aplicación utilizando la herramienta "Microsoft eMbedded Visual Basic 3.0", pero no se como se puede compilar el código para que me cree el ejecutable, sólo me sale para crearme un fichero con extensión .vb. Así que si alguien sabe como se hace, pues se lo agradecería. Un saludo | |
| Respuesta: | Rodolfo Solano |
| Hola Modesto.
Yo estoy trabajando con Visual Basic 6.0, pero este programa pertenece a MicroSoft Visual Studio 6.0 y este paquete que es unicamente para programacion, tiene un apartado que se llama MicroSoft Visual Studio tools este a su vez tiene na herramienta que se llama Package & Deployment Wizard, este programa se encarga de compilar tu programa y lo genera con la extencion exe, ademas de que te permite crear un un archivo Wizard que te ayudara cuando deses transportarlo e instalarlo en otra maquina. Como tu estas utilizando VB3.0, no hay problema si utilizas este programa ya que podras migrar tus proyectos a VB6.0 y asi actualizarte. Saludos desde Mexico y espero que mis comentarios puedan ser de utilidad para ti. | |
| Pregunta: | 22850 - ERROR 430 |
| Autor: | german HiDDeN |
| Mi pregunta es la siguiente tengo un prog. qur utiliza una base de datos en acces 97 y para conectarme a ella uso un data enviromen y genero los reportes con en un data report. La aplicacion esta echa en Visual 6 con el sp4, el problema es que cunado la instalo me da un erro 430 no se permite automatizacion o la interfas no es la esperada.
Lei ya las respuestas posteadas pero no pude resolver el problema con la referencias a dao 3.6. Para lograr que la aplicacion funcion debo instalar en la maquina el vb6 y ademas el sp4 se me ocurre que pueda ser algun componente incluido en es sp si alguin pudiera ayudarme desde ya muchas gracias por todo... | |
| Respuesta: | Jorge Pérez |
| El error 430 es un problema de compatibilidad:
Yo lo solucione bajando el ultimo Service Pack de MDAC, creo que es 2.6 o 2.7. Descargalo y veras como solucionas muchos problemas. Lo encuentras en la seccion "downloads" del sitio de microsoft | |
| Pregunta: | 22894 - CONECTARSE A INTERNET DESDE VB |
| Autor: | Lucho62 |
| Hola a todos!
Quisiera saber si alguien me pudiera facilitar un código para poder hacer que un usuario que ingresando sus datos se pueda por medio de mi programa se pueda conectar a Iinternet. Gracias! | |
| Respuesta: | Pedro Valencia |
| Este es el codigo que te puede ayudar, a mi me fue bien.
Saludos Pedro ****************** Dim A As Long Dim Pagina As String Dim Browser As Object Private Sub cmdAdelante_Click() Pagina = Text1.Text URL = Pagina + Trim(Str(A)) + ".jpg" LoadUrl (URL) lblNumero = Str(A) A = A + 1 End Sub Private Sub cmdAtras_Click() Pagina = Text1.Text URL = Pagina + Trim(Str(A)) + ".jpg" LoadUrl (URL) A = IIf(A >= 1, A - 1, A = A) lblNumero = Str(A) End Sub Sub LoadUrl(URL As String) 'On Error GoTo errores Browser.navigate "http://" + URL 'errores: 'End End Sub Private Sub cmdSalir_Click() Form_Terminate End Sub Private Sub Form_Load() A = 1 Set Browser = CreateObject("InternetExplorer.Application") Browser.Visible = True lblNumero = Str(A) End Sub Private Sub Form_Terminate() Set Browser = Nothing End End Sub Private Sub Form_Unload(Cancel As Integer) Set Browser = Nothing End Sub Private Sub Text2_Change() A = Val(Text2.Text) lblNumero = Str(A) End Sub ************************* | |
| Pregunta: | 22909 - AGENTES SNMP |
| Autor: | Gaston Zuccala |
| Hola me gustaria crear un agente SNMP para monitorear un PC remota, alguien tiene alguna idea
gracias | |
| Respuesta: | Edelmiro Camaño |
| Mira Gaston, creo que deberias generar un subagente usando las api de SNMP.
Saludos | |
| Respuesta: | viktor muñoz |
| Saludos :
Deberias probar el Carbon Copy ... es muy bueno en cuanto a monitoreo remoto, ya sea pos cable paralelo, serial, cable de modem, TCP/IP y demas . | |
| Pregunta: | 22913 - CONTROLAR LOS MB CONSUMIDOS DURANTE LA CONEXION A INTERNET |
| Autor: | OvI WaNe |
| Soy un programador novatillo y me gustaria crearme una aplicacion que me controle los Mb transferidos por internet durante la conexion. Querria saber con que control o api puedo extraer estos datos del sistema en tiempo real | |
| Respuesta: | SuNcO |
| Con este codigo puedes ver varias cosas acerca de la conexion activa
Estas 2 son lo que tu buscas Debug.Print stat.dwBytesRcved Debug.Print stat.dwBytesXmited Te lo pongo completo por si algo mas te sirve. Para cerrar una conexion puedes buscar en internet la palabra clave "RasHangUp" Private Declare Function RasEnumConnections Lib "rasapi32" Alias "RasEnumConnectionsA" (ByVal lprasconn As Long, ByVal lpcb As Long, ByVal lpcConnections As Long) As Long Private Declare Function RasGetConnectionStatistics Lib "rasapi32" (ByVal hRasConn As Long, ByVal lpStatistics As Long) As Long Private Type RASCONN dwSize As Long hRasConn As Long szEntryName(0 To 256) As Byte szDeviceType(0 To 16) As Byte szDeviceName(0 To 128) As Byte pad As Byte End Type Private Type RAS_STATS dwSize As Long dwBytesXmited As Long dwBytesRcved As Long dwFramesXmited As Long dwFramesRcved As Long dwCrcErr As Long dwTimeoutErr As Long dwAlignmentErr As Long dwHardwareOverrunErr As Long dwFramingErr As Long dwBufferOverrunErr As Long dwCompressionRatioIn As Long dwCompressionRatioOut As Long dwBps As Long dwConnectDuration As Long End Type Private Sub Form_Load() Dim conn As RASCONN Dim stat As RAS_STATS Dim y As Long, z As Long conn.dwSize = Len(conn) y = conn.dwSize If RasEnumConnections(VarPtr(conn), VarPtr(y), VarPtr(z)) = 0 Then stat.dwSize = Len(stat) If RasGetConnectionStatistics(conn.hRasConn, VarPtr(stat)) = 0 Then 'Debug.Print stat.dwAlignmentErr 'Debug.Print stat.dwBps 'Debug.Print stat.dwBufferOverrunErr ' ----- Datos Recibidos y Transmitidos Debug.Print stat.dwBytesRcved Debug.Print stat.dwBytesXmited 'Debug.Print stat.dwCompressionRatioIn 'Debug.Print stat.dwCompressionRatioOut 'Debug.Print stat.dwConnectDuration 'Debug.Print stat.dwCrcErr 'Debug.Print stat.dwFramesRcved 'Debug.Print stat.dwFramesXmited 'Debug.Print stat.dwFramingErr 'Debug.Print stat.dwTimeoutErr End If End If End Sub | |
| Pregunta: | 22924 - FUNCIóN API SETWINDOWSPOS |
| Autor: | Carlos Velando Cabañas |
| Desearia conocer como llamar a la función de la API de Windows SetWindowsPos en el sistema operativo Windows 2000.
Esta función ya la he utilizado en windows 98 y funciona perfectamente, pero al migrar las aplicaciones a Windows 2000 me da un error de desbordamiento de memoria. | |
| Respuesta: | Luis Bueno |
| yo probe esto en Windows 2000 y no tengo problemas
Dim i As Long i = SetWindowPos(Form2.hwnd, 1, 10, 10, 10, 10, 0&) Form2.Show tengo una pc p4 celeron 1.7 - 128 mb espero te sirva..bye | |
| Pregunta: | 22956 - DBGRID PARA INSERTAR DATOS SIN ESTAR VINCULADO A UN DATA |
| Autor: | SEBASTIAN ANDRES HENRIQUEZ OLIVARES |
| DESEO UTILIZAR UN DBGRID PARA IR INSERTANDO DATOS EN UNA COLUMNA, LUEGO DE ESTO REALIZAR UNA BUSQUEDA SEGUN EL DATO INGRESADO Y ASI FILA POR FILA, ESPERO QUE ME AYUDEN, SEBASTIAN , CHILE. | |
| Respuesta: | Lic. carlos hernandez huerta |
| bueno, imagino que ya viste que el dbgrid no manipula las filas y columnas y es por ello que estaria complicado, mejor usa en su lugar msflexgrid o herichal... nos se que, pero con el primero tienes, ya que puedes cambiar el ancho de cada celda, entrar a cada fila y columna he aqui algunos ejemplos
VISTA.ColWidth(0) = 10 'en esta columna no aparecen datos por lo que se hizo lo mas pequeña posible 'localizar el cursor en el encabezado y columna 5 para poner el titulo nombre VISTA.Row = 0 VISTA.Col = 5 VISTA.Text = " Nombre" VISTA.ColWidth(5) = 3500 'aqui aparece el nombre por lo que se hace de este ancho VISTA.ColWidth(6) = 3000 'el rfc es mostrado aqui VISTA.ColWidth(8) = 4500 'y aqui la direccion todo estos datos se jalan desde un control data para agregar datos desde un text box programa un evento keypress he incluye vista.AddItem text1.text para hacer busquedas solo tienes que usar un for, que recorra todas las filas y hacer uso de la propiedad text del objeto vista | |
| Pregunta: | 22960 - COMO PUEDO AñAIDIR UN BOTON NUEVO AL OUTLOOK EXPRESS?? |
| Autor: | indio * |
| Necesito añadir un boton a la barra de tareas del outlook express , el boton que necesiton añadir es un boton que me ejecuta un programa en visual se puede hacer esto?, si lo sabes por favor | |
| Respuesta: | Luis Ruiz |
| En Outlook 2000 si se puede hacer (creo que tambien en Outlook 98) lo que no se si en Outlook Express se puede hacer. Si quieres que te indique como lo tengo en el 2000 escribeme un mail.
Saludos | |
| Pregunta: | 23005 - VERIFICAR TECLA SHIFT O CAPS |
| Autor: | SuNcO |
| Una vez vi un codigo para ver si la tecla Shift o Caps estaban presionadas pero no lo encuentro, alguien sabe como ?
Lo busco porque tengo la de leer el buffer del teclado pero me regresa puras mayusculas Me refiero con API's | |
| Respuesta: | Antonio Quintela |
| Utiliza la siguiente función:
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer Los valores de vKey a controlar son: Public Const VK_SHIFT = &H10 Public Const VK_CAPS = &H14 Saludos. | |
| |< << 183 184 185 186 187 188 189 190 191 192 193 >> >| |
