Forskel

CLng() konverterer en \"expression\" (udtryk) til en variabel af sub-typen Long, mens CStr gør det samme bare til en String

\"Samlingen\" tæller:

CInt() - Integer
CLng() - Long
CSng() - Single
CDbl() - Double
CCur() - Currency
CStr() - String
CBool() - Boolean

Desuden, når jeg siger \"sub-type\" er det fordi at ALLE variabler i ASP er af typen Variant, men kan have en sub-type som f.eks. Integer.

når jeg bruger Clng kommer der en fejl, men når jeg bruger Cstr kommer der ingen fejl, men den gemmer det ikke.

Kan du regne ud hvad der er galt?

js17dk:> altså helt ærligt, hvordan vil du have jeg skal vide det uden at se noget kode !?

det kunne godt være at der var et generalt prob. der gik igen.

(er clng til tal, og cstr til tekst??)

kommer noget kode lige om lidt

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"test.mdb\")
ID = CLng(Request.QueryString(\"ID\"))
Mode = LCase(CStr(Request.QueryString(\"Mode\")))
Person = CLng(Request.QueryString(\"Person\"))
%>

<%
Select Case Mode
    Case \"nyperson\"
        If State = 0 Then
            Response.Write \"<h3>Ny Person</h3>\"
            ShowpersonForm
        Else
            SQLstmt = \"INSERT INTO Person (Person) VALUES (\"
            SQLstmt = SQLstmt & \"\'\" & Person & \"\', \"
            SQLstmt = SQLstmt & \"\" & ID & \");\"
            Conn.Execute SQLstmt
            %>
            <p align=\"center\">personen er blevet tilføjet.<br>
            [<a href=\"person.asp\">Tilbage</a>]

Koden ligger i en fil der hedder asp.inc

Og hvor får du fejl !?!?

Fejlen er at den gemmer ikke

I din database ? Du bruger da også et ygyldigt SQL kald ...

SQLstmt = \"INSERT INTO Person (Person, ID) VALUES (\'\" & Person & \"\',\" & ID & \");\"

prøv det

det hjælper ikke, jeg har lige noget mere kode to sek

ja, Lng er et (lang hel)tal og Str er en tekststreng

    Case \"retperson\"
        If State = 0 Then
            Set RS = Conn.Execute(\"SELECT * FROM Person WHERE ID = \" & ID)
            Person = RS(\"Person\")
       
            ShowpersonForm
        Else
            SQLstmt = \"UPDATE Person SET \"
            SQLstmt = SQLstmt & \"Person = \'\" & Person & \"\' \"
            SQLstmt = SQLstmt & \"WHERE ID = \" & ID
            Conn.Execute SQLstmt
            %>
            <p align=\"center\">Personen er blevet ændret.<br>
            [<a href=admin.asp?mode=retbtik&id=<%= ID %>>Tilbage</a>]

js17dk:> forresten behøver du ikke bruge CLng() og CStr() når det bare skal bruges i en SQL streng, da det er fløjtende ligemeget om det er tal eller strenge.

okay, skal jeg så bare skrive:
Person = (Request.QueryString(\"Person\"))

Person = Request.QueryString(\"Person\")

sådan

ok, kan du se fejlen i det andet??

Jeg afsætter lige nogle flere point

nææ ..

Der er ikke noget med at databasen skal være sat op til noget bestemt??

Generelt er det en god ide ikke at kalde Tabel og felt navn for det samme. Det er lettere at finde ud af når man kikker på det.
Ligeledes bør man ikke kalde variable det samme som Felt navne.. igen fordi det er lettere at se forskel når de har hvet deres navn.

tabllen: Person -> PersonTabel
variable: Person -> newPerson ligeledes ID -> idid

Det lyder måske lidt dumt, men det er 10 gange nemmere at finde fejl i koden.

Kommer der en ODBC fejl eller ser det ud som om SQL\'en bliver gennemført?

Altså den viser bare den samme side igen uden af den opdatere noget:

Prøv her:
http://go4net.adsl.dk/netdisney/admin/
Brugernavn: Test
Password: Test.

Er kun oppe når min com er tændt

Jeg får denne fejl når jeg er inde i http://go4net.adsl.dk/netdisney/admin/viskategori.asp og trykker på ret:
Microsoft OLE DB Provider for ODBC Drivers fejl \'80040e10\'

[Microsoft][ODBC Microsoft Access-driver] Der er for få parametre. Der var ventet 1.

/netdisney/admin.asp, linje 1256

Den fejl skyldes at der mangler en parameter i en SQL streng. Eks.vis  ...WHERE ID=ID\" skulle være ...WHERE ID=\"&ID

Jeg har prøvet ny:
http://go4net.adsl.dk/netdisney/admin.asp?mode=nycategories&id2=0
trykker gem og får samme side med linket:
http://go4net.adsl.dk/netdisney/admin.asp?mode=nycategories&state=1&id=0&Name=TestNavn&Transfer=TestTransger&Parent=3&submit=Gem

Ja, den har jeg også selv fået prøv at rette en af de andre

Den fejl skyldes at der mangler en parameter .... henviser til ODBC fejlen \'80040e10\'

hvad betyder det?

Når man trykke på Gem får du læst din \"state=1\" rigtigt. Den ryger jo i samme state=0.

hvad betyder det?  hvad henviser du til ? ODBC eller det andet?

hvad skal jeg ændre, er ikke så meget inde i admin-modul

henviser til??? ODBC hvad betyder det

Jo i:
http://go4net.adsl.dk/netdisney/admin.asp?mode=retperson&id=5

du skal måske lige havde state=0 med i komandoen:
http://go4net.adsl.dk/netdisney/admin.asp?state=0&mode=retperson&id=5

Du hendter hvilken \"id\" der skal rettes, ligeledes skal du hendte \"state\". Der er bare et gæt.

hjælper ikke rigtig

ODBC = Open DataBase Connectivity

Kan det være noget med databasen??

Prøv at udskrive dine SQL statments så er det muligt at se om evt er forkerte.

SQLstmt = \"UPDATE Person SET \"
SQLstmt = SQLstmt & \"Person = \'\" & Person & \"\' \"
SQLstmt = SQLstmt & \"WHERE ID = \" & ID

response.write SQLstmt
Conn.Execute SQLstmt

Jeg tror ikke det er noget i databasen. Den kommer normalt og siger hvis der er noget galt. hvis du løre på en NT kan der måske være noget med rettigheder på database file(læs/skriv).

Nå men jeg har et andet forslag:

Jeg vil mene der mangler toppen skal se sådan ud:
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"test.mdb\")
ID = Request.QueryString(\"ID\")
Mode = LCase(CStr(Request.QueryString(\"Mode\")))
Person = Request.QueryString(\"Person\")
State = Request.QueryString(\"State\")
%>

Jeg har taget kode fra det du lage ind på eksperten, og tilføjet
State = Request.QueryString(\"State\")


Virker det på en anden side??

ICQ vil ikke lave en forbindelse, nu vil den ikke engang sende gennen serve... Næ gennem kun gennem email.. ååååhhh

Et svar.

Prøv lige at send på ICQ

Nu smider jeg det her:
Jeg kan squ ikke få ICQ til at fatte at den ikke skal send gennem Email, når der nu ikke er en email.

Jeg vil den i stil med det her:
<%
\' Laver en Count!
SQLstmt = \"SELECT COUNT(*) AS Antal from Billed\"
set count = conn.Execute(SQLstmt)

\' Får Antallet ind i \'antalrec\'
antalrec = count(\"Antal\")

randomize
nr=int(antalrec*rnd)
\'url=int(antalrec*rnd)

\'Hendt URL\'en i databasen.
SQLstmt = \"SELECT * FROM Billed WHERE Nr=\"&nr
set count = conn.Execute(SQLstmt)

Response.Write \"<a href=\'\"&count(\"url\")&\"\'><IMG SRC=\'images/tip\"&nr&\".gif\' border=\'0\'></a> \"

\'Lukker connection - Rydder op
set count = Nothing
set SQLstmt = Nothing
set conn = Nothing

%>

Jeg har ikke testet om det virker måske det kan give dig en ide, hvis det ikker er helt rigtigt.

Jeg ikke få ICQ ril at sende til dig. Jeg får en \"Send Thru Email\" mulighed. Der er ikke sat nogen email adresse ind i ICQ. FLOT:

Nu her jeg problemmet igen med ICQ !?!?!
Måske det her virker.

<%
\' Hendter billeder!
SQLstmt = \"SELECT * FROM Billed\"
set count = conn.Execute(SQLstmt)

\' Får Antallet ind i \'antalrec\'
antalrec = count.RecordCount

randomize
nr=int(antalrec*rnd)

count.movefirst
for i=1 to nr
  count.movenext
next

Response.Write \"<a href=\'\"&count(\"url\")&\"\'><IMG SRC=\'images/tip\"&nr&\".gif\' border=\'0\'></a> \"

\'Lukker connection - Rydder op
set count = Nothing
set SQLstmt = Nothing
set conn = Nothing
%>

count(\"url\") betyer man hender værdien af feltet URL i den række man er kommet til.