VB Script Help Endif statement

Carlos Peres

• May 09, 2022 14:22

Hello everyone

I need some help on this, im running this script:

Value = Format.NamedSubStrings("PESOLIQ").Value
If Value = "0006.00" then Value = 1
If Value = "0010.00" then Value = 3
If Value = "0004.00" then Value = 5
If Value = "0005.00" then Value = 4
If Value = "0007.00" then Value = 2
If Value = "0008.00" then Value = 6
If Value = "0012.00" then Value = 8
If Value = "0015.00" then Value = 7
else value = 9
End If

its giving me "OnAutoSelectedEvent (Line 10): else value = 9: 'End' esperado"

 

its working till the

"else value = 9
End If"

can anyone help me

 

1

• 

  Paweł Gancarz

  ★ BarTender Hero ★

  • May 09, 2022 16:16

  Hello Carlos,

  I don't know how you want to enter the data, but if you enter the values you specified, the script will substitute them.
  If you don't enter anything I have the value 9 then.
  The way I understood it.
  Below, you have pictures.

   

  

  

  

  

  Contents of the script:

  Select case PESOLIQ

  case "0006.00"
  value="1"
  case "0010.00"
  value="3"
  case "0004.00"
  value="5"
  case "0005.00"
  value="4"
  case "0007.00"
  value="2"
  case "0008.00"
  value="6"
  case "0012.00"
  value="8"
  case "0015.00"
  value="7"

  case else value="9"
  end select

  0
• 

  Carlos Peres

  ★ BarTender Hero ★

  • May 10, 2022 08:16

  Hello Pawel

  Thanks a lot for your help, it runs perfectly this way!

  0

Please sign in to leave a comment.