🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: be.comp.programming
2 messages
2 total messages Started by Cliff Beeckman Mon, 22 Sep 2003 09:42
VB6: gevraagde bestanden worden niet gevonden
#4085
Author: Cliff Beeckman
Date: Mon, 22 Sep 2003 09:42
33 lines
2487 bytes
Beste,

Ik heb een programma waarbij er bepaalde bestanden moeten worden geladen.
Eerst plaats hij alle bestanden in een filelist met volgende eigenschappen:

File1.Path = App.Path
File1.Pattern = "oef*.zin"

Vervolgens wil ik de correcte locatie krijgen van het bestand(da map waarin
ook het programma zoch bevindt: app.path). Wanneer mijn op de lijst klikt,
gebeurt er het volgende:

Private Sub File1_Click()
Bestand$ = File1.FileName
Lbloef.Caption = Bestand$

End Sub

Vervolgens laadt hij dit bestand(Bestand$) in een volgende form. Met deze
code werkt het steeds op mijn eigen pc. De code werkt echter niet altijd op
andere pc's. Wanneer men het programma aanklikt vanuit de map zelf, geen
probleem, wanneer men het programma echter opent via het menu start of de
desktop vindt hij de bestanden niet. Ik heb dan maar het volgende toegevoegd
aan de bovenstaande code(Bestand1$ = App.Path + File1.FileName) en het
Bestand1$ laten laden in de volgende form. Op mijn pc werkt dit dan weer
niet, en heb het nog geprobeerd op andere pc's. Heeft iemand een idee hoe ik
steeds de correcte locatie kan krijgen zodat het programma steeds het
bestand kan laden. (wss zit er een 'domme' fout in mijn code ergens maar ik
geraak er niet goed uit).

Alvast bedankt,

Cliff Beeckman.
Re: gevraagde bestanden worden niet gevonden
#4086
Author: Cliff Beeckman
Date: Mon, 22 Sep 2003 11:21
44 lines
2727 bytes
Fout gevonden... + "\" vergeten... :$
"Cliff Beeckman" <cliffbeeckman@pandora.be> schreef in bericht
news:Buzbb.33493$gB7.1616985@phobos.telenet-ops.be...
> Beste,
>
> Ik heb een programma waarbij er bepaalde bestanden moeten worden geladen.
> Eerst plaats hij alle bestanden in een filelist met volgende
eigenschappen:
>
> File1.Path = App.Path
> File1.Pattern = "oef*.zin"
>
> Vervolgens wil ik de correcte locatie krijgen van het bestand(da map
waarin
> ook het programma zoch bevindt: app.path). Wanneer mijn op de lijst klikt,
> gebeurt er het volgende:
>
> Private Sub File1_Click()
> Bestand$ = File1.FileName
> Lbloef.Caption = Bestand$
>
> End Sub
>
> Vervolgens laadt hij dit bestand(Bestand$) in een volgende form. Met deze
> code werkt het steeds op mijn eigen pc. De code werkt echter niet altijd
op
> andere pc's. Wanneer men het programma aanklikt vanuit de map zelf, geen
> probleem, wanneer men het programma echter opent via het menu start of de
> desktop vindt hij de bestanden niet. Ik heb dan maar het volgende
toegevoegd
> aan de bovenstaande code(Bestand1$ = App.Path + File1.FileName) en het
> Bestand1$ laten laden in de volgende form. Op mijn pc werkt dit dan weer
> niet, en heb het nog geprobeerd op andere pc's. Heeft iemand een idee hoe
ik
> steeds de correcte locatie kan krijgen zodat het programma steeds het
> bestand kan laden. (wss zit er een 'domme' fout in mijn code ergens maar
ik
> geraak er niet goed uit).
>
> Alvast bedankt,
>
> Cliff Beeckman.
>
>
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads