My Web Browser Project (got a few problems)

[Brian Heibert <bheibert at verizon dot net>]

Hi,
  Dim f as folderitem
  //browser.webkit1.LoadURL defaulthome.text
  dim o as textoutputstream
  dim ii as textinputstream
  f = PreferencesFolder.child("InternetPal Preferences")
  ii = f.OpenAsTextFile
>>ii.readline
  ii.close

What do I put after ii.readline?
Maybe it's note even supposed to be readline but read


  
  Dim f as folderitem
  //browser.webkit1.LoadURL defaulthome.text
  dim o as textoutputstream
  browser.webkit1.LoadURL prefs.defaulthome.text
  
  f = PreferencesFolder.child("InternetPal Preferences")
  o = f.createtextfile ()
  if checkbox1.value=true then
    o.writeline "JavaEnabled=true"
    browser.webkit1.javaenabled=true
  else
    checkbox1.value=false
    o.writeline "JavaEnabled=false"
    browser.webkit1.javaenabled=false
  end if
  if checkbox2.value=true then
    o = f.createtextfile ()
    o.writeline "JavaScriptEnabled=true"
    browser.webkit1.javascriptenabled=true
  else
    o.writeline "JavaScriptEnabled=false"
    browser.webkit1.javascriptenabled=false
  end if
  if checkbox3.value=true then
    o = f.createtextfile ()
    o.writeline "PlugInsEnabled=true"
    browser.webkit1.pluginsenabled=true
  else
    o.writeline "PlugInsEnabled=false"
    browser.webkit1.pluginsEnabled=false
  end if
  if checkbox4.value=true then
    o = f.createtextfile ()
    o.writeline "JavaScriptWindowEnabled=true"
    browser.webkit1.javascriptCanOpenWindow=true
  else
    browser.webkit1.javascriptcanopenwindow=false
    o.writeline "JavaScriptWindowEnabled=false"
  end if
  if checkbox5.value=true then
    o = f.createtextfile ()
    browser.webkit1.loadsImages=true
    o.writeline "LoadsImages=true"
  else
    browser.webkit1.loadsimages=false
    o.writeline "LoadsImages=false"
  end if
  if checkbox6.value=true then
    o = f.createtextfile ()
    browser.webkit1.frame=true
    o.writeline "UsesFrames=true"
  else
    browser.webkit1.frame=false
    o.writeline "Usesframes=false"
  end if
  o.close
  prefs.close
  
Also somehow I got to...

  Dim f as folderitem
  //browser.webkit1.LoadURL defaulthome.text
  dim o as textoutputstream
  browser.webkit1.LoadURL prefs.defaulthome.text

Save the default homepage that the user wants to use and load it when my
program begins and goes to that site when my web browser window appears

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives of this list here:
<http://www.realsoftware.com/listarchives/lists.html>