Fields:
Spec
Thick
Wdth
Lgth
Dia
OD
ID
HB
Rm
Rp02
Rp05
A5
A4
Yield
Elong
IACS
All fields are text field 255 characters long
UPDATE TagsTraceDatabase
SET TagsTraceDatabase.Thick = IIf(InStr(1,[Spec],"THICK=")>0,Mid([Spec],InStr(1,[Spec],"THICK=")+7,InStr(InStr(1,[Spec],"THICK="),[Spec],">")-InStr(1,[Spec],"THICK=")-7),""),
TagsTraceDatabase.Wdth = IIf(InStr(1,[Spec],"WIDTH=")>0,Mid([Spec],InStr(1,[Spec],"WIDTH=")+7,InStr(InStr(1,[Spec],"WIDTH="),[Spec],">")-InStr(1,[Spec],"WIDTH=")-7),""),
TagsTraceDatabase.Lgth = IIf(InStr(1,[Spec],"LG=")>0,Mid([Spec],InStr(1,[Spec],"LG=")+4,InStr(InStr(1,[Spec],"LG="),[Spec],">")-InStr(1,[Spec],"LG=")-4),""),
TagsTraceDatabase.Dia = IIf(InStr(1,[Spec],"DIA=")>0,Mid([Spec],InStr(1,[Spec],"DIA=")+5,InStr(InStr(1,[Spec],"DIA="),[Spec],">")-InStr(1,[Spec],"DIA=")-5),""),
TagsTraceDatabase.OD = IIf(InStr(1,[Spec],"OD=")>0,Mid([Spec],InStr(1,[Spec],"OD=")+4,InStr(InStr(1,[Spec],"OD="),[Spec],">")-InStr(1,[Spec],"OD=")-4),""),
TagsTraceDatabase.ID = IIf(InStr(1,[Spec],"ID=")>0,Mid([Spec],InStr(1,[Spec],"ID=")+4,InStr(InStr(1,[Spec],"ID="),[Spec],">")-InStr(1,[Spec],"ID=")-4),""),
TagsTraceDatabase.HB = IIf(InStr(1,[Spec],"HB=")>0,Mid([Spec],InStr(1,[Spec],"HB=")+4,InStr(InStr(1,[Spec],"HB="),[Spec],">")-InStr(1,[Spec],"HB=")-4),""),
TagsTraceDatabase.Rm = IIf(InStr(1,[Spec],"Rm=")>0,Mid([Spec],InStr(1,[Spec],"Rm=")+4,InStr(InStr(1,[Spec],"Rm="),[Spec],">")-InStr(1,[Spec],"Rm=")-4),""), TagsTraceDatabase.Rp02 = IIf(InStr(1,[Spec],"Rp0.2=")>0,Mid([Spec],InStr(1,[Spec],"Rp0.2=")+7,InStr(InStr(1,[Spec],"Rp0.2="),[Spec],">")-InStr(1,[Spec],"Rp0.2=")-7),""), TagsTraceDatabase.Rp05 = IIf(InStr(1,[Spec],"Rp0.5=")>0,Mid([Spec],InStr(1,[Spec],"Rp0.5=")+7,InStr(InStr(1,[Spec],"Rp0.5="),[Spec],">")-InStr(1,[Spec],"Rp0.5=")-7),""), TagsTraceDatabase.A5 = IIf(InStr(1,[Spec],"A5%=")>0,Mid([Spec],InStr(1,[Spec],"A5%=")+4,InStr(InStr(1,[Spec],"A5%="),[Spec],">")-InStr(1,[Spec],"A5%=")-4),""), TagsTraceDatabase.A4 = IIf(InStr(1,[Spec],"A4%=")>0,Mid([Spec],InStr(1,[Spec],"A4%=")+4,InStr(InStr(1,[Spec],"A4%="),[Spec],">")-InStr(1,[Spec],"A4%=")-4),""), TagsTraceDatabase.Yield = IIf(InStr(1,[Spec],"YIELD=")>0,Mid([Spec],InStr(1,[Spec],"YIELD=")+4,InStr(InStr(1,[Spec],"YIELD="),[Spec],">")-InStr(1,[Spec],"YIELD=")-4),""), TagsTraceDatabase.Elong = IIf(InStr(1,[Spec],"ELONG=")>0,Mid([Spec],InStr(1,[Spec],"ELONG=")+4,InStr(InStr(1,[Spec],"ELONG="),[Spec],">")-InStr(1,[Spec],"ELONG=")-4),""), TagsTraceDatabase.IACS = IIf(InStr(1,[Spec],"IACS=")>0,Mid([Spec],InStr(1,[Spec],"IACS=")+4,InStr(InStr(1,[Spec],"IACS="),[Spec],">")-InStr(1,[Spec],"IACS=")-4),"");