Iniciar sesión
Crear cuenta
Crear cuentaCrear cuenta| Hay un total de 3030 Preguntas. | << >> |
| Pregunta: | 37509 - COMO FORMATEAR UN DISKETTE |
| Autor: | Alonso Martinez Gutierres |
| Tengo una pregunta y espero que me puedan ayudar.
Quisiera sabere como puedo formatear un diskette (3 1/2) desde un programa en Visual Basic 6.0 Desde ahora les agradesco su ayuda | |
| Respuesta: | Oswaldo Monagas |
| Para formatear te envio un programita que te abre la ventana de windows para hacerlo.
Private Sub Command1_Click(Index As Integer) Dim Str As String Select Case Index Case 0: Str = Shell("rundll32.exe shell32.dll,SHFormatDrive", 0) Case 1: Str = Shell("rundll32.exe shell32.dll,SHFormatDrive", 1) Case 2: Str = Shell("rundll32.exe shell32.dll,SHFormatDrive", 2) End Select End Sub Private Sub Command2_Click() Unload Me End Sub Pon tres botones y nombralos asi: el primero Formateo rapido como caption y en el index = 0, el segundo Formateo Total y en Index = 1 el tercero Copiar archivos de sistema Index = 2 Agregale un rutina de errores si no esta el disco en la unidad, o chequea si esta preparada la unidad. Saludos | |
| Pregunta: | 37518 - ERROR: 80004005[ODBC MICROSOFT FOXPRO DRIVER] |
| Autor: | israel Hernandez |
| Hola, me he encontrado con el siguiente error cuando intento abrir un tabla de FoxPro en VB:
-2147467259[ODBC Microsoft FoxPro Driver] No se encuentra la secuencia de ordenancion 'SPANISH'. os agradeceria si alguien me puede dar solucion a este dichoso problema, ya que no tengo mucha experiencia en esto de la programacion con BD en VB. Gracias. | |
| Respuesta: | Cecilia Colalongo |
| Fijate de crear un DSN de archivo desde el Panel de Control y usar el contenido de ese archivo como ConnectionString.
Con eso debería solucionarse. | |
| Pregunta: | 37531 - PROBLEMA CON CONEXION ODBC A BASE DE DATOS ACCESS |
| Autor: | didier mendez valencia |
| HOLA PROGRAMADORES, ME LLAMO DIDIER, Y TENGO ESTA DUDA.
ESTOY TRATANDO DE CONECTAR MI APLICACION CON UNA BASE DE DATOS DE ACCES GENERANDO UNA CADENA UTILIZANDO EL CONTROL ADODOC Y ME DA EL SIGUIENTE ERROR ERROR DE MICROSOFT DATA LINK "la prueba de conexion fallo debido a un error al iniciar al proveedor. no se pudo abrir la tabla MSysAccounts en el archivo de informacion del grupo de trabajo" | |
| Respuesta: | Ronald León Madrid |
| Hola didier :
Tu problema es simple, deja de utilizar el control ADODOC y utiliza la siguiente conexion. Public Const cConecta2000 = "User Id =sa;Password= ;Data Source=Nombre del Obdc" Nombre del Odbc dsn de usuario de cualquier base de datos. Saludos. | |
| Pregunta: | 37606 - PROBLEMA AL ACCESAR DATOS TIPO DOUBLE |
| Autor: | Oscar Melendez Rodriguez |
| Tengo una base de datos ACCESS, en algunas tablas se cuenta con datos tipo DOUBLE para almacenar un numero de 18 dígitos. Se trabaja con una aplicación en Visual Basic 6.0.
El dato queda bien registrado, pero a la hora de accesarlo para despliegue o impresión, aparece con el último dígito redondeado. | |
| Respuesta: | Héctor Romero |
| Prueba a utlizar una funcion que hay que se llama CDbl(dato) que sirve para hacer conversion a double.
Ademas existen muchas otras funciones que empiezan todas con C<tipo_dato> que igual te sirven | |
| Pregunta: | 37670 - FTP CON WINSOCK |
| Autor: | Antonio Fernández |
| Estoy intentando hacer un programa de FTP (tipo CuteFTP, etc.) y lo estoy intentando hacer con winsock.
Intento realizar la conexion (debo enviar un usuario y una contraseña), pero no consigo establecerla ni enviar el usuario ni la contraseña. Revisando la propiedad State del winsok veo que pasa directamente de estado Conectando (6) a estado Desconectando (8). Como podria establecer esta conexion? | |
| Respuesta: | Gabriel Plana Gavaldà |
| Hola Antonio.
Aunque no sé contestarte directamente a tu respuesta, pues requiere saberse el protocolo FTP y no me lo sé, te dirigiré a una web que habla sobre este tema e incluso hay el código fuente de programas de FTP. Es la siguiente: www.vbip.com Espero haberte servido de ayuda. | |
| Pregunta: | 37678 - DIAS DEL MES |
| Autor: | Sergio Andres Alcavil Burgos |
| Necesito Saber si existe una Función Para saber los dias de un mes, o
como hacerlo. | |
| Respuesta: | david luna |
| Creo saber lo que quieres. bueno deseas saber cuentos dias tiene un mes:
Debes localizar el dia primero del siguiente mes y restarle un dia asi sabras cuantos dias tiene cada mes, incluyendo si hay bisiestos. | |
| Respuesta: | Ronald León Madrid |
| Hola sergio :
Creo a ver entendido tu pregunta, la solución a tu problema podria ser de la siguiente manera : Format(CDate(lrRs!FchAcc), "dddd") Donde : lrRs!FchAcc es un campo de base de datos de tipo fecha Pues esta te devuelve el dia del mes y del año especifico. saludos. | |
| Pregunta: | 37687 - COMO RECUPERAR UNA VARIABLE DE SALIDA DESDE UN PROCEDIMIENTO |
| Autor: | Juan Pablo San Martín |
| Estimados: mi problema es que cuando ejecuto un procedimiento almacenado el cual devuelve un parametro de salida...no lo puedo recuperar en Visual...como puedo hacer esto?...si me pueden mandar un ejemplillo sería genial.
pdta: mi conexion a SQL server la hago con ADO. | |
| Respuesta: | Luis Bueno |
| ok.. un proced almac devuelve datos en un recordset pero lo q tu necesitas es el valor de un para de salida del store. entonces ahi te va creo q es comprendible desde cualquier punto de vista
Public Function ValidaUsuario(psUsuario As String, psNombres As String, piActivo As Integer) As Integer Dim oCmd As ADODB.Command Dim oPrm As ADODB.Parameter Dim msValor As String Set oCmd = New ADODB.Command With oCmd .CommandTimeout = 0 .CommandType = adCmdStoredProc .CommandText = "sp_ValidaUsuario" .ActiveConnection = BDSqlServer Set oPrm = oCmd.CreateParameter("pUsuario", adVarChar, adParamInput, 15, psUsuario) oCmd.Parameters.Append oPrm Set oPrm = oCmd.CreateParameter("pNombres", adVarChar, adParamInput, 30, psNombres) oCmd.Parameters.Append oPrm Set oPrm = oCmd.CreateParameter("pActivo", adInteger, adParamInput, 4, piActivo) oCmd.Parameters.Append oPrm Set oPrm = oCmd.CreateParameter("pExiste", adInteger, adParamOutput) oCmd.Parameters.Append oPrm .Prepared = True .Execute If IsNull(.Parameters("pExiste")) Then ValidaUsuario = 0 Else ValidaUsuario = .Parameters("pExiste") End If End With Set oCmd = Nothing End Function ''El Store CREATE PROCEDURE sp_ValidaUsuario @pUsuario varchar(15), @pNombres varchar(30), @pActivo int, @pExiste int OUTPUT AS SET NOCOUNT ON IF NOT EXISTS(SELECT * FROM ACCESO_SISTEMA WHERE USUARIO IN (SELECT USUARIO WHERE USUARIO=@pUsuario )) INSERT INTO ACCESO_SISTEMA (USUARIO,CLAVE,NOMBRES,ACTIVO) VALUES(@pUsuario,@pUsuario,@pNombres,@pActivo) RETURN 0 GO Espero te ayude hasta pronto.. bye | |
| Respuesta: | Gabriel Plana Gavaldà |
| Creo que lo que buscas viene en la ayuda de Visual Basic.
Este es un ejemplo de como ejecutar el procedimiento almacenado sp_who, el cual devuelve un parámetro. Los parámetros de salida son recogidos por el recordset que devuelve el método Execute del objeto ADO Command. Espero haberte ayudado. Tengo una documentación sobre ASP publicada en esta web. Si te interesa el tema de ASP te agradecería que la miraras y hicieras algún comentario. Dim cn As New ADODB.Connection Dim cmd As New ADODB.Command Dim rs As New ADODB.Recordset cn.Provider = "sqloledb" cn.Properties("Data Source").Value = "MyServerName" cn.Properties("Initial Catalog").Value = "pubs" cn.Properties("Integrated Security").Value = "SSPI" cn.Open Cmd.ActiveConnection = cn Cmd.CommandText = "sp_who" Cmd.CommandType = adCmdStoredProc Set rs = Cmd.Execute Debug.Print rs(0) rs.Close | |
| Pregunta: | 37722 - PROGRAMAR NOTAS CON VISUAL BASIC |
| Autor: | Fernando Hermosilla |
| Hola,
quisiera saber como poder reproducir notas con Visual Basic. No quiero reproducir ningún archivo de sonido, sino que quiero saber que instrucción de Visual me permite hacer sonar las diferentes notas del pentagrama. Gracias | |
| Respuesta: | Sandy Serna parra |
| Hola Fernando.
hay una funcion en visual que se llama beep que Emite un sonido por el altavoz del equipo. de acuerdo a el tiepo que le des de espera sera la frecuencia y la nota. esto tu lo debes programar de acuerdo a tu oido. para ayudarte en los tiempos hay una funcion mas bien una API llamada sleep que detiene el tiempo en milisegundos un ejemplo: beep seep(100) beep seep(200) dos notas ok espero te sirva Sandy Serna parra Programador de Sistemas Halcon34 | |
| Pregunta: | 37777 - PERSONALIZAR EL TOOLBAR |
| Autor: | Jimmy Perez |
| Holas con todos quien me puede ayudar hacer mi toolbar con los button transparentes o el toolbar transparentes o en todo caso darles color de fondo al toolbar o a los button por medio de llamadas api. gracais | |
| Respuesta: | Rafael Yzarra |
| No lo considero una respuesta, pero si una referencia para lograr la solución a tan singular problema.
En las ventanas principales de muchos programas (Explorer, Excel,...) el Toolbar usado pasa despercibido: sus diseñadores lo presentaron lo más adaptado posible al fondo en donde se ubica. De existir las propiedades BackColor y/o Style, es posible lograr el cometido; de no ser así, estas pueden ser otras alternativas: 1era: Colocar en uno de los extremos del formulario (form(i)) un objeto Frame y sólo mostrarlo cuando se vaya a utilizar. 2nda: En la propiedad Personalizado, el ComboBox STYLE BUTTOM (o algo similar), permite colocarle bordes transparentes; si adicionalmente, colocas como 'imagen' un cuadro con el mismo color de fondo, el ToolBar puede pasar desapercibido. Una respuesta más concreta, dependerá del tipo de aplicación o la necesidad puntual presentada. Ojalá lo expuesto sea de utilidad. | |
| Pregunta: | 37779 - SABER ENFOQUE DESTINO ANTES DE PERDER ENFOQUE ACTUAL |
| Autor: | Gerardo De la Rosa |
| HOLA A TODOS
TENGO BASTANTE TIEMPO TRATANDO DE BUSCAR LA SOLUCION A LO SIGUIENTE, A VER SI ALGUIEN PUEDE AYUDARME. RESULTA QUE TENGO UN TEXTBOX, QUE VALIDA EN UNA BASE DE DATOS QUE NO SE REPITA EL NUMERO, CUANDO ESTO SUCEDE FORZO A QUE EL FOCO LO SIGA TENIENDO EL TEXTBOX, ESTA VALIDACION LA HACE CUANDO PIERDO EL FOCO DEL MISMO, ADEMAS TENGO DOS COMMANDBUTTON UNO PARA GUARDAR EL TEXTO DEL TEXTBOX Y EL OTRO PARA CERRAR EL FORMULARIO, EL PROBLEMA ESTA EN QUE CUANDO PRESIONO EL BOTON PARA CERRAR EL FORMULARIO SI EL TEXTO YA EXISTE EN MI BASE DE DATOS ME SIGUE DEJANDO EL FOCO EN EL TEXTBOX Y NO ME CIERRA EL FORMULARIO, PERO SI PRESIONO EL CONTROL DEL FORMULARIO PARA CERRAR EL MISMO SI ME LO PERMITE. A VER SI ALGUIEN ME PUEDE AYUDAR SALUDOS | |
| Respuesta: | Oswaldo Monagas |
| Hola Gerardo, aqui tienes el codigo.
How To hide your program from the Ctrl+Alt+Delete list The Application Programming Interface makes it easy to hide your program from the task list. Simply use the handly code below to register your application as a service, thus rendering the program invisible to the user. Here's How: 1. Start up Visual Basic and add a form to the project. 2. Copy this code into the declarations section of the form: Private Declare Function GetCurrentProcessId _ Lib "kernel32" () As Long Private Declare Function GetCurrentProcess _ Lib "kernel32" () As Long Private Declare Function RegisterServiceProcess _ Lib "kernel32" (ByVal dwProcessID As Long, _ ByVal dwType As Long) As Long Private Const RSP_SIMPLE_SERVICE = 1 Private Const RSP_UNREGISTER_SERVICE = 0 3. Create a new procedure to the form, called "MakeMeService". (function MakeMeService()) 4. Add the following code to this procedure: Dim pid As Long Dim regserv As Long pid = GetCurrentProcessId() regserv = RegisterServiceProcess(pid, RSP_SIMPLE_SERVICE) 5. To remove your program from the Ctrl+Alt+Delete add this code to call the procedure: Call MakeMeService 6. Create a new procedure to the form, called "UnMakeMeService". (function UnMakeMeService()) 7. Add the following code to this procedure: Dim pid As Long Dim regserv As Long pid = GetCurrentProcessId() regserv = RegisterServiceProcess(pid, _ RSP_UNREGISTER_SERVICE) 8. To unregister your application as a service (and therefore how the program in the Ctrl+Alt+Delete task list) add this code to call the procedure: Call UnMakeMeService ( in Terminate or …) | |
| |< << 230 231 232 233 234 235 236 237 238 239 240 >> >| |
