دسترسی به Extended Property های دیتابیس

[Sub Zero]

سلام
بعد از اینکه دیتا بیس اکسسم رو به SQL2005 کانورت کردم . کلی گشتم تا تونستم با کد زیر به Extended Property های دیتابیس SQL دسترسی پیدا کنم .


Dim con As New SqlConnection("Data Source=.\sqlexpress;Initial Catalog=DataAhwaz;Integrated Security=True")
Dim da As New SqlDataAdapter("select objname as ColName, value as Description " _ &
From ::fn_listextendedproperty(NULL, 'user', 'dbo', 'table',' & 'TableName' & , 'column', default)", con)
اما متوجه شدم که در جریان انتقال و تبدیل اکسس به SQL ، توضیحات (Description) مربوط به هر فیلد جدول در دیتابیس جدید (همون دیتابیس تبدیل شده) وجود نداره . برای همین الان چند روزه که دنبال معادل کد بالا برای دسترسی به Extended Property دیتا بیس اکسس میگردم .
خدمت دوستانی که با Extended Property آشنایی ندارند عرض کنم که هر فیلد جدول دارای یک سری مشخصه ها است که نمایانگر خصوصیات اون فیلده مشخصه هایی مانند:
Fomat - Description - InputMask و ....
اگه کسی در این ضمینه اطلاعاتی داره ممنون می شم کمک کنه .

[Sub Zero]

تا اینجا پیش رفتم که با تعریف یه دیتا تیبل می شه به پروپرتیهای یک فیلد با کد زیر دسترسی پیدا کرد

Dim dt As New DataTable
MsgBox(dt.Columns.Item(0).ExtendedProperties.Item("Value").ToString)
اما باز هم جواب نمی ده و پروپرتیها رو نمایش نمیده
من همچنان منتظر ارائه راه حل از طرف دوستانم