|
автор: Maxik (01.10.2006 в 12:51) |
|
| Народ, подскажите! У меня была база мдб, я ее решил перелить на sql..
И.. теперь клиент не работает с таблицами.. большинство команд и запросов не работы с базой не работает, какой основной принцип работы с sql таблицами?
ТИПа этих :
===
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("БазаИсточник", dbOpenDynaset)
If rst.RecordCount = 0 Then
GoTo exitsub
End If
With rst
.MoveLast
.MoveFirst
Do Until .EOF
rst.Close
=====
Dim Del As Recordset
Dim str As String
Set Del = CurrentDb.OpenRecordset("SELECT * FROM [БазаИсточник] WHERE [Код]=" & Me.lvDocList.SelectedItem.Tag)
With Del
str = !БазаИсточник
End With
========
CurrentDb.Execute "DELETE * FROM [БазаИсточник] WHERE [Код]=" & Me.lvDocList.SelectedItem.Tag | |
|
| |
|
|
|
| Как вы соеденяетесь с SQL server? через ODBC? Если Да, то нужно использовать Connection а не Currentdb.
А вообще лучше уж ADO, а не DAO | |
|
| |
|
автор: Maxik (02.10.2006 в 14:02) |
|
| Олег, я незнаю как, я ни когда не работал с серверами. Я просто поставил Sql Server и в Access мастером закинул туда таблицы. Теперь с таблицами не работает Curr.
А что еще по мимо Connection надо еще дописывать?
А почему DAO не пойдет? | |
|
| |
|
|
|
| как много нам открытий чудных готовит ... майкрософ...
почему вы решили, что дело только и ограничится переносом таблиц на M$SQL? У вас впереди еще много работы | |
|
| |
|
автор: Maxik (02.10.2006 в 14:16) |
|
| Нет я не думал что этим все ограничится!
Просто я не знал с чего начать, но вот кажется нарыл,
=======
Dim rst As ADODB.Recordset
Dim con As ADODB.Connection
Set rst = New ADODB.Recordset
Set con = Application.CurrentProject.Connection
rst.Open "БазаИсточник", con, adOpenDynamic
====
Теперь просто надо заменить, да?
А что делать с командой DoCmd.RunSQL и почему некоторые запросы не работают?
EXLORER что меня еще ожидает? | |
|
| |
|
|
|
| ну начать с того, что вас ожидают неожиданности при переходе c DAO на ADO - разные идеологии разные объекты и разные методы
и продолжить тем, что вас ожидают неожиданности при переходе с JET на SQL - они не конгруэнтны - это просто разные инструменты
в общем, если вы пока ничего об этом не знаете - купите кнжку для начала - сэкономите кучу времени и траффика | |
|
| |