Avatar billede thomas_b Nybegynder
18. maj 2005 - 21:33 Der er 13 kommentarer og
1 løsning

Fejl: Name redefined

Hej Eksperter...
Vil i ikke hjælpe mig med dette...:

Jeg for en fejl når jeg sætter min side op på internettet...:
-------------------------------------------------
Microsoft VBScript compilation error '800a0411'

Name redefined

afstemning/default.asp, line 22

Dim Valg(5)
----^
-------------------------------------------------
Min kode i den fil ser således ud...:
-------------------------------------------------
<%
  Set RsVote = Server.CreateObject("ADODB.Connection")
  DBPath = "DBQ=" & server.mappath("going_05.mdb")
  RsVote.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath

  Sql = "select * from poll_navn ORDER BY dato DESC"
  Set Record =  RsVote.Execute(Sql)

id = Record("id")

  If Not Record.EOF then
    If (Len(Request.Cookies("stem")(CSTR(id)))) then
      Dim Valg(5)
      valg(1) = Record("valg1")
      valg(2) = Record("valg2")
      valg(3) = Record("valg3")
      valg(4) = Record("valg4")
      valg(5) = Record("valg5")
%>
-------------------------------------------------
Dette script virker fint når der kun er den ene, men hvis ´jeg har 2 laver den denne fejl...
Avatar billede busschou Praktikant
18. maj 2005 - 21:35 #1
Du må ikke have to variable som hedder det samme
Enten skal de hedde noget forskelligt eller også skal du erklære den sidste med
ReDim
Avatar billede busschou Praktikant
18. maj 2005 - 21:37 #2
Jeg kan ikke se at du har to Dim Valg() ? Men det må du have?
Avatar billede thomas_b Nybegynder
18. maj 2005 - 21:45 #3
Hvis jeg bare kalder den Valg1(5) i stedet komme den med denne fejl i en helt anden fil...:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x420 Thread 0x494 DBC 0x3685a44 Jet'.
----------------------
Men kan jeg ikke bare undvære den og lave lidt om scriptet ??? - hvad gør den overhoved...?
Avatar billede busschou Praktikant
18. maj 2005 - 21:49 #4
Jamen den bliver jo nok brugt et sted. Svært at sige hvad den bliver brugt til præcis med den kodestump.
Den originale fejl får du fordi du et sted i koden har
Dim Valg(5)
og et andet sted har
Dim Valg(x)
Hvor x er et eller andet tal
Det er svært at sige hvad du skal gøre når mann ikke ved hvad de hver især bruges til
Det nemmeste er nok at lave
Dim Valg(5)
om til
ReDim Valg(5)
og se om det virker i første omgang
Avatar billede thomas_b Nybegynder
18. maj 2005 - 21:50 #5
Den virker ikke hvis kun jeg laver den ene om, men skal jeg lave ReDim ved begge 2 ???
Avatar billede busschou Praktikant
18. maj 2005 - 21:53 #6
Nej Nej
Dim bruges når du definerer dit array første gang
Redim bruges hvis du har brug for at definere det igen
Fx
Dim test(5)
Nu finder du ud af at fem pladser ikke er nok så derfor laver du
ReDim test(10)
Sådan :o)
Avatar billede busschou Praktikant
18. maj 2005 - 21:56 #7
Men samtidig så kommer fejlen kun fordi du et og andet sted på en af dine sider har en
"Option Explicit" erklæring
Den erklæring gør at du får sådan en fejl. Og fejlen er kun til programmørens hjælp så man ikke kommer til at stave navne forkert eller erklære samme variabel to gange som i dit tilfælde

Det mest optimale er at du finder den anden erklæring og finder ud af hvilken som "er forkert" og retter til i scriptet
Avatar billede thomas_b Nybegynder
18. maj 2005 - 22:04 #8
Men hvad betyder dette:
[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x420 Thread 0x670 DBC 0xaf0a074 Jet'.
Avatar billede busschou Praktikant
18. maj 2005 - 22:06 #9
Ja det er jo en database fejl af en art (meget klogt sagt)..hmm men hvilken
Avatar billede busschou Praktikant
18. maj 2005 - 22:09 #10
Det kunne måske være fordi du ikke har adgang til mappen hvor databasen ligger i
Avatar billede thomas_b Nybegynder
18. maj 2005 - 22:23 #11
Jeg roder lige lidt med det...
Det kan være jeg skriver lidt tilbage, efter hjælp... :)
Hvis det er iorden...
Avatar billede thomas_b Nybegynder
19. maj 2005 - 19:36 #12
Hvorfor siger den dette nu ???
---------------------------
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
default.asp, line 62
---------------------------
og linie 62 er anden gang denne linie er der...: Set Record =  RsVote.Execute(Sql)
---------------------------
<%
Sql = "Select count(*) as Found from poll_result where voteid="& ID
Set Record =  RsVote.Execute(Sql)
Ialt = Record("found")

If Valg1 <> "" then

Sql = "Select count(*) as poster_find from poll_result where voteid="& ID &" AND vote="& Valg1
Set Record =  RsVote.Execute(Sql)
Procent = 100/Ialt * Record("poster_find")

%>
Avatar billede thomas_b Nybegynder
19. maj 2005 - 19:57 #13
Vi fortsætter i et nyt smg....: http://www.eksperten.dk/spm/619100
Du er meget vilkommen til at fortsætte på den...
Hvis du ikke svare tager jeg point fra dette smg.
Men du har jo også chancen på det nye smg...
Avatar billede busschou Praktikant
20. maj 2005 - 00:20 #14
tja hvis du siger det
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