| View previous topic :: View next topic |
| Author |
Message |
Leon Celliers Newbie
Joined: 10 Jul 2003 Posts: 1
|
Posted: Thu Jul 10, 2003 10:32 pm Post subject: Label not found error |
|
|
When running the code below, I get a "Label not Found" error at the 'goto @event ()' statement. This only occurs when selecting an alternate server from the combo list and then changing the radio button selection.
I require the dialog to present server list and a 'local/remote' option for selection. Having read the selected options (e.g. Server A, local), tasks will be executed against these selections.
Any help appreciated.
TITLE TSM MENU
DIALOG CREATE,TEST SCRIPT,-1,0,401,169
DIALOG ADD,BUTTON,OPT,24,224,72,24,Get Options File
DIALOG ADD,BUTTON,SCHED,56,224,88,24,Get LogFile
DIALOG ADD,COMBO,Combo,24,8,176,21,Select server from list,CLICK,EXIT
GOSUB LOADCOMBO
DIALOG ADD,RADIO,rg,64,8,96,64,File Location,Remote|Local,Remote,CLICK
DIALOG ADD,BUTTON,Exit,88,224,64,24,Exit
DIALOG SHOW
:EVLOOP
wait event
goto @event()
:LOADCOMBO
LIST loadtext,COMBO
"Server 1
"Server 2
"server 3
DIALOG set,COMBO,Server 1
EXIT
:comboCLICK
%S = @DLGTEXT(combo)
goto evloop
:rgCLICK
%%L = @dlgtext(rg)
goto evloop
:OPTBUTTON
info Code to extract options file
goto evloop
:SCHEDBUTTON
info Code to extract LogFile
goto evloop
:EXITBUTTON
goto CLOSE
:Close
exit |
|
| Back to top |
|
 |
SnarlingSheep Professional Member


Joined: 13 Mar 2001 Posts: 759 Location: Michigan
|
Posted: Thu Jul 10, 2003 10:53 pm Post subject: |
|
|
You have the combo set to use the Exit style, meaning when it loses focus it generates a ComboExit event.
I'm not sure you actually need this in your code, so you might want to just get rid of the exit style. If you do need it, just set up a :ComboExit label.
If you run into label not found problems you can set up your evloop so @event() is assigned to a variable, then you can use INFO to show the label it is about to go to.
Like:
| Code: |
:EVLOOP
wait event
%%Event = @event()
INFO %%Event
goto %%Event
|
_________________ -Sheep
My pockets hurt... |
|
| Back to top |
|
 |
harry Contributor


Joined: 01 May 2003 Posts: 61
|
Posted: Thu Jul 10, 2003 11:28 pm Post subject: |
|
|
hope this helps
harry
| Code: |
TITLE TSM MENU
DIALOG CREATE,TEST SCRIPT,-1,0,401,169,
DIALOG ADD,BUTTON,OPT,24,224,72,24,Get Options File
DIALOG ADD,BUTTON,SCHED,56,224,88,24,Get LogFile
DIALOG ADD,COMBO,Combo,24,8,176,21,Select server from list,CLICK,EXIT
rem this seems to be a odd spot to do this to me but hey i ask for help lots
rem GOSUB LOADCOMBO
DIALOG ADD,RADIO,rg,64,8,96,64,File Location,Remote|Local,Remote,CLICK
DIALOG ADD,BUTTON,Exit,88,224,64,24,Exit
rem add the list stuff before dialog show
list create,1
LIST loadtext,1
"Server 1
"Server 2
"server 3
rem put list into combo box
list assign,combo,1
DIALOG SHOW
:EVLOOP
wait event
goto @event()
rem :LOADCOMBO
rem DIALOG set,COMBO,Server 1
rem EXIT
:comboCLICK
%S = @DLGTEXT(combo)
goto evloop
:radiorgCLICK
%%L = @dlgtext(rg)
goto evloop
:OPTBUTTON
info Code to extract options file
goto evloop
:SCHEDBUTTON
info Code to extract LogFile
goto evloop
rem you must add missing event combo exit if this is a child window
rem this exit event is needed but not if its just a stand alone window
:comboexit
:exitbutton
:Close
exit
|
|
|
| Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum You can attach files in this forum You can download files in this forum
|
|