Problem z otwieraniem pliku

Article View: pl.comp.lang.vbasic

Article #92375

Back to pl.comp.lang.vbasic Previous Next

#92375

From: stayheavy
Date: Mon, 24 Oct 2005 19:49

29 lines
1753 bytes

Witam,

Mam male pytanie dotyczace otwierania plikow w VB. Zaznaczam ze wlasciwie 
dopiero zaczynam sie uczyc tego jezyka i prawdopodobnie odpowiedz na moje 
pytanie bedzie prosta. Wiec tak...chce otworzyc dowolny plik za pomoca 
kontrolki CommonDialog i przekazac zawartosc pliku do Listboxa, tak aby ta 
sie tam wyswietlila. Wszystko jest pieknie do czasu az w momencie wybierania 
pliku, zamiast otworz, daje anuluj. Pojawia sie komunikat Path/File access 
error. Poleglem. Ponizej znajduje sie kod ktorego uzylem, podpiety pod 
przycisk:

Private Sub Command3_Click()
    List1.Clear
    CommonDialog1.ShowOpen
    Plik = CommonDialog1.FileName
    Open Plik For Input As #1
    Do
        Input #1, dane
        List1.AddItem (dane)
    Loop Until EOF(1)
    Close #1

 End Sub

Bede dzwieczny za pomoc.

Pozdrawiam,

stayheavy

Technical Details

Message-ID: <djjdt9$jog$1@nemesis.news.tpi.pl>

Path:

mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!newsfeed.gazeta.pl!newsfeed.tpinternet.pl!atlantis.news.tpi.pl!news.tpi.pl!not-for-mail
From: "stayheavy" <stayheavy@interia.pl>
Newsgroups: pl.comp.lang.vbasic
Subject: Problem z otwieraniem pliku
Date: Mon, 24 Oct 2005 21:49:20 +0200
Organization: tp.internet - http://www.tpi.pl/
Lines: 31
Message-ID: <djjdt9$jog$1@nemesis.news.tpi.pl>
NNTP-Posting-Host: apn29.neoplus.adsl.tpnet.pl
X-Trace: nemesis.news.tpi.pl 1130183401 20240 83.26.147.29 (24 Oct 2005 19:50:01 GMT)
X-Complaints-To: usenet@tpi.pl
NNTP-Posting-Date: Mon, 24 Oct 2005 19:50:01 +0000 (UTC)
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.2180
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2180
X-RFC2646: Format=Flowed; Original
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit