Гость
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / О работает!:) О не работает!:( (VB+SQL) / 1 сообщений из 1, страница 1 из 1
01.08.2003, 13:47
    #32225042
Geen
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
О работает!:) О не работает!:( (VB+SQL)
Ну блин!!!!
Написал:

Private Sub Form_Current()
Dim B As String, C As Date
C = Forms![Groups]![ID_Group]
B = "SELECT SUM(Sub_Group.Mest_Sub_Group * Types_Nomer.Mest_Type)" _
& " AS Vsego FROM dbo.Sub_Group INNER JOIN dbo.Types_Nomer ON" _
& " dbo.Sub_Group.Type_Sub_Group = dbo.Types_Nomer.ID_Type_Nomer" _
& " WHERE (dbo.Sub_Group.K_Group = '" & Format(C, "yyyymmdd hh:mm:ss") & "')"
Forms![Groups]![SP41].RowSource = B
Forms![Groups]![SP41].Requery
End Sub

Запускаю - работает:)
Через 2-3 раза - перестало:(
Закр-Откр форму - не работает:(((
Что за глюк?:(

Geen
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / О работает!:) О не работает!:( (VB+SQL) / 1 сообщений из 1, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]