Foros del Web » Programación para mayores de 30 ;) » Programación General »

boton guardar en visual

Estas en el tema de boton guardar en visual en el foro de Programación General en Foros del Web. Hola! Quisiera saber si vusual basic permite crear un botón cuya función sea similar a un botón guardar de windows, es decir, si un usuario ...
  #1 (permalink)  
Antiguo 23/04/2003, 11:25
 
Fecha de Ingreso: enero-2003
Ubicación: A Coruña
Mensajes: 76
Antigüedad: 21 años, 10 meses
Puntos: 0
Busqueda boton guardar en visual

Hola!
Quisiera saber si vusual basic permite crear un botón cuya función sea similar a un botón guardar de windows, es decir, si un usuario quiere guardar 1dato de una base de datos en su equipo con un nombre concreto, como puedo hacerlo?
Muchas gracias por leer mi duda. Un saludo
  #2 (permalink)  
Antiguo 23/04/2003, 12:39
Avatar de Mickel  
Fecha de Ingreso: mayo-2002
Ubicación: Lima, Peru
Mensajes: 4.619
Antigüedad: 22 años, 6 meses
Puntos: 7
Explicate mejor, por favor. Quieres
a) grabar los datos del form en la pc del usuario
o
b) grabar los datos que el usuario suba desde su pc
?
__________________
No tengo firma ahora... :(
  #3 (permalink)  
Antiguo 26/04/2003, 11:59
 
Fecha de Ingreso: enero-2003
Ubicación: A Coruña
Mensajes: 76
Antigüedad: 21 años, 10 meses
Puntos: 0
Quiero grabar los datos de esa base de datos al pc del usuario
  #4 (permalink)  
Antiguo 26/04/2003, 12:33
 
Fecha de Ingreso: abril-2003
Mensajes: 6
Antigüedad: 21 años, 7 meses
Puntos: 0
Si lo que deseas es crear un boton para guardar lo que haya dentro de una form, textbox,Richbox o lo que sea
puedes utilizar esto
1.-vas aproject > components > y marcas Microsoft common dialog > ahora gregas el commondialog en la form
y le das
2 .- al boton que quieras ke al dar click haga la accion le das
' guarda el archivo con una extencion espexifica
Dim sFichero As String
With CommonDialog1
.DialogTitle = "Guardar Imagen"
.Filter = "Mapa de bits (*.BMP)|*.BMP"
.ShowSave
If Len(.FileName) = 0 Then
Exit Sub
End If
sFichero = .FileName
End With
' en este caso guarda una imagen que se encuentra lo calizada en la misma form puede ser cambiado a un archivo de texto
SavePicture Imagen.Picture, sFichero
End Sub

'case2
'es lo mismo ke el anterio solo que aqui se guarda lo que se encuentra en otra form y en un archivo de texto
Dim sFichero As String
With CommonDialog1
.DialogTitle = "Guardar Texto"
.Filter = "Archivo doc (*.Doc)|*.Doc"
.ShowSave
If Len(.FileName) = 0 Then
Exit Sub
End If
sFichero = .FileName
End With
' Guarda el contenido del Richtextbox que se encuentra en otra form distinta a donde se encunetra el boton de guardar
Frm1Principar.Richtextbox1.SaveFile sFichero

End sub



Espero y esto te sea de utilidad
  #5 (permalink)  
Antiguo 26/04/2003, 12:37
 
Fecha de Ingreso: enero-2003
Ubicación: A Coruña
Mensajes: 76
Antigüedad: 21 años, 10 meses
Puntos: 0
Lo probaré, espero que me sirva!
Muchas gracias por el tiempo dedicado
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 14:31.