Avatar billede perstig Nybegynder
02. april 2002 - 16:37 Der er 5 kommentarer og
1 løsning

Typeuoverensstemmelse???

Hvorfor fejler mit opdat. script når jeg forsøger slettet en værdi i databasen. Feltet i databasen er sat til at kunne tager "tomme felter".
Jeg kan sagtens ændre værdien, men altså ikke slette værdien.

Herunder en bid af opdat.scriptet:

<<<<<KODE BEGYND>>>>>>>>

    If intReferatNr <> RefNrCookie Then
        If IsEmpty(intReferatNr) Then intReferatNr = ""
        resOpdatNyhed ("N_Referat_Ref") = intReferatNr
    Else
        resOpdatNyhed ("N_Referat_Ref") = intReferatNr
    End If
    resOpdatNyhed ("N_Tekst") = Request("tekst")
    resOpdatNyhed.Update

<<<<<<<<<KODE SLUT>>>>>>>>>
Avatar billede coltau Juniormester
02. april 2002 - 17:09 #1
Hvis du skal slette et tekstfelt i en DB skal du anvende kommandoen: NULL

resOpdatNyhed ("N_Tekst") = NULL

og SQL

SQL = "update tabelnavn set navn=NULL where ID=" & strID
Avatar billede coltau Juniormester
02. april 2002 - 17:11 #2
også selvom at du har angivet i db at den må anvende "tomme felter"

Hvis du angiver at et felt IKKE må anvende "tomme felter" så betyder det at en INSERT-sætning vil fejle hvis du ikke angiver en værdi for det pågældende felt.
Avatar billede perstig Nybegynder
03. april 2002 - 17:15 #3
Det virker stadig ikke.
Se herunder den ændring jeg lavede:

<<<<<<<<KODE BEGYND >>>>>>>>>>>

    If intReferatNr <> RefNrCookie Then
        If IsEmpty(intReferatNr) Then intReferatNr = Null
        resOpdatNyhed ("N_Referat_Ref") = intReferatNr
    Else
        resOpdatNyhed ("N_Referat_Ref") = intReferatNr
    End If
    resOpdatNyhed ("N_Tekst") = Request("tekst")
    resOpdatNyhed.Update

<<<<<<<<<<<KODE SLUT>>>>>>>>>>>
Avatar billede coltau Juniormester
03. april 2002 - 21:39 #4
Jeg har ikke testet det - men ovenstående kode kan kun fejle hvis Request("tekst") er blank.
Avatar billede perstig Nybegynder
07. april 2002 - 11:59 #5
Hey coltau

Det har desværre taget lidt tid at få respondet på dit svar. Jeg har måtte lave en total reinstall på min 'puter.

Jeg fandt løsningen. Dine kommentarer hjalp mig lidt på vej, så hvis du svare skal jeg give dig de point du har fortjent!!
Se koden herunder:

    intNyhedsNr = Request.Cookies("NyhedsCookie")("id")
    intReferatNr = Request("refnr")
        If intReferatNr = "" Then intReferatNr = Null
    boolSendNyhedmail = Request("sendmail")
    RefNrCookie = Request.Cookies("refnr1")

    Set resOpdatNyhed = Server.CreateObject("ADODB.RecordSet")

    sqlOpdatNyhed ="SELECT * FROM xxxxxxx WHERE xxxxxxx= " & intNyhedsNr
    resOpdatNyhed.Open sqlOpdatNyhed, strDSN, adOpenStatic, 3

    resOpdatNyhed ("N_Dato") = Request("dato")
    resOpdatNyhed ("N_Link") = Request("link")
    resOpdatNyhed ("N_Overskrift") = Request("overskrift")
    resOpdatNyhed ("N_Referat_Ref") = intReferatNr
    resOpdatNyhed ("N_Tekst") = Request("tekst")
    resOpdatNyhed.Update
Avatar billede coltau Juniormester
08. april 2002 - 09:37 #6
Jamen så svarer jeg gerne. :-)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester