Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / DTPicker & SQL запрос / 5 сообщений из 5, страница 1 из 1
05.08.2005, 09:49
    #33203176
Plux
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DTPicker & SQL запрос
Здравствуйте все!!!
Подскажите пожалуйста запрос. При вставке данных в базу необязательного поля типа Smalldatetim при присвоении значения "" заносится значение 1900год, как сделать так чтоб оставалось значение Null?

Кусок запроса:
dim dat1,dat2 as string
If DTPicker1.Enabled = True Then
dat1 = Format(DTPicker1.Value, "yyyy-mm-dd")
Else
dat1 = Null, или "" -не имеет значения, результат один и тот же
End If

ssnew = "insert into naosnov (.....uebir,peo,...) values" _
& "(... "'" & dat1 & "','" & dat2 & "'...)"

rcd2.Open ssnew, cn, adOpenKeyset, adLockOptimistic
...
Рейтинг: 0 / 0
05.08.2005, 10:07
    #33203233
Toking
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DTPicker & SQL запрос
Странно почему '' и 'null' дают одинаковый результат ...

Впрочем, если вы хотите вставить null, то и пишите null без кавычек (одинарных).

Например, так:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
 dim dat1 as string, dat2 as string 
If DTPicker1.Enabled Then
dat1 = "'" & Format(DTPicker1.Value, "yyyy-mm-dd") & "'"
Else
dat1 = "Null"
End If

ssnew = "insert into naosnov (.....uebir,peo,...) values" _
& "(... ," & dat1 & " , " & dat2 & ", ...)"

cn.Execute ssnew, , adExecuteNoRecords or adCmdText
...
Рейтинг: 0 / 0
05.08.2005, 10:08
    #33203236
big-duke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DTPicker & SQL запрос
Plux
Кусок запроса:
dim dat1,dat2 as string
If DTPicker1.Enabled = True Then
dat1 = Format(DTPicker1.Value, "yyyy-mm-dd")
Else
dat1 = Null, или "" -не имеет значения, результат один и тот же
End If

ssnew = "insert into naosnov (.....uebir,peo,...) values" _
& "(... "'" & dat1 & "','" & dat2 & "'...)"

когда Null попробуй без апострофа
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
dim dat1,dat2 as string 
If DTPicker1.Enabled = True Then
dat1 = chr( 39 ) &  Format(DTPicker1.Value, "yyyymmdd") & chr( 39 )
Else
dat1 = Null, или "" -не имеет значения, результат один и тот же
End If

ssnew = "insert into naosnov (.....uebir,peo,...) values" _
& "(... " & dat1 & ",'" & dat2 & "'...)"
ну и формат даты для скуля yyyymmdd
...
Рейтинг: 0 / 0
05.08.2005, 14:19
    #33204267
Plux
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DTPicker & SQL запрос
Спасибо ОГРОМНОЕ!!!! По первому варианту получилось!
СПАСИБО!!!
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
07.05.2008, 00:47
    #35298365
VladislavSPB
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DTPicker & SQL запрос
И ещё спасибо!
То же всё получилось!

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


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