Hej
Jeg er ved at forsøge mig med lidt makroprogrammering i StarBasic - mit problem er, at hver eneste gang, jeg forsøger at arbejde med objekter, så får jeg fejlmeddelelsen:
Basic runtime error.
Object variable not set
Og det er uanset, om det er noget kod,e jeg snupper fra sun for at teste det af - INTET af det virker!
Hvad gør jeg forkert?
Mvh
Jane
PS. Det er StarOffice7
Object variable not set
Moderators: Lodahl, LarsBrandi
-
- Posts: 95
- Joined: 22. Oct 2003 12:44
- Location: Vojens
- Contact:
Re:Object variable not set
Jeg ved ikke om dette vil hjælpe dig lidt på vej :
http://www.oooforum.org/forum/viewtopic.php?t=12255
http://www.oooforum.org/forum/viewtopic.php?t=12255
mvh
Lars Brandi Jensen
Lars Brandi Jensen
Re:Object variable not set
Den havde jeg set uden at blive specielt meget klogere.... Men tak for svaret alligevel!LarsBrandi wrote:Jeg ved ikke om dette vil hjælpe dig lidt på vej :
http://www.oooforum.org/forum/viewtopic.php?t=12255
Mvh
Jane - som jo også er total nybegynder på dette punkt, så hvis nogen kan anbefale noget, så sig endelig til!
Re:Object variable not set
Eksempelvis går denne her kopieret fra Basic Programmer's Guide på OpenOffice.org ikke:
sub main
Dim Doc As Object
Dim Enum As Object
Dim TextElement As Object
Doc = StarDesktop.CurrentComponent
Enum = Doc.Text.createEnumeration <---- Her giver den fejl!
While Enum.hasMoreElements
TextElement = Enum.nextElement
If TextElement.supportsService("com.sun.star.text.Paragraph") Then
TextElement.String = Replace(TextElement.String, "you", "U")
TextElement.String = Replace(TextElement.String, "too", "2")
TextElement.String = Replace(TextElement.String, "for", "4")
End If
Wend
end sub
Fejlen den kommer med er "Propert or method not found" - og den får jeg rimelig tit også
Får mig til at tænke på om jeg evt. mangler et eller andet standard library eller wtf?
Mvh
Jane
sub main
Dim Doc As Object
Dim Enum As Object
Dim TextElement As Object
Doc = StarDesktop.CurrentComponent
Enum = Doc.Text.createEnumeration <---- Her giver den fejl!
While Enum.hasMoreElements
TextElement = Enum.nextElement
If TextElement.supportsService("com.sun.star.text.Paragraph") Then
TextElement.String = Replace(TextElement.String, "you", "U")
TextElement.String = Replace(TextElement.String, "too", "2")
TextElement.String = Replace(TextElement.String, "for", "4")
End If
Wend
end sub
Fejlen den kommer med er "Propert or method not found" - og den får jeg rimelig tit også

Mvh
Jane
-
- Posts: 95
- Joined: 22. Oct 2003 12:44
- Location: Vojens
- Contact:
Re: Lidt mere info !
Jeg prøver både under winXP og linux og ja, jeg har java installeret...LarsBrandi wrote:Hvilket styresystem bruger du ? Har du java installeret ?
Mvh
Jane