enregistrer et enregistrer sous en VB6

Question

Bonjoir a tous !

Voil&#224; mon premier post et se sera un vrai post de d&#233;butant en VB6 (et oui faut bien commencer).

Je voudrais en faite savoir quel code il faudrait &#233;crire pour que mon
programme ait une fonction enregistrer et enregistrer sous, &#224; savoir
que l'enregistrement se fera sur une base de donn&#233;e en .mdb ou dans un
fichier XML, je ne sait pas trop encore.

Je voudrais savoir si  lorsque je clique sur enregistrer sous il
faut cr&#233;er une interface graphique pour la recherche du fichier dans
l'ordinateur 

et si il faut bien utiliser la methode "update"



Bon j'esp&#232;re que je me suis exprim&#233; d'une fa&#231;on assez claire

j'attent vos r&#233;ponses et vous remercie d'avance

@+

nah666 · Answer

Essaie ca :



Tu cr&#233;e sur une form un controle "common dialog" que tu appele dlg

puis pour ouvrir la fenetre de selection de fichier:

dlg.ShowOpen

ou

dlg.ShowSave



D&#233;pend des besoins, je n'ai pas bien cern&#233; ton probleme :p

valtrase · Answer

Salut,
Pour toi dans un premier temps il faut utiliser l'&#233;diteur de menu sous VB6
quand tu es en mode dising de ta feuille.

Un clic sur ton menu te ram&#232;ne sur ce type de sub ormi les select case bien sur

Ici le nenu Fichier comprend les sous menus Nouveau,Ouvrir,Enregistrer, Enregistrer Sous,
imprime, Aper&#231;u, Propri&#233;t&#233;, Quitter.

Private Sub mnuFile_Click(Index As Integer)
   Select Case Index
   Case 0
Msgbox"Nouveau Todo", vbInformation
   Case 2
      MsgBox "Open: Todo", vbInformation
   Case 3
      MsgBox "Save: Todo", vbInformation
   Case 4
      MsgBox "SaveAs: Todo", vbInformation
   Case 6
      MsgBox "Print: Todo", vbInformation
   Case 7
      MsgBox "PrintPreview: Todo", vbInformation
   Case 9
      MsgBox "Properties: Todo", vbInformation
   Case 17
      Unload Me
   End Select
End Sub
Ensuite en ce qui concerne le code pour ta sauvegarde c'est autre chose
   - Si ton fichier existe un simple copy avec un autre nom feras l'affaire
   - Si ton fichier n'&#233;xiste pas tu devra le cr&#233;er par prog

Cordialement, Jean-Paul  
______________________________________________________________________

Le Savoir n'a de valeur que s'il est partag&#233;

BlackDiff · Answer

ok merci bien je vais essayer de mettre tout &#231;a en application



@+

Enregistrer et enregistrer sous en VB6

3 réponses

Discussions similaires