Type Mismatch Error

Legacy Poster

• 2014年05月13日 08:38

I have a function named ConvertModName. This is in the Label Format Options -> VB Scripting -> Functions and Subs

 

Public Function ConvertModName(PreConvName)

 

    Select Case PreConvName

        Case "B"     ConvertModName = CStr("AI2-TC")

        Case "C"     ConvertModName = CStr("AI2-DC") 

        Case Else    ConvertModName = CStr(PreConvName)

    End Select

 

    Exit Function 

End Function

 

Then in the OnAutoSelectedEvent script for a text object I have code:

 

ReferenceField("BARTEND.008") 

Value =  ConvertModName(Field("BARTEND.008"))

 

When the script tries to process I get a type mismatch error. 

 

However, if I was to move the function to Function and Subs event under the text object it works. 

 

Any clues.

 

I thought by putting my function in Label Format -> VB Scripting I would make it global but perhaps that is not the way.

 

Thanks for any help.

 

Will

0

• 

  Legacy Poster

  ★ BarTender Hero ★

  • 2014年05月16日 10:06

  So, is this possible?

  0
• 

  Fernando Ramos Miracle

  ★ BarTender Hero ★

  • 2014年05月22日 10:08

  Hello Williamc,

   

  The "Functions and Subs" section of the document level VB script (from the "File>BarTender Document Options...") only affects that precise VB Script, it won't be accessible from a data source type VB script or an "OnProcessData" VB script. Note that there are many functions that are only available at the document level (basically anything that modifies an object's properties) and accessing them from other level VB Scripts could potentially cause problems.

   

  Also note that if you are referencing a database field on your code, you'll need to add your code in the "OnNewRecord" event. Using the "OnAutoSelectedEvent" will only allow you to preview the result on screen, but won't be useful at print time.

   

  Regards.

  0

請登入寫評論。