Function Get_Label_Content(Str_Label_Name)
Dim Rs_Label,StrSql
StrSql = "SELECT LableContent FROM FS_MF_Lable WHERE isDel=0 AND LableName='"&Str_Label_Name&"'"
Set Rs_Label = Conn.Execute(StrSql)
If Not Rs_Label.Eof Then
Get_Label_Content=Rs_Label("LableContent")
Else
Get_Label_Content=""
End If
End Function