Menú

Mostrar Mensajes

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

Mostrar Mensajes Menú

Mensajes - W0lFy

#71
Las modificaciones hasla sobre las tablas, no las vistas. Te recuerdo que las vistas son consultas realizadas a una o más tablas de una base de datos, incluso puede incluir vistas en dicha consulta. Por tal motivo no pueden ser editada su contenido. Sin embargo las tablas obviamente si permite la modificación de sus registros.
Citar
Las modificaciones hasla sobre las tablas
Intento sabes como poder crear una tabla dentro de names.nsf porque hasta ahora solo tenia vistas pero nos e como crear en lotus una tabla dentro del archivo .nsf.

creo que queda bastante claro que una vista  es una consulta a la tabla, no editable, pero mi pregunta es como puedo crear en LOTUS una tabla para luego poder realizar en enlace ODBC y asi poder realizar cambios en la tabla? En MySQL lo veo mucho mas facil, pero no se porque en LOTUS es distinto..
#72
y como hago para consegui entrar en la BBDD de names.nsf para podificar los campos?
existe alguna consulta  que me permita modificar la base si acceder por la vista?

Código (vb) [Seleccionar]
rs2.Open "SELECT * from ?", CON2, adOpenDynamic, adLockOptimistic
#73
Buenas Gente, os comento mi problema:

Necesito conectarme a una base de datos Lotus, he estado buscando por google y encontre la manera de hacerlo mediante ODBC:

Código (vb) [Seleccionar]
Dim connstr As String
Dim rt As ADODB.Recordset

Set rt = New ADODB.Recordset
Set CON2 = New ADODB.Connection
connstr = "Driver={Lotus NotesSQL driver (*.nsf)};"
connstr = connstr & "Database=names.nsf;Server=server;"
connstr = connstr & "Uid=user;" & "Pwd=pass"

If CON2.State = 0 Then
    CON2.ConnectionString = connstr
    CON2.Open
End If

rs2.Open "SELECT * from ListadoUsuarios", CON2, adOpenDynamic, adLockOptimistic

MsgBox rs2.State
variable1 = rs2.Fields("Firstname") & "YOYO"
rs2.Fields("Firstname") = variable1
rs2.Update
rs2.Close


primero me saca por pantalla un mensaje diciendome el primero usuario y despues
el mensaje de Error que me saca cuando intenta modificarlo es el siguiente:


La operación de múltiples pasos de OLE DB generó errores. Compruebe los valores de estado de OLE DB si es posible. No se realizó ningun trabajo.

en el LOTUS la bbdd names.nsf tengo una vista que se llama ListadoUsuarios y es donde estoy apuntando con VB las conexiones se realizan bien y me deja consultar la información pero no modificarla. ¿Que puede estar ocurriendo? un saludo y gracias!





#74
muy bueno probare... ya posteare con lo ocurrido.. Mil Gracias!
#75
Bueno pos esa es mi duda . Un saludo!
#76
Hola ahora como hago para descargar los controles? por que no funciona un simple Unload de Texto1 o unload Texto1(2) que peude estar pasando? VB me salta un error diciendo que se requiere un objeto. Un saludo
#77
Programación Visual Basic / Re: Duda - Strings
23 Septiembre 2009, 01:11 AM
Te voy a dar una para cualquier caracter de puntuación generalizado
No te lo doy hecho porque ahora no tengo tiempo pero es muy facil:

primero nos creamos una funcion que nos diga si 1 caracter es Signo de puntuacion

Código (cpp) [Seleccionar]
Private Sub EsPuntuacion(ByVal letra as char,Byref bandera as boolean)
  select case letra
  case '`'
     bandera=true
  case '´'
     bandera=true
  case 'á'
     bandera=true
  case else
     bandera=false
  end select
end sub

'Despues haremos un bucle
Código (cpp) [Seleccionar]
Dim cadena as string
Dim tamanoCad as integer
Dim CadenaSalida as string
Dim bandera as boolean
CadenaSalida=""
cadena ="Hola Pepe"
tamanoCad=Len(cadena)

For i=1 To tamanoCad step 1
  EsPuntuacion(mid(cadena,i,1),bandera)
  if bandera then
     CadenaSalida=CadenaSalida & mid(cadena,i,1) & " "
  else
     CadenaSalida & mid(cadena,i,1)
  end if

next

MsgBox CadenaSalida



pd. La primera funcion no esta bien porque tengo un poco de ambigüedad con VB y los caracteres, pero puedes controlarlo tambien por el numero que representa en la tabla ascii. Un saludo espero que te sirva
#78
Gracias probare!!
#79
Me explico mejor:

ACCESS 2003:
Creamos un formulario y en la propiedad del formulario "vista predeterminada"(en ingles "default view"), podemos seleccionar: "Un unico Formulario","Formularios Continuos","Hoja de Datos","Tabla Dinamica","Gráfico Dinamico".


Me gustaría poder realizar lo mismo que hace Access cuando elegimos la opción
"Formularios Continuos" pero quisiera hacerlo en Visual Basic 6.0, con su respectiva conexion de datos. Como podría hacerlo? hasta ahora digamos que tengo lo siguiente:

Dim conexion As New ADODB.Connection
Dim Recordset As New ADODB.Recordset
Dim path As String

Private Sub Form_Load()
path = "z:\yo.mdb"

With conexion
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & path
.Open
End With
Recordset.Open "SELECT * FROM CartasPago", conexion, adOpenKeyset, adLockOptimistic

Text1.Text = Recordset("Campo1")
Text2.Text = Recordset("Campo2")
Text3.Text = Recordset("Campo3")
end Sub


Me Gustaría que sacara Tantos Text1, Text2,Text3 Como registros haya que es la finalidad de "Formularios Conitnuos" . Un saludo espero haberme explicado mejor :)
#80
Programación Visual Basic / Formularios Continuos VB
21 Septiembre 2009, 16:00 PM
Hola gente tengo un problema , hay una propiedad del formulario en VB ACCESS la cual es la vista del formulario,quiero sacar todos los formularios,( FORMULARIOS CONTINUOS);¿ existe alguna manera  para emularlo en Visual Basic 6? es que no he encontrado la manera de hacerlo. Un saludo