Problemi sa Web Browserom

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

U jednom tutorijalu sto sam pronasao imala je lekcija vezana za internet i tu je bilo opisano kako se pravi web browser. Oni su postavili jedan text box i jedno komandno dugme i Web Browser... Ja reko onda da napravim nesto komplikovanije i dodao sam dugmad GoHome, GoBack, GoForward, Refresh i Stop, a za adress bar sam postavio combo box. I sad, kada korisnik unese neku adresu u combo box i pretisne Enter, ta adresa se smesa u listu i otvara se ta stranica... Evo nekih pitanja:
1. Hteo sam da napravim da se adrese pamte u nekom text dokumentu... Znaci kada se pretisne Enter trebala bi da se adresa koja je uneta upise u dokument, a da se adrese ucitaju i upisu u listu kada se pokrene program, tj. kada se ucita forma. I sad meni je bilo lako da napravim da se adrese citaju iz fajla i da se smestaju u listu, al' imam problem sa pisanjemu text fajl. Kada pretisnem Enter, sve sto je bilo zapisano u text fajlu se brise i zamenjuje se novom adresom, i tako samo jedna adresa ostane. Kako bi trebao da ide ispravan kod???
2. Kada forma treba da se ucita i da se procita text dokument, ukoliko ne postoji text fajl ili nista nije uneto u njega, onda mi izbacuje gresku. Kako da napravim da se greska prepozna i da ukoliko ne postoji fajl ili ukoliko nista nije zapisano unutra, jednostavno preskoci event ucitavanja forme, tj. da se izadje iz tog eventa da bi korisnik mogao da nastavi sa radom???
3. Kada korisnik pretisne GoBack ili GoForward a nista nije uneto, tj. ne postoji ni stranica nazad ni stranica napred, onda izbacuje gresku. Kako da napravim da se to prepozna i da se pojavi MsgBox i da se izadje iz eventa, upesto toga sto vb izbacuje gresku???

Radim u VB6...

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Imaš prostu verziju Web Browser-a u VB6... pogledaj u folder Forms.


1. Ima mnogo rešenja, ali da bi shvatio evo najprostiji primer...

Private Sub Command1_Click() Open "C:\Adrese.txt" For Append As #1 Print #1, Combo1.Text Close #1 End Sub

Ovaj primer kreira file Adrese.txt ako ne postoji i upisuje u njega tekst.

Ako Adrese.txt postoji neće ga owerwrite-ovati nego će dodavati tekst na već postojeći.

Prilikom svakog klika na dugme upisaće u novu liniju tekst koji je upisan u ComboBox-u.


2. Nisam baš najbolje razumeo, ali...

Postoji i tu više rešenja, na primer:

On Error Resume Next <--- prilikom greške prelazi na sledeću naredbu;


On Error GoTo Greška <-- prilikom greške prelazi na deo naredbi koji je naveden pod Greška:

3. Koliko sam ja shvatio ovde je moguće isto rešenje kao i pod 2.


Ako sam dobro razumeo probleme koje si naveo.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

1. Kad se koristi Output a kad Append i koje su razlike...? A ovo je dobro...
2. i 3. To je... Imala je lekcija rukovanje sa greskama, ali sada sam se setio kako bi ispravno trebao da postavim kod...

EDIT: Oke, shvatio sam za Append, sad je bio po redu tutorijal za rad sa fajlovima. Ja sam koristio Output pa sam imao problem...

Hvala...