Bonjour,
Je désire que certains fichiers ne soient pas modifiables pendant que mon
appli est lancée et que les verrous soient retirés lorsque je quitte mon
appli
Je précise que les fichiers devront etre lus tout de meme.
Avez vous une idée pour réaliser cela ? je n'ai pas trouvé d'exemple d'api
en vb.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
houbahop2003
Je précise aussi que j'ai testé Open "c: 01.bmp" For Input Lock Write As #1 Cela marche bien, mais il n'est apparament pas possible d'ouvrir le fichier en binaire aprés
Open "c: 01.bmp" For Binary Access Read As #2
pourquoi?
"houbahop2003" a écrit dans le message de news: cfrbla$2hd$
Bonjour, Je désire que certains fichiers ne soient pas modifiables pendant que mon appli est lancée et que les verrous soient retirés lorsque je quitte mon appli Je précise que les fichiers devront etre lus tout de meme.
Avez vous une idée pour réaliser cela ? je n'ai pas trouvé d'exemple d'api en vb.
MErci,
Dominique.
Je précise aussi que j'ai testé
Open "c: 01.bmp" For Input Lock Write As #1
Cela marche bien, mais il n'est apparament pas possible d'ouvrir le fichier
en binaire aprés
Open "c: 01.bmp" For Binary Access Read As #2
pourquoi?
"houbahop2003" <houbahop2003@wanadoo.fr> a écrit dans le message de news:
cfrbla$2hd$1@news-reader4.wanadoo.fr...
Bonjour,
Je désire que certains fichiers ne soient pas modifiables pendant que mon
appli est lancée et que les verrous soient retirés lorsque je quitte mon
appli
Je précise que les fichiers devront etre lus tout de meme.
Avez vous une idée pour réaliser cela ? je n'ai pas trouvé d'exemple d'api
en vb.
Je précise aussi que j'ai testé Open "c: 01.bmp" For Input Lock Write As #1 Cela marche bien, mais il n'est apparament pas possible d'ouvrir le fichier en binaire aprés
Open "c: 01.bmp" For Binary Access Read As #2
pourquoi?
"houbahop2003" a écrit dans le message de news: cfrbla$2hd$
Bonjour, Je désire que certains fichiers ne soient pas modifiables pendant que mon appli est lancée et que les verrous soient retirés lorsque je quitte mon appli Je précise que les fichiers devront etre lus tout de meme.
Avez vous une idée pour réaliser cela ? je n'ai pas trouvé d'exemple d'api en vb.
MErci,
Dominique.
ng
Salut,
Tu peux essayer ceci par exemple :
Option Explicit
Private intFilePointer As Integer Private strFileContent As String
Private Sub Form_Load() intFilePointer = FreeFile Open "c:1.txt" For Binary Lock Read Write As #intFilePointer End Sub
Private Sub Command1_Click() strFileContent = String$(LOF(intFilePointer), vbNullChar) Get #intFilePointer, , strFileContent Debug.Print strFileContent End Sub
Private Sub Form_Unload(Cancel As Integer) Close #intFilePointer End Sub
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
houbahop2003 a écrit :
Bonjour, Je désire que certains fichiers ne soient pas modifiables pendant que mon appli est lancée et que les verrous soient retirés lorsque je quitte mon appli Je précise que les fichiers devront etre lus tout de meme.
Avez vous une idée pour réaliser cela ? je n'ai pas trouvé d'exemple d'api en vb.
MErci,
Dominique.
Salut,
Tu peux essayer ceci par exemple :
Option Explicit
Private intFilePointer As Integer
Private strFileContent As String
Private Sub Form_Load()
intFilePointer = FreeFile
Open "c:1.txt" For Binary Lock Read Write As #intFilePointer
End Sub
Private Sub Command1_Click()
strFileContent = String$(LOF(intFilePointer), vbNullChar)
Get #intFilePointer, , strFileContent
Debug.Print strFileContent
End Sub
Private Sub Form_Unload(Cancel As Integer)
Close #intFilePointer
End Sub
--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/
http://apisvb.europe.webmatrixhosting.net/
houbahop2003 <houbahop2003@wanadoo.fr> a écrit :
Bonjour,
Je désire que certains fichiers ne soient pas modifiables pendant que
mon appli est lancée et que les verrous soient retirés lorsque je
quitte mon appli
Je précise que les fichiers devront etre lus tout de meme.
Avez vous une idée pour réaliser cela ? je n'ai pas trouvé d'exemple
d'api en vb.
Private intFilePointer As Integer Private strFileContent As String
Private Sub Form_Load() intFilePointer = FreeFile Open "c:1.txt" For Binary Lock Read Write As #intFilePointer End Sub
Private Sub Command1_Click() strFileContent = String$(LOF(intFilePointer), vbNullChar) Get #intFilePointer, , strFileContent Debug.Print strFileContent End Sub
Private Sub Form_Unload(Cancel As Integer) Close #intFilePointer End Sub
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
houbahop2003 a écrit :
Bonjour, Je désire que certains fichiers ne soient pas modifiables pendant que mon appli est lancée et que les verrous soient retirés lorsque je quitte mon appli Je précise que les fichiers devront etre lus tout de meme.
Avez vous une idée pour réaliser cela ? je n'ai pas trouvé d'exemple d'api en vb.
MErci,
Dominique.
houbahop2003
merci, je vais tester ça !
"ng" a écrit dans le message de news: ey7Ffr#
Salut,
Tu peux essayer ceci par exemple :
Option Explicit
Private intFilePointer As Integer Private strFileContent As String
Private Sub Form_Load() intFilePointer = FreeFile Open "c:1.txt" For Binary Lock Read Write As #intFilePointer End Sub
Private Sub Command1_Click() strFileContent = String$(LOF(intFilePointer), vbNullChar) Get #intFilePointer, , strFileContent Debug.Print strFileContent End Sub
Private Sub Form_Unload(Cancel As Integer) Close #intFilePointer End Sub
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
houbahop2003 a écrit :
> Bonjour, > Je désire que certains fichiers ne soient pas modifiables pendant que > mon appli est lancée et que les verrous soient retirés lorsque je > quitte mon appli > Je précise que les fichiers devront etre lus tout de meme. > > Avez vous une idée pour réaliser cela ? je n'ai pas trouvé d'exemple > d'api en vb. > > MErci, > > Dominique.
merci, je vais tester ça !
"ng" <ng@ngsoft-fr.com> a écrit dans le message de news:
ey7Ffr#gEHA.2416@TK2MSFTNGP10.phx.gbl...
Salut,
Tu peux essayer ceci par exemple :
Option Explicit
Private intFilePointer As Integer
Private strFileContent As String
Private Sub Form_Load()
intFilePointer = FreeFile
Open "c:1.txt" For Binary Lock Read Write As #intFilePointer
End Sub
Private Sub Command1_Click()
strFileContent = String$(LOF(intFilePointer), vbNullChar)
Get #intFilePointer, , strFileContent
Debug.Print strFileContent
End Sub
Private Sub Form_Unload(Cancel As Integer)
Close #intFilePointer
End Sub
--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/
http://apisvb.europe.webmatrixhosting.net/
houbahop2003 <houbahop2003@wanadoo.fr> a écrit :
> Bonjour,
> Je désire que certains fichiers ne soient pas modifiables pendant que
> mon appli est lancée et que les verrous soient retirés lorsque je
> quitte mon appli
> Je précise que les fichiers devront etre lus tout de meme.
>
> Avez vous une idée pour réaliser cela ? je n'ai pas trouvé d'exemple
> d'api en vb.
>
> MErci,
>
> Dominique.
Private intFilePointer As Integer Private strFileContent As String
Private Sub Form_Load() intFilePointer = FreeFile Open "c:1.txt" For Binary Lock Read Write As #intFilePointer End Sub
Private Sub Command1_Click() strFileContent = String$(LOF(intFilePointer), vbNullChar) Get #intFilePointer, , strFileContent Debug.Print strFileContent End Sub
Private Sub Form_Unload(Cancel As Integer) Close #intFilePointer End Sub
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/ http://apisvb.europe.webmatrixhosting.net/
houbahop2003 a écrit :
> Bonjour, > Je désire que certains fichiers ne soient pas modifiables pendant que > mon appli est lancée et que les verrous soient retirés lorsque je > quitte mon appli > Je précise que les fichiers devront etre lus tout de meme. > > Avez vous une idée pour réaliser cela ? je n'ai pas trouvé d'exemple > d'api en vb. > > MErci, > > Dominique.