Turvenn.no
Webutvikler kurs ASP.NET, C#, CSS mm.

WebRessurs.no - Webprogrammering og ressurs innen ASP, ASP.NET, PHP, SQL, HTML, CSS, Javascript, XML, C#, VB, Flash  mm.

Brukernavn: 
Passord:

Registrèr deg Glemt passord?
Logg deg inn




  ASP.net (199)
  ASP 3.0 (111)
  PHP (30)
  HTML (66)
  SQL (89)
  CSS (46)
  XML (7)
  JavaScript (78)
  Diverse kode (13)


  Programmering (22)
  System og drift (15)
  Trafikk og inntekt (11)
  Guider og tips (22)
  Nyttig lesestoff (23)
  Web forum (604)
  Link galleri (565)


  ASP.NET kurs(5)
  CSS kurs (2)
  JQuery kurs (2)


  Øk trafikken (8)
  Facebook App. (4)
  Microsoft CEO (6)


  Server & web
  Internett & epost
  Systemverktøy
  Sikkerhet
  Fildeling
  Lyd & media
  Diverse software


  Domenesalg
  Metagenerator
  Websikre farger
  WebMail


  Bli medlem!
  Siste innlegg
  Gjestebok
  Tips en venn
  Kontakt oss
  Forsiden




Kode Artikler
Linker


Mål internetthastigheten din.


Bruk av Execute og Eval funksjonene i ASP

av Øyvind A. Isaksen
 
Koden under er et eksempel på hvordan man kan repitere en handling 20 ganger vhja av en løkke, Execute og Eval. Her opprettes variabler dynamisk utifra løkkens sekvens, SQL setninger genereres dynamisk for senere å bli utført. Det blir også foretatt validering for hver gang løkken går.

Eksempelet viser hvordan 20 bilder (path) kan lagres i en database utifra om de ligger lagret i tilhørende session variabler.




'**********Lagrer bilder for artikkel**********
For X = 1 To 20

Execute("varImage_" & X & " = Session(""image_" & X & """)")
Execute("varTextImage" & X & " = Request.Form(""txtImage" & X & """)")
Execute("varTextImage" & X & " = replace(varTextImage" & X & ",""'"",""'"")")

If Eval("varImage_" & X & " <> """" ") Then
SQL_X = "insert into tblImage (path,sort,artID,custID,text) values ('" & Eval("varImage_" & X) & "','" & X & "','" & dbArtID & "','"&varCustID&"','" & Eval("varTextImage" & X) & "');"
SQL_SaveImgs = SQL_SaveImgs & SQL_X
end if

Next

For X = 1 To 20
Execute("varTest = varTest & varImage_" & X & "")
Next

if varTest <> "" then 'lagre hvis bilder
call ConnObj(SQL_SaveImgs)
end if


For X = 1 To 20
Execute("Session(""image_" & X & """) = """"")
Next


'**********Lagrer bilder for artikkel**********

WebRessurs.no anbefaler:    StackOverflow.com | Experts-Exchange.com | W3schools | ASP.NET | Codeproject | 4Guys
WebRessurs.no er utviklet og drives av SoftMaker
Sett som startside: [ ]. Bokmerk denne siden: [ klikk ]. Sitemap. http://twitter.com/webressurs_no/. Antall brukersesjoner: 14065233.
Copyright WebRessurs.no © 2003 - 2018
Jobbsøk.no - Jobbsøknad, CV, intervju, tips og lenker