public Sub GetAttribute(element As BANanoElement, attrName As String) As String
Dim DOMParser As BANanoObject
DOMParser.Initialize2("DOMParser", Null)
Dim parents() As BANanoElement = element.Parent("")
Dim obj As BANanoObject = DOMParser.RunMethod("parseFromString", Array(parents(0).GetHTML,"text/html")).Result
Return obj.RunMethod("getElementById",element.Name).GetField("attributes").GetField(attrName).GetField("nodeValue").Result
End Sub