Voit pyytää apua ohjelmointiongelmiin täältä.
mokkeri
Member
Posts: 84 Joined: Sat Apr 05, 2008 9:22 pm
Post
by mokkeri » Thu Jan 01, 2009 7:21 pm
Ei avaa sivuja. Tiedoston sisältö on ihan joka rivillä osoite. Jokin kusee?
Code: Select all
Include "cbNetwork.cb"
SetWindow "SiteList"
FrameLimit 40
Repeat
Locate 10,10
list_file = HTTPGet("http://sivu.com/asd.txt")
If list_file <> 200 Then MakeError GetNetErrorString( list_file )
HTTPSaveContent("asd.txt")
file=OpenToRead("asd.txt")
While Not EOF(file)
address$ = ReadLine(file)
Execute address$
Wend
CloseFile file
DeleteFile "asd.txt"
AddText "Sites loaded, press ESCAPE to exit."
DrawScreen
Until EscapeKey()
asd
phons
Guru
Posts: 1056 Joined: Wed May 14, 2008 10:11 am
Post
by phons » Thu Jan 01, 2009 8:30 pm
Ootko varma tosta asd.txt:stä? Kun se tallentaa sen niin tiedätkö minne? Ja lukeeko se sen tallennus paikasta? Eikös se ollut niin että jos se ei löydä tiedostoa se luodaan.
Mokkeri (quest)
Post
by Mokkeri (quest) » Thu Jan 01, 2009 8:31 pm
phons wrote: Ootko varma tosta asd.txt:stä? Kun se tallentaa sen niin tiedätkö minne? Ja lukeeko se sen tallennus paikasta? Eikös se ollut niin että jos se ei löydä tiedostoa se luodaan.
Kyllä. Ja onnistuin tulostamaan rivit eli vika on luultavasti muuttujissa.
Koodiapina
Forum Veteran
Posts: 2396 Joined: Tue Aug 28, 2007 4:20 pm
Post
by Koodiapina » Thu Jan 01, 2009 9:16 pm
Kokeile toimisko tämä:
Code: Select all
Include "cbNetwork.cb"
SetWindow "SiteList"
FrameLimit 40
Repeat
Locate 10,10
list_file = HTTPGet("http://sivu.com/asd.txt")
If list_file <> 200 Then MakeError GetNetErrorString( list_file )
HTTPSaveContent("asd.txt")
file=OpenToRead("asd.txt")
While Not EOF(file)
address$ = ReadLine(file)
Execute address
Wend
CloseFile file
DeleteFile "asd.txt"
AddText "Sites loaded, press ESCAPE to exit."
DrawScreen
Until EscapeKey()
Mokkeri (guest)
Post
by Mokkeri (guest) » Thu Jan 01, 2009 10:08 pm
Ei
Jani
Devoted Member
Posts: 741 Joined: Fri Oct 31, 2008 4:53 pm
Post
by Jani » Thu Jan 01, 2009 11:18 pm
osoitteen perään pitää laittaa /. Esim. http://"www.sivu.org/"
valscion
Moderator
Posts: 1599 Joined: Thu Dec 06, 2007 7:46 pm
Location: Espoo
Contact:
Post
by valscion » Fri Jan 02, 2009 12:25 am
Ja tietysti
tätäkin saa käyttää
mokkeri
Member
Posts: 84 Joined: Sat Apr 05, 2008 9:22 pm
Post
by mokkeri » Fri Jan 02, 2009 7:40 pm
Jani wrote: osoitteen perään pitää laittaa /. Esim. http://"www.sivu.org/"
Voi saasta, enpä huomioinut tuota
Kiitos
asd
temu92
Web Developer
Posts: 1226 Joined: Mon Aug 27, 2007 9:56 pm
Location: Gamindustri
Contact:
Post
by temu92 » Fri Jan 02, 2009 8:37 pm
Jani wrote: osoitteen perään pitää laittaa /. Esim. http://"www.sivu.org/"
Väärin meni. Ei pidä laittaa. Ainakaan sillon jos on kyse tiedostostoista eikä kansioista.
mokkeri
Member
Posts: 84 Joined: Sat Apr 05, 2008 9:22 pm
Post
by mokkeri » Fri Jan 02, 2009 9:04 pm
temu92 wrote: Jani wrote: osoitteen perään pitää laittaa /. Esim. http://"www.sivu.org/"
Väärin meni. Ei pidä laittaa. Ainakaan sillon jos on kyse tiedostostoista eikä kansioista.
Nimenomaan pitää. Nimittäin selainta avattaessa
asd
temu92
Web Developer
Posts: 1226 Joined: Mon Aug 27, 2007 9:56 pm
Location: Gamindustri
Contact:
Post
by temu92 » Fri Jan 02, 2009 9:10 pm
Jos kyse on coolbasicista niin sillon tietty on eri asia.
mokkeri
Member
Posts: 84 Joined: Sat Apr 05, 2008 9:22 pm
Post
by mokkeri » Fri Jan 02, 2009 9:19 pm
temu92 wrote: Jos kyse on coolbasicista niin sillon tietty on eri asia.
Joo mut nettiin yhdistäetteässäseasdasdaswefas tarvi thtp://
asd