Подключение к БД SQL 2005 через ADODC в VB

Формулировка задачи:

Всем привет!
Я сегодня установил БД SQL 2005 и не могу делать update (или edit), insert (или add) через ADODC в VB, но select работает без ошибок.
Как можно правильно подключится к БД SQL 2005 и делать без ошибок update (или edit), insert (или add) через ADODC в VB.
Пожалуйста, если можно с примерами, помому что я новичок и не очень хорошо знаю VB, SQL 2005
Всем огромное спасибо!

Решение задачи: «Подключение к БД SQL 2005 через ADODC в VB»

textual
                            Листинг программы 
                        

                            <font color="blue">Dim</font> cn <font color="blue">As</font> ADODB.Connection
<font color="blue">Dim</font> sql <font color="blue">As</font> <font color="blue">String</font>
<font color="blue">Dim</font> rs <font color="blue">As</font> ADODB.Recordset

<font color="blue">Set</font> cn = <font color="blue">New</font> ADODB.Connection

cn.CursorLocation = adUseClient
cn.<font color="blue">Open</font> <font color="teal">"Provider=SQLOLEDB.1;Password=123456;Persist Security Info=True;User ID=sh1;Initial Catalog=egrafik;Data Source=TK-D100112-01\SQLEXPRESS"</font>

sql = <font color="teal">"select * from info_sotr"</font>


<font color="blue">Set</font> rs = <font color="blue">New</font> ADODB.Recordset
<font color="blue">Set</font> rs.ActiveConnection = cn
rs.<font color="blue">Open</font> sql, , adOpenStatic, adLockReadOnly, adCmdText

<font color="blue">Set</font> DataGrid1.DataSource = rs
<font color="blue">Me</font>.Text1.DataField = <font color="teal">"LastName"</font> <font color="00AA00">'название поля</font>
<font color="blue">Set</font> <font color="blue">Me</font>.Text1.DataSource = rs
                        