---

jeg har et script som opretter en som bruger i en access database this
man udfylder formularen, og så vil jeg gerne vide hvordan man tjekker om
brugernavnet er taget, og hvis det er skriver den en besked?g har mange konstateret denne fejl.


--
Leveret af:
http://www.kandu.dk/
"Vejen til en hurtig løsning"

---

"goodbye" <goodbye.news@kandu.dk> wrote in message
news:4zDv8.34365$iY5.1399262@news010.worldonline.dk...
> jeg har et script som opretter en som bruger i en access database this
> man udfylder formularen, og så vil jeg gerne vide hvordan man tjekker om
> brugernavnet er taget, og hvis det er skriver den en besked?g har mange
konstateret denne fejl.

Du laver simpelthen først et opslag i databasen hvor du tæller alle poster
hvor brugerenavnet er lig med det valgte hvis dette er 0 oprettes brugern
ellers udskrives en fejlmeddelelse, f.eks.


Brugernavn = Request.Form( "Brugernavn" )
If Len(Brugernavn) > 0 Then
Brugernavn = Replace( Brugernavn, "'", "''" )
End if
'Åbn connection
SQL = "SELECT COUNT(*) FROM tblBrugere WHERE Brugernavn = "' & Brugernavn &
"'"
Set objRS = objConn.Execute(SQL)
Antal = objRS(0)
Set objRS = Nothing

If Antal = 0 Then
'Opret bruger
objConn.Execute( "INSERT................................" )
Else
Response.write( "Brugernavnet er taget, gå tilbage og prøv igen" )
End if

'Luk databasen

--
Jakob Andersen

---

Jakob Andersen wrote in news:a9nbro$9hb$1@news.cybercity.dk:

> "goodbye" <goodbye.news@kandu.dk> wrote in message
>
> Du laver simpelthen først et opslag i databasen hvor du tæller alle
> poster hvor brugerenavnet er lig med det valgte hvis dette er 0
> oprettes brugern ellers udskrives en fejlmeddelelse, f.eks.
>
> Brugernavn = Request.Form( "Brugernavn" )
> If Len(Brugernavn) > 0 Then
> Brugernavn = Replace( Brugernavn, "'", "''" )
> End if
> 'Åbn connection
> SQL = "SELECT COUNT(*) FROM tblBrugere WHERE Brugernavn = "' &
> Brugernavn & "'"
> Set objRS = objConn.Execute(SQL)
> Antal = objRS(0)

jeg har oplevet, at det er nødvendigt at konvertere resultatet til
integer, da dette check ikke altid giver det ønskede resultat. Det virker
som om at værdien returneret fra objRS(0) er af typen Variant.

altså:

Antal = CInt(objRS(0))

:)

--
Jesper Stocholm
http://stocholm.dk
http://asp.stocholm.dk
Svar til gruppen og ikke til mig privat pr. email :|

---

<snit>
> jeg har oplevet, at det er nødvendigt at konvertere resultatet til
> integer, da dette check ikke altid giver det ønskede resultat. Det virker
> som om at værdien returneret fra objRS(0) er af typen Variant.
</snit>
nææ, det er såmænd en record! (fra et recordset....) Den defaulter til en
int, eller string, eller hvad asp nu gætter på at det skal bruges til. Hvis
man vil have værdien af det der står i denne record, skal man bruge .value
ex: objRS(0).value
Denne værdi er en basal datatype (så basal den nu kan blive i asp)

/Jesper

---

On Fri, 19 Apr 2002 09:33:32 +0000 (UTC), Jesper Stocholm
<spam200204@stocholm.dk> wrote:

>> SQL = "SELECT COUNT(*) FROM tblBrugere WHERE Brugernavn = "' &
>> Brugernavn & "'"
>> Set objRS = objConn.Execute(SQL)
>> Antal = objRS(0)
>
>jeg har oplevet, at det er nødvendigt at konvertere resultatet til
>integer, da dette check ikke altid giver det ønskede resultat. Det virker
>som om at værdien returneret fra objRS(0) er af typen Variant.

Jeg får den nu til typen Long Med:
TypeName(Antal)

Mvh. Jørn


--
Jørn Andersen,
Brønshøj