Avatar billede mskjoldp Novice
10. oktober 2007 - 22:33 Der er 12 kommentarer og
1 løsning

form update med for next funktion

Hey E

IIS5.0, IE7.0, ASP3.0, access2000

hvorfor kan jeg ikke få denne kode til at virke?

if request.ServerVariables("REQUEST_METHOD") = "post" then
    response.Write("test")
else ' post %>
    <form action="default.asp?mode=flyvisupdate" method="post" name="updateall">
<%    hvilken = "3;5;8;9;11;13;14;15;"
    hvilken = Split(hvilken,";")
    for i = 0 to ubound(hvilken) - 1
        strSQL = "SELECT * FROM EH101_status WHERE aircraft_id="&hvilken(i)
        rs_custom strSQL,3,""  'start db
        for each x in rs.fields
            if x.name <> "aircraft_id" then
                editAircraft = editAircraft & (x.value) & ";"
                DBName = DBName & (x.name) & ";"
            end if
        next
        rs_end()

        editAircraft = Split(editAircraft,";")
        DBName = Split(DBName,";")%>

<input class="input" type="text" value="<%=editAircraft(0)%>" style="width:88px;">
<br>
<%next%>
<input type="submit" style="position:absolute; top:30px; left:50px;">
<%
end if ' post
end if ' mode %>

fejlen er : Type mismatch

i linjen: editAircraft = editAircraft & (x.value) & ";"

hvad mangler jeg ?
Avatar billede nielle Nybegynder
10. oktober 2007 - 23:02 #1
Skal det ikke være:

for each x in rs_custom.fields

i stedet for:

for each x in rs.fields

Det hedder den jo i hvert fald når du udtrækker fra databasen...

Desuden bør du initisere "editAircraft" og "DBName" *før* at du begynder at lægge noget til dem inde i ForEach løkken.
Avatar billede jhe-ting Nybegynder
10. oktober 2007 - 23:22 #2
som nielle skriver: Initialisér dine variable - d.v.s. start koden med:

  Dim editAircraft
  Dim DBName

  editAircraft = ""
  DBName = ""


;)
Avatar billede jhe-ting Nybegynder
10. oktober 2007 - 23:28 #3
og - ja - ret 'for' løkken så den ser ud som nielle striver:

  For Each x In rs_custom.fields


desuden tror jeg du skal rette

  rs_end()

til:

  rs_custom.end

;)
Avatar billede mskjoldp Novice
12. oktober 2007 - 19:39 #4
hey

denne kode virker fint. Den er designet til at se sådan ud.

        strSQL = "SELECT * FROM EH101_status WHERE aircraft_id="&hvilken(i)
        rs_custom strSQL,3,""  'start db
        for each x in rs.fields
            if x.name <> "aircraft_id" then
                editAircraft = editAircraft & (x.value) & ";"
                DBName = DBName & (x.name) & ";"
            end if
        next
        rs_end()

rs_custom er en funktion der trækker db indholdet
rs_end() er en funktion der lukker forbindelsen

de virker begge to fint

mit spørgsmål går på hvordan jeg kan løbe gennem arrayet:
hvilken = "3;5;8;9;11;13;14;15;"
med en for next løkke

formålet er at lave arrays for hvert tal i hvilken
Avatar billede jhe-ting Nybegynder
12. oktober 2007 - 22:48 #5
Når du skriver at du får beskeden:

  Type mismatch
  i linjen: editAircraft = editAircraft & (x.value) & ";"

  hvad mangler jeg ?

så ér det fordi editAircraft ikke har nogen værdi første gang løkken kører.

Har du prøvet nielles forslag som jeg uddybede i:
  http://www.eksperten.dk/spm/800456#rid6895526

???
Avatar billede nielle Nybegynder
16. oktober 2007 - 08:53 #6
Har du fået det til at virke?
Avatar billede jhe-ting Nybegynder
17. oktober 2007 - 01:07 #7
Mangler der et mellemrum her?

        strSQL = "SELECT * FROM EH101_status WHERE aircraft_id="&hvilken(i)

- så det skulle være:

        strSQL = "SELECT * FROM EH101_status WHERE aircraft_id=" & hvilken(i)

? ;O)
Avatar billede nielle Nybegynder
17. oktober 2007 - 07:35 #8
Det har absolut ingen som helst indflydelse.

Personligt synes jeg dog at den nederste er den som er pænest og nemmeste at læse. :^)
Avatar billede nielle Nybegynder
29. oktober 2007 - 18:26 #9
mskjoldp, har du fået kigget på det?
Avatar billede nielle Nybegynder
06. november 2007 - 17:18 #10
Hvad med noget respons?
Avatar billede mskjoldp Novice
20. november 2007 - 01:49 #11
sry all

er ophængt max for tiden

jeg vender tilbage
Avatar billede nielle Nybegynder
17. december 2007 - 18:19 #12
Venter spændt ...
Avatar billede mskjoldp Novice
15. februar 2009 - 10:51 #13
mon ikke det er på tid at lukke denne tråd :)
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