need help!! program codes

[jov]

Hi! guys,

i would like to ask everyone if this procedure is correct. pls. coreect me if im wrong...i put a sound when this condition is validate.

IF m12
   SELECT * from online2 WHERE online2.served<>.T. INTO CURSOR sr
   SELECT sr
   mcounts=RECCOUNT()
   IF mcounts>0
      SET BELL TO "ringout.WAV"
      ?? CHR(7)
      SET BELL TO (ADDBS(GETENV('windir'))) +"MEDIA\DING.WAV"    [/COLOR]  thisform.command7.enabled=.T.
      *thisformset.mAIN23.command7.Visible=.T.
      WAIT WINDOW "You have "+TRANS(mcounts,'99')+" Job Order from Import Department" +  CHR(13)+;
      "to view transaction click on the button below" NOWAIT noclear
   ELSE
      thisform.command7.enabled=.F.   
      thisformset.mAIN.command7.Visible=.F.
      WAIT CLEAR
   ENDIF
ENDIF

thanks...

jov

[Lop]

what language is this?

[WingedPanther]

I can't say with certainty, but my guess is that your code is not correct.

1) There is SQL intermixed with another language without qualifiers of any sort to separate them.
2) It looks like you're using vbscript within a webform, or maybe visualbasic.