Would you remind me what exactly are you trying to accomplish?

Charles Yeomans

On Jun 6, 2006, at 10:50 PM, RBNUBE wrote:

I've been looking into this, and I haven't seen anyone mention base 64
encoding.

I made a test project that seems to be working fine. This was created from
bits and pieces of info found on the internet.

PushButton1 creates a text file, writes a path to it.
PushButton2 opens the text file, reads the line and converts it to a
FolderItem.  Then it launches the FolderItem.

Any suggestions on how to improve this--such as avoiding encoding issues?

Thanks!


PushButton1 Action Event:
  dim f as folderItem
  dim data as string
  dim tout as textOutputStream

  f = desktopFolder
  data = f.getSaveInfo(NIL)

  f = NIL
  f = getFolderItem(data)

  f = desktopFolder.child("TESTFile.txt")
  tout = f.createTextFile()

  tout.writeLine data


PushButton2 Action Event:
  Dim f, f2 As FolderItem
  Dim textInput As TextInputStream
  Dim rowFromFile As String

  f=DesktopFolder.Child("TESTFile.txt")

  If f <> Nil Then
    textInput = f.OpenAsTextFile

    rowFromFile=textInput.ReadLine

    textInput.Close
  End If


  f2 = GetFolderItem(rowFromFile)
  f2.Launch

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

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

Reply via email to