VBScript | Bug Reporting | Forums

Avatar

Please consider registering
guest

sp_LogInOut Log In sp_Registration Register

Register | Lost password?
Advanced Search

— Forum Scope —




— Match —





— Forum Options —





Minimum search word length is 3 characters - maximum search word length is 84 characters

sp_Feed Topic RSS sp_TopicIcon
VBScript
October 13, 2011
9:02 pm
Avatar
tombell@stratamodel.com
New Member
Members
Forum Posts: 2
Member Since:
October 13, 2011
sp_UserOfflineSmall Offline

I just received an eXplorist Pro 10 and installed ArcPad. Right out of the box, I get a VBScript runtime error 800A0046 "permission denied: 'MsgBox'...

My scripts run just fine on my PC, my Trimble Nomad, and my Trimble Recons. When I run ArcPad studio, the scripts compile without errors. Finally, they conform exactly to the Microsoft knowledge base syntax.

Has anyone out there had this experience? If so, I would appreciate advice regarding a fix.

Here is some example code:


'#### Confirm user wants to cancel form input
Sub Confirm_x
dim intResponse
intResponse = MsgBox("Are you sure you want to quite the form without saving?", 3, "CANCEL THIS OPERATION?")
If intResponse = 6 Then
ThisEvent.Result = True
Application.Quit
Else
ThisEvent.Result = False
End If
End Sub

This equally valid code also fails:


'#### Confirm user wants to cancel form input
Sub Confirm_x
Dim intResponce
intResponse = MsgBox("Are you sure you want to quite the form without saving?", vbYesNo, "CANCEL THIS OPERATION?")
If intResponse = vbYes Then
ThisEvent.Result = True
Application.Quit
Else
ThisEvent.Result = False
End If
End Sub

This is also valid VBS code that spawns the same error:

Sub TD
If MsgBox("Did you save your last interval?", vbYesNo, "END OF HOLE, FINISHED LOGGING") = vbNo Then
Exit Sub
Else
Application.UserProperties("At_TD")= 1
call ValidateVis
call ValidateMW
call SetGPSDateTime
call UpdateLayer
call CopyDatabase
call ClearRecords
End If
End Sub
Forum Timezone: America/New_York

Most Users Ever Online: 99

Currently Online:
1 Guest(s)

Currently Browsing this Page:
1 Guest(s)

Top Posters:

phild31: 1564

David: 677

denisetdoris: 422

S!G: 284

pprass: 280

ShortcutHicksy: 258

jmebd: 193

Sockeye: 173

Caotix: 142

Paganel: 120

Member Stats:

Guest Posters: 5

Members: 1355

Moderators: 0

Admins: 2

Forum Stats:

Groups: 15

Forums: 45

Topics: 999

Posts: 7603

Newest Members:

YmpoRefT, Davidutere, Merrilldak, maskisa, AbanaTut, Nicanor89Mef, NancyGuine, JoeyGluse, Robertsop, Gregoryedura

Administrators: JungleGhost: 286, Mike: 25


Comments

VBScript | Bug Reporting | Forums — 1 Comment

    • PLEASE FORGIVE OUR AUTOMATED RESPONSE

    Concerning your inquiry on this website. Unfortunately, we do not respond to service questions posted in the comment section of this website. If you wish to have a member of our forum assist you with a solution then post a MESSAGE on this website. May we suggest, that you JOIN the Forum. MEMBERSHIP is FREE. Do a search for your problem. If you do not find the answer then please post your question under the appropriate section. Do not use the comments section or your inquiry will not be answered. Joining is free and in this manner, both we and our membership can provide solutions. This method will also help other members. Regards, JG

Add Comment Register



Leave a Reply