Na pomosch', bratzy!(i sestrichki...)

[jackit68]

Help!!! Pri zapisi dannyh v fail ACCESS cherez ASP ne zapisyvaetsya pervoe pole! Vot kod:

<%
Dim dataCon
Dim GuestRst
Dim strSQL
Set dataCon=Server.CreateObject("ADODB.Connection")
dataCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("gutin.mdb")
Set GuestRst = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT Guests.Name, Guests.LastName, Guests.Business, Guests.Activity, Guests.EMail, Guests.Cell, Guests.Phone, Guests.Fax, Guests.Remarks FROM Guests;"
GuestRST.CursorType=2
GuestRst.LockType=3
GuestRst.Open strSQL, dataCon
GuestRst.AddNew
GuestRst.Fields("Name")=Request.Form("sender_first ")
GuestRst.Fields("LastName")=Request.Form("sender_last")
GuestRst.Fields("Business")=Request.Form("t1")
GuestRst.Fields("Activity")=Request.Form("t2")
GuestRst.Fields("EMail")=Request.Form("mail")
GuestRst.Fields("Cell")=Request.Form("cel")
GuestRst.Fields("Phone")=Request.Form("tel")
GuestRst.Fields("Fax")=Request.Form("fax")
GuestRst.Fields("Remarks")=Request.Form("t3")
GuestRst.Update
GuestRst.Close
set GuestRst = Nothing
set dataCon = Nothing
%>

Gde hotya by informaciyu naiti?...

[skiperski]

Проверь что возвращает Request.Form("sender_first "). Может быть имя написано неверно, тогда поле будет пустым.

[Рома]

Есть еще ошибки с использованием зарезервированных имен.
Например Date, тот же результат...

А лучше в самом начале, перед запуском команды, проверить все таки запрос:

Код: Выделить всё

...
Response.Write(strSQL)
...
RS.Open strSQL, dataCon

For i=0 ti rs.fields.count-1
  Response.Write "name=" & rs(i).name & " ; value=" & rs(i).value & "<br>"
next

Response.End()

...
RS.AddNew