PDA

View Full Version : Početnik..u ASP-u


lista155
22-04-2003, 13:51
<%@ Language=VBScript %>
<% Option Explicit %>
<!--#include virtual="adovbs.inc"-->
<%
Dim objCon
Set objCon=Server.CreateObject("ADODB.Connection")
objCon.ConnectionString="DSN=login.dsn"

objCon.Open

Dim objRS, greska

if ((Request("ime")="") OR (Request("email")="") OR (Request("lozinka")="")) OR then
Response.Write "<a href='noviKorisnik.asp'>"
Response.Write "Ispunite sva polja"
Response.Write "</A>"
else
greska=false
set objRS=Server.CreateObject("ADODB.RecordSet")
objRS.Open "tblKorisnik", objCon,, adLockOptimistic, adCmdTable

do while not (greska=True OR objRS.EOF)
if objRS("Ime")=Request("ime") then
Response.Write "<a href='noviKorisnik.asp'>"
Response.Write "Korisnik vec postoji" & "<br>"
Response.Write "</A>"
Response.Write "<a href='login.asp'>"
Response.Write "Vec ste registrirani? Onda kliknite ovdje"
Response.Write "</A>"
greska=true
end if

if objRS("E-Mail")=Request("email") then
Response.Write "<a href='noviKorisnik.asp'>"
Response.Write "Adresa vec postoji"
Response.Write "</A>"
greska=true
end if

objRS.MoveNext
loop

if not greska then
objRS.AddNew
objRS("Ime")=Request.Form("ime")
objRS("E-Mail")=Request.Form("email")
objRS("Lozinka")=Request.Form("lozinka")
objRS.Update
Response.Write "Registracija uspješna"
end if

objRS.Close
Set objRS=Nothing
end if
objCon.Close
Set objCon=Nothing
%>
---------------------------------
Javlja sljedeću grešku:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement.
A odnosi se na redak "objRS.Update"
U čemu je greška? Unaprijed hvala!

kezo
22-04-2003, 14:41
1.provjeri stringove koje primaš iz forme, moždaje neki prazan ili nije istog tipa kao polje u tablici,
2. provjeri bazu i tablicu na koju se konektiraš da li se polja zovu točno tako kako si ih ti napisao

ne preporuča se ovaj način rukovanja s bazom, dobar dio ozbiljnih hosting providera više ni prihvača otaranje DSNa na serveru nego forsiraju DSN-less konekciju, a i preporuka je koristiti SQL upite za operacije na bazi

lista155
22-04-2003, 15:31
...šta se tiče dsn, nije bitno, jer ovo sve izvodim doma na računalu, čisto iz znatiželje...sve je drugo točno, zato mi i nije jasno

domagoj
22-04-2003, 19:48
?:
objRS.Open "tblKorisnik", objCon,, adLockOptimistic, adCmdTable

Gdje je kraj navodnika, dva zareza za redom... to si htio da piše.
Gdje je SQL s insertom? Kako bih znao o čemu se radi?
Da li se sigurno samo tako definira dsn?
Ovo ne ide ADODB.RecordSet, to je case sensitive.

lista155
22-04-2003, 22:43
...kao i obično, najbanalnija moguća stvar:
polje u tablici se zove "E-Mail"...e ta crtica je ra**ala sve.
Domagoj, sve ostalo je onako kako bi trebalo bit..sve sam skupia iz knjiga ili iz open-source projekata..

domagoj
23-04-2003, 08:53
ok.