Advertisement
Guest User

Untitled

a guest
Dec 2nd, 2011
134
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ' Check if open bracket is present, i.e. InStr() function returns valid number for ARGS.Item(1)
  2. If (InStr(ARGS.Item(1), "(") - 1) > 1 Then
  3. ' It's present, so crop the string to the position of opening bracket, and trim whitespace just in case
  4.  ALBUM = Trim(Mid(ARGS.Item(1), 1, InStr(ARGS.Item(1), "(") - 1))
  5. Else:
  6. ' It's not present, carry on by default
  7.  ALBUM = ARGS.Item(1)
  8. End If
  9.  
  10.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement