Novo

Forum kao aplikacija na telefonu

Dodajte forum na početni ekran i koristite ga kao aplikaciju, sa menijem na dnu ekrana.

CommandButton x 2 pa FileListBox pa TextBox Pomoc

  • 10 odgovora
  • 3.707 pregleda

Najnovija ↓

CommandButton x 2 pa FileListBox pa TextBox Pomoc 02.06.2009. u 09:10 · pre 212 meseci #1
Ako na jednoj formi imam
CommandButton dva komada + FileListBox + TextBox
a hocu da prilikom klika na CommandButton1 (C:\folder\1\) ili na CommandButton2 (C:\folder\2\) da mi on otvori u FileListBox-u taj folder i sve txt (tu ce da stoje samo txt fajlovi) i kada izaberem jedan od tih txt filova da ga on otvori u TextBox !???



Potpis
Ono sto ne moze niko Mogu i ja
Re: CommandButton x 2 pa FileListBox pa TextBox Pomoc 02.06.2009. u 09:42 · pre 212 meseci #2
U event Command1_Click() stavi:

Code:
 File1.path = "C:\folder\1"
File1.refresh


U event Command2_Click() stavi:

Code:
 File2.path = "C:\folder\2"
File2.refresh


U event File1_Click() :
Code:
Dim tekst1 As String
Open File1.Path & "\" & File1.FileName For Input As #1
Input #1, tekst1
Text1.Text = tekst1
Close #1



U event File2_Click() :
Code:
Dim tekst2 As String
Open File2.Path & "\" & File2.FileName For Input As #1
Input #1, tekst2
Text2.Text = tekst2
Close #1

Re: CommandButton x 2 pa FileListBox pa TextBox Pomoc 02.06.2009. u 10:01 · pre 212 meseci #3
ovo je OK ali kada izaberem iz FileListBox-a jedan txt file on mi otvori samo jedan red texta i izbaci
Run-time error '424':
Object required

?



Bio mi je Multiline iskljucen ali i kada sam stavio na True opet isto!
Potpis
Ono sto ne moze niko Mogu i ja
Re: CommandButton x 2 pa FileListBox pa TextBox Pomoc 02.06.2009. u 14:54 · pre 212 meseci
izmenjeno 1 put, poslednji put aikidomaster 02.06.2009. u 15:07
  1. aikidomaster02.06.2009. u 15:07zapis iz teksta poruke
#5
Evo ga !


Mada sada kada sam izbrisao :
U event File2_Click() :
Code:
Dim tekst2 As String
Open File2.Path & "\" & File2.FileName For Input As #1
Input #1, tekst2
Text2.Text = tekst2
Close #1"


radio delimicno OK jer kada kliknem na txt file dobijem samo prvi red a meni je potrebno da izgleda ovako :


Naziv Artikla =
Proizvodjacki Barkod =
Proizvodjacki Barkod II =
Proizvodjacki Barkod III =
Komerijalni Barkod =
Transportni Barkod =
Mera =
Marke =
Artikal Na Merenje =
Poreska Stopa =
========= Cene ========
Fabricka Cena =
Rabat = %
Preporucena Maloprodajna cena =
========= Marza ========
Marza za VeleProdaju = %
Marza za Maloprodaju = %
Marza za SuperMarket = %
========= Pakovanje ========
Proizvodjacko Pakovanje =
Komercijalno Pakovanje =
Transportno Pakovanje =
Zavrsno Pakovanje =
========= Ostalo ========
Proizvodjac =
Dobavljac =
Grupa Artikala =
Isporuka =
Naznaciti da li je za :
Napomena :
Potpis
Ono sto ne moze niko Mogu i ja
Re: CommandButton x 2 pa FileListBox pa TextBox Pomoc 03.06.2009. u 07:26 · pre 212 meseci
izmenjeno 1 put, poslednji put aikidomaster 03.06.2009. u 07:49
  1. aikidomaster03.06.2009. u 07:49zapis iz teksta poruke
#7
Poslednji put obecavam !!!
E sada je to to ali me muci sledece :(
Ako izaberem jedan txt file pa probam drugi, ne moze !!!

i imam takodje jos nesto da pitam:
kako da na onaj commandbutton6 stavim komandu da kada kliknem na njega da on taj txt file (iz FileListBox) sto je selektovan da ga skloni na neko drugo mesto tipa (c:\copy) i da uradi refresh filelistbox (kako taj file sto je sklonjen ne bi bio vidljiv na listi)???
Potpis
Ono sto ne moze niko Mogu i ja
Re: CommandButton x 2 pa FileListBox pa TextBox Pomoc 04.06.2009. u 11:33 · pre 211 meseci #9
SVE JE OK
ali...
da li moze da se zameni komanda :
FileCopy File1.Path & "\" & File1.FileNa...

sa
recimo
FileMove File1.Path & "\" & File1.FileNa...
Potpis
Ono sto ne moze niko Mogu i ja
Prijavite se da biste odgovorili u ovoj temi.PrijavaRegistracija

Premeštanje teme