Pomogite SELECT ne rabotaet kak nado :(

Программирование на Active Server Pages и VBScript.
Vini
Обычный пользователь
Обычный пользователь
 
Сообщения: 93
Зарегистрирован: 29.03.2004 (Пн) 5:40

Pomogite SELECT ne rabotaet kak nado :(

Сообщение Vini » 03.05.2004 (Пн) 23:00

Privet vsem!
Takoe delo:
Est' fajl db.mdb v nem
tablica lib_subject
v nej
pole data format Data/Time i vida 04/28/2004 9:31:26 AM

Zadacha:
Vivesti vse zapisi gde mesac' = 5 (t.e. Maj)

delajy tak

Код: Выделить всё
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & curdir
sSQL = "SELECT * FROM lib_subject Where datepart(mm, DATE) = 05"
RS2.Open sSQL, Conn


I poluchajy oshibky vida
No value given for one or more required parameters. v stroke
RS2.Open sSQL, Conn

NArod, pomogite a???

corgi
ToyMan
ToyMan
 
Сообщения: 1367
Зарегистрирован: 01.10.2002 (Вт) 9:59
Откуда: Россия, Москва

Сообщение corgi » 04.05.2004 (Вт) 10:52

я так думаю datepart(mm, DATE) это какая-то функция так и подставляй ее результаты
sSQL = "SELECT * FROM lib_subject Where " & datepart(mm, DATE) & " = 05"
RS2.Open sSQL, Conn
Ничто так не ограничивает полёт мысли программиста, как компилятор

skiperski
Идеолог
Идеолог
Аватара пользователя
 
Сообщения: 1386
Зарегистрирован: 25.06.2002 (Вт) 15:52

Re: Pomogite SELECT ne rabotaet kak nado :(

Сообщение skiperski » 04.05.2004 (Вт) 11:42

Во-первых, определись как у тебя поле называется data или DATE. В последнем случае лучше писать в квадратных скобках.

Во-вторых, что за переменная mm? Правильно, это не переменная, а константа. Тогда так и пиши "mm".

В-третьих, не "mm", а "m". А может даже лучше не DatePart(), а Month().

Код: Выделить всё
sSQL = "SELECT * FROM lib_subject WHERE DatePart('m', [DATE]) = 5"

или
Код: Выделить всё
sSQL = "SELECT * FROM lib_subject WHERE Month([DATE]) = 5"

Vini
Обычный пользователь
Обычный пользователь
 
Сообщения: 93
Зарегистрирован: 29.03.2004 (Пн) 5:40

Сообщение Vini » 04.05.2004 (Вт) 16:16

Sposibo za otveti i pouchenija, ochen' blagodaren!
Kod rabotaet prevoshodno :lol: .

Takoj vopros poputno:
Proboval li kto delat' takoe:
Zapisi za tekushij mesac vivodit' v vide

data: Tema
data: Tema

Proshedshih mesacev zapisi, sozdavat' arhiv vida

Janvar'
Fevral'
....
Avgust

Esli net zapisej za mesac mesac ne vivoditsa v arhive.

Chto skazhite, kakie budut idei? :idea:
Zaranee blagodaren.

skiperski
Идеолог
Идеолог
Аватара пользователя
 
Сообщения: 1386
Зарегистрирован: 25.06.2002 (Вт) 15:52

Сообщение skiperski » 04.05.2004 (Вт) 17:35

Код: Выделить всё
Dim m, y
m = Month(Date)
y = Year(Date)


Новости за текущий месяц
Код: Выделить всё
sql = "SELECT * FROM [time_table]
sql = sql & " WHERE [time_] >= #" & y & "-" & m & "-01#"


За предыдущие месяцы текущего года
Код: Выделить всё
sql = "SELECT Month([time_]) AS [Month], COUNT(*) AS recCount"
sql = sql & " FROM [time_table]"
sql = sql & " WHERE [time_] BETWEEN #" & y & "-" & m & "-01# AND #" & y & "-01-01#"
sql = sql & " GROUP BY Month([time_])"
sql = sql & " ORDER BY Month([time_]) DESC"


За предыдущие годы
Код: Выделить всё
sql = "SELECT Year([time_]) AS [Year], COUNT(*) AS recCount"
sql = sql & " FROM [time_table]"
sql = sql & " WHERE [time_] < #" & y & "-01-01#"
sql = sql & " GROUP BY Year([time_])"
sql = sql & " ORDER BY Year([time_]) DESC"

Vini
Обычный пользователь
Обычный пользователь
 
Сообщения: 93
Зарегистрирован: 29.03.2004 (Пн) 5:40

Сообщение Vini » 07.05.2004 (Пт) 14:32

Premnogo vam blagodaren! Yvazhaemij skiperski
Po kakoj-to prichine ne mog popast' na forum ran'she, pisalo host ne najden.

Eshe raz spasibo. Ochen' pomogli.


Вернуться в ASP и VBScript

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 7

    TopList