Лешка
Дата: 10.12.2002 22:28:57
Ребята!
Почему при подключении к SQL Server Формы Access (построена по модели ADO) он говорит что таблица переименована или перемещена.
Пример кода:
Private Static Function CreateSQL_Key() As String
Static SQLWhere$
Set RstCnnInf = New ADODB.Recordset
'Dim CnnRs As Object 'Recordset
Dim CnnRs As New Recordset
'Set CnnRs = Forms![frmComp].RecordsetClone
Set CnnRs = RstTemp
Get_Where_Sub
Get_Where_Org
'Набор ключевых слов, извлекаемых из текущего набора записей
SQLWhere$ = "WHERE ((TAB_DOC.DTYPE " & SQL_DOC_Type & WhereSub$ & SQL_DOC_Sub & WhereOrg$ & SQL_DOC_Org & "AND (YEAR(TAB_DOC.DTORG) " & SQL_DOC_Year & "AND (TAB_DOC.TITL " & SQL_DOC_Titl & "AND (TAB_DOC.TFILE " & SQL_DOC_File & "AND (TAB_DOC.NMORG " & SQL_DOC_Name & ");"
SQLStr$ = SQLHeadKey$ & "FROM TAB_DIC INNER JOIN DOC_DIC ON TAB_DIC.COD_WORD = DOC_DIC.COD_WORD WHERE DOC_DIC.NM = " & CnnRs("NM") 'SQLWhere$
CreateSQL_Key = SQLStr$
RstCnnInf.Open CreateSQL_Key, CnnInf
CnnRs.Close
End Function
Спасибо!
Latuk
Дата: 11.12.2002 11:33:14
Поставь BreakPoint и посмотри содержимое CreateSQL_Key попробуй перенести в конструктор и посмотри что ты там навоял.Бывают всякие досадины типа забыл пробел добавить и ключевое слово с названием слилось.
Еще если Acc2000 то при работе в ADP обязательно SP1&SP2 и во многих местах приходится ставить префикс хозяина (напр dbo.Имя).