Cierto, u_goldman

Es más elegante tu código. Para redondear el código lo pongo en ASP con tu expresion regular.
Código:
Function isMyFormat(texto)
Dim regEx
Set regEx = New RegExp
regEx.Pattern = "(^[a-z]{4}[0-9]{7}[a-z]{1}[0-9]{1}$)"
regEx.IgnoreCase = True
isMyFormat = regEx.test(texto)
set regEx = nothing
End Function
USO:
if isMyFormat("GOCM8402012K3") then ...
Un saludo
(¡¡¡Vivan los viernes

!!!)