• Sábado 4 de Mayo de 2024, 09:44

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Temas - jeobel

Páginas: [1]
1
SQL Server / Importar Consultas Acces Como Vistas En Sql 2000,
« en: Miércoles 28 de Noviembre de 2007, 17:48 »
he importado una tabla de Acces desde sql 2000, pero quiero que me importe las consultas como vistas, el asistente me pide si quiero pasar las consultas como vistas lo seleccion pero me las manda como tabla, tendre que crear todas la vistas manual mente

2
SQL Server / Sql, Importe Y Quiero Cambiar Los Tipos De Datos
« en: Martes 20 de Noviembre de 2007, 17:45 »
Quiero cambiar el tipo de datos por q al importarla me la
envio con nvarchar y lo quiero Varchar smalldatetime por
datetime pero ya lohabia encontrado pero no hayo donde
hacer los cambios , creo que era en herramientas
ayudemen

3
Visual Basic 6.0 e inferiores / Conneccion De B6.0 Con Sql
« en: Miércoles 14 de Noviembre de 2007, 18:01 »
a denegado el acceso al mismo

Public Sub Main()

If App.PrevInstance = False Then
Set Coneccion = New ADODB.Connection
With Coneccion
.Provider = "SQLOLEDB.1" 'Proveedor
.ConnectionString = "User ID=sa;Initial Catalog=dbLabNHME;Data Source=LocalServer" 'origen de datos
.Open
End With
Login.Show vbModal

ElseIf App.PrevInstance = True Then
MsgBox "El programa ya esta en ejecución", vbInformation
end if

el mensaje emergen te Es:
ConectionOpen....No Existe el Servidor Sql Server o se ha denegado el acceso al Servidor

Creé una coneccion SQL desde el odbc
me dijeron que le hacia falta ingrezar el dominio y esto me recomendaron
como lo adaptaria lo sig al codigo que uso

"Esta es la cadena
server=DAITWS02;database=dbSAHME;Trusted_Connection=False;User ID=;Password=[PW];
= usuario
[PW] = contraseña
Utilice esta opción en maquinas dentro de dominio si no se logra conectar,
Sobre todo si la instalación se hizo con un usuario del dominio.
Trusted_Connection=False "

help me

4
Visual Basic 6.0 e inferiores / Al Cerrar El Mdi, Que Queden Cerrados Todos
« en: Viernes 26 de Octubre de 2007, 22:01 »
Quiero por ejemplo que al cerrar el MDI en el evento unload me cierre
todos los child que eventulmente podrian no haberse cerrado de forma
incorrecta por un estilo  modeless o alguno que se dejo sin cerrar y
que deja en el administrador de tarea de window abierto el ejecutable aunque
se cierre aparentemente, ESTA ES MI IDEA
 
    Dim frm as form
    for each frm in MDI
    If TypeOf  frm is MDI then
         unload frm
    End if
   NEXT
 el error q me manda es "que se requiere un objeto"  que es frm
 ****
 Parecido a este
 ****
Sub Limpiar(ByVal frm As Form)
     For Each c In frm
     If TypeOf c Is TextBox Or TypeOf c Is ComboBox Then
           c.Text = ""
    End If
    If TypeOf c Is OptionButton Or TypeOf c Is CheckBox Then
           c.Value = False
        End If
    Next
End Sub

es q utilizo esto en el evento MDI UNLOAD

 Unload Me
 Unload BuscarExamen
 Unload BuscarMedicos
 Unload formResultadosBaar
 Unload formResultadosCultivoyAntibi
 Unload ListaExamenes
 Unload ListaPatologia
 Unload MedicosActivos
 Unload Login
 Unload MedicosActivos
 etc, etc que resulve pero no es lo optimo
 denme otra idea

5
VBA / Mensaje:"el Programa Ya Esta En Ejecucion"
« en: Miércoles 3 de Octubre de 2007, 22:51 »
El ejecutable me manda este mensaje, despues de haber cerrado el programa y volverlo a abrir
:"El programa ya esta en ejecucion", utilice el sig codigo en el submain
 Public Sub Main()
   On Error GoTo VALIDACION
   If App.PrevInstance = False Then
     ******
     ****** etc
   ElseIf App.PrevInstance = True Then
   MsgBox "El programa ya esta en Ejecución", vbInformation
     Else
    ***** etc end if
 he notado que sucede despues de abrir un Datagrid, y aunque lo cierre me parece  que no cierra el recorrdset por tanto  mantine abierto el programa
por que lo veo en el administrasdor de  tarea de windows
 cierro el data grid asi:
    Private Sub Form_Unload(Cancel As Integer)
        ' rsRecorset.Close
        Set rsRecorset = Nothing
       'Unload Me
    End Sub
 que me recomiendan que haga
 escrivanme a jeobeljavier@gmail.com por favor que ya le he dado muchas
vuelta al asunto

Páginas: [1]