Vise billede mens .asp koden udføres?

Tja du kan da bare ligge en løkke ind der løber fra 1 til 10000 ?

<%
for i = 1 to 10000000
next
Dim SponsorId, YourId, FirstName, LastName, StreetName, StreetNumber, _
City, PostalCode, Country, State, Email, RetypeEmail, Gender, Age, BirthYear, Fejl, Fejl1

Hmmm preloaden funger ikke??

Ved du hvordan man preloader et billede mens asp koden udføres?

Nope..

Hmmmmmm har surfet en del for at finde noget men det er ikke rigtigt lykkes :-(

Findes der ikke en funktion som læser en asp kode først og smider noget html i hovedet på, for derefter at fortsætte scriptet?

Du kan jo evt. bruge en preloader funktion ?
http://www.bratta.com/dhtml/scripts.asp?url=scripts/scripts.asp?id=26&ac=5&order=created

Hmmmmmmm det så ellers lige så godt ud, men den vil ikke smide noget op får den har læst alt koden, og så er det forsent :-(

Har du <%response.buffer = true %> i toppen af siden ? Hvis du har er det derfor, eksperten bruger jo også en sådan preload funktion...

Nej der er intet response.buffer på siden, når jeg disabler al koden virker det fint.

se koden (asp\'en er disablet på denne, og jeg har prøvet at flytte rundt på tagsene) :

<html>
<head>
    <title>Cross-browser Dynamic HTML Scripts - Loading....</title>
<style type=\"text/css\">
#divLoadCont{position:absolute; width:100%; height:98%; top:0; left:0; background-color:white; layer-background-color:white; font-family:arial,helvetica; z-index:100}
</style>
<script type=\"text/javascript\" language=\"JavaScript\">
/********************************************************************************
Copyright (C) 1999 Thomas Brattli
This script is made by and copyrighted to Thomas Brattli at www.bratta.com
Visit for more great scripts. This may be used freely as long as this msg is intact!
I will also appriciate any links you could give me.
********************************************************************************/
//Default browsercheck, added to all scripts!
function checkBrowser(){
    this.ver=navigator.appVersion
    this.dom=document.getElementById?1:0
    this.ie5=(this.ver.indexOf(\"MSIE 5\")>-1 && this.dom)?1:0;
    this.ie4=(document.all && !this.dom)?1:0;
    this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0;
    this.ns4=(document.layers && !this.dom)?1:0;
    this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5)
    return this
}
bw=new checkBrowser()
//Hides the div
function hideIt(div){
    if(bw.bw){
        div=\"divLoadCont\"
        obj=bw.dom?document.getElementById(div).style:bw.ie4?document.all[div].style:bw.ns4?document[div]:0;
        obj.visibility=\'hidden\'
    }
}
onload=hideIt;
</script>
</HEAD>
<BODY bgcolor=\"White\">
    <script>
    //We write the table and the div to hide the content out, so older browsers won\'t see it
    if(bw.bw) document.write(\'<div id=\"divLoadCont\"><table width=\"100%\" height=\"95%\" align=\"center\" valign=\"middle\"><tr><td width=\"100%\" height=\"100%\" align=\"center\" valign=\"middle\"><h3>We are now processing your information.......please wait.</h3></td></tr></table></div>\')
    </script>
</BODY>
</HTML>

for i = 1 to 10000000
next

Dim SponsorId, YourId, FirstName, LastName, StreetName, StreetNumber, _
City, PostalCode, Country, State, Email, RetypeEmail, Gender, Age, BirthYear, Fejl, Fejl1
SponsorId = Request.Querystring(\"SponsorId\")
YourId = Request.Querystring(\"YourId\")
FirstName = Request.Querystring(\"FirstName\")
LastName = Request.QueryString(\"Lastname\")
StreetName = Request.Querystring(\"StreetName\")
StreetNumber = Request.Querystring(\"StreetNumber\")
City = Request.Querystring(\"City\")
PostalCode = Request.Querystring(\"PostalCode\")
Country = Request.Querystring(\"Country\")
State = Request.Querystring(\"State\")
Email = Request.Querystring(\"Email\")
RetypeEmail = Request.Querystring(\"RetypeEmail\")
Gender = Request.Querystring(\"Gender\")
Age = Request.Querystring(\"Age\")
BirthYear = Request.Querystring(\"BirthYear\")
Fejl = (\"0\")
Fejl1= (\"0\")



\'Her tjekkes om YourId er udfyldt
If YourId = (\"\") Then
  FejlYourId = \"T\"
  Fejl = Fejl + 1
End If

\'Her tjekkes om YourId allerede findes i databasen
Set Conn = Server.CreateObject(\"ADODB.Connection\")
  Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=D:\\home\\formordk\\db\\member.mdb\"
  Set RS = conn.Execute (\"SELECT MedlemsIdNr From MedlemsInfo WHERE MedlemsIdNr =\'\" & YourId & \"\'\")
 
    if not rs.eof Then
      FejlYourIdInDb = \"T\"
      Fejl1 = Fejl1 + 1
    End If   

\'Her tjekkes FirstName
If FirstName = (\"\") Then
  FejlFirstname =\"T\"
  Fejl = Fejl  + 1
End If

\'Her tjekkes LastName
If LastName= (\"\") Then
  FejlLastName =\"T\"
  Fejl = Fejl + 1
End If

\'Her tjekkes StreetName
If StreetName= (\"\") Then
  FejlStreetName =\"T\"
  Fejl = Fejl + 1
End If

\'Her tjekkes StreetNumber
If StreetNumber= (\"\") Then
  FejlStreetNumber =\"T\"
  Fejl = Fejl + 1
End If

\'Her tjekkes City
If City= (\"\") Then
  FejlCity =\"T\"
  Fejl = Fejl + 1
End If

\'Her tjekkes PostalCode
If PostalCode= (\"\") Then
  FejlPostalCode =\"T\"
  Fejl = Fejl + 1
End If

\'Her tjekkes Country
If Country= (\"\") Then
  FejlCountry =\"T\"
  Fejl = Fejl + 1
End If

\'Her tjekkes Email
If Email= (\"\") Then
  FejlEmail =\"T\"
  Fejl = Fejl + 1
End If

\'Her tjekkes RetypeEmail
If RetypeEmail= (\"\") Then
  FejlRetypeEmail =\"T\"
  Fejl = Fejl + 1
End If

\'Her tjekkes om Email og RetypeEmail er ens
If Email <> RetypeEmail Then
  FejlEmailIkkeIdentisk =\"T\"
  Fejl = Fejl + 1
End If

\'Vi er nu færdige med at tjekke formen, og tjekker nu om Fejl er lig med 0
If Fejl > 0 Or Fejl1 >0 then
  \'Hvis fejl er større end 0 så sender vi dem tilbage til formen
  Response.Redirect \"new_member_sign_up.asp?Fejl=\" & Fejl & _
  \"&FejlYourId=\" & FejlYourId & _
  \"&Fejl1=\" & Fejl1 & _
  \"&FejlYourIdInDb=\" & FejlYourIdInDb & _
  \"&FejlFirstName=\"& FejlFirstName & _
  \"&FejlLastName=\" & FejlLastName & _
  \"&FejlStreetName=\" & FejlStreetName & _
  \"&FejlStreetNumber=\" & FejlStreetNumber & _
  \"&FejlCity=\" & FejlCity & _
  \"&FejlPostalCode=\" & FejlPostalCode & _
  \"&FejlCountry=\" & FejlCountry & _
  \"&FejlEmail=\" & FejlEmail & _
  \"&FejlRetypeEmail=\" & FejlRetypeEmail & _
  \"&FejlEmailIkkeIdentisk=\" & FejlEmailIkkeIdentisk & _
  \"&SponsorId=\" & SponsorId & _
  \"&YourId=\" & YourId & _
  \"&FirstName=\" & FirstName & _
  \"&LastName=\" & LastName & _
  \"&StreetName=\" & StreetName & _
  \"&StreetNumber=\" & StreetNumber & _
  \"&City=\" & City & _
  \"&PostalCode=\" & PostalCode & _
  \"&Country=\" & Country & _
  \"&State=\" & State & _
  \"&Email=\" & Email & _
  \"&RetypeEmail=\" & RetypeEmail & _
  \"&Gender=\" & Gender & _
  \"&Age=\" & Age & _
  \"&Birthyear=\" & Birthyear

else

  \'Hvis den kommer hertil så er der ingen fejl i formen, og vi sender videre til Database siden
  response.redirect \"confirm_your_info.asp?SponsorId=\" & SponsorId & _
  \"&YourId=\" & YourId & _
  \"&FirstName=\" & FirstName & _
  \"&LastName=\" & LastName & _
  \"&StreetName=\" & StreetName & _
  \"&StreetNumber=\" & StreetNumber & _
  \"&City=\" & City & _
  \"&PostalCode=\" & PostalCode & _
  \"&Country=\" & Country & _
  \"&State=\" & State & _
  \"&Email=\" & Email & _
  \"&RetypeEmail=\" & RetypeEmail & _
  \"&Gender=\" & Gender & _
  \"&Age=\" & Age & _
  \"&Birthyear=\" & Birthyear
end if

Prøv at flytte din
</BODY>
</HTML>

til efter asp koden..

Det har jeg prøvet men det funger ikke, den kører tydeligt

for i = 1 to 10000000
next

men den kommer ikke med preload billedet. :-(

Okay så prøver vi noget andet, læg dette i en fil som du peger søgemaskinen på, i din form action.

<HTML>
<HEAD>
</HEAD>
<BODY ONLOAD=\"location.href=\'search.asp?<%=request.servervariables(\"QUERY_STRING\") %>\';\">
Siden loades...
<IFRAME SRC=\"search.asp?<%=request.servervariables(\"QUERY_STRING\") %>\" WIDTH=\"0\" HEIGHT=\"0\"><ILAYER SRC=\"search.asp?<%=request.servervariables(\"QUERY_STRING\") %> WIDTH=\"0\" HEIGHT=\"0\"></ILAYER></IFRAME>
</BODY>
</HTML>

search.asp indeholder så dit søgescript.

<HTML>
<HEAD>
</HEAD>
<BODY ONLOAD=\"location.href=\'search.asp?<%=request.servervariables(\"QUERY_STRING\") %>\';\">
Siden loades...
<IFRAME SRC=\"search.asp?<%=request.servervariables(\"QUERY_STRING\") %>\" WIDTH=\"0\" HEIGHT=\"0\"><ILAYER SRC=\"search.asp?<%=request.servervariables(\"QUERY_STRING\") %>\" WIDTH=\"0\" HEIGHT=\"0\"></ILAYER></IFRAME>
</BODY>
</HTML>

2 møre bøffer og et halvt kilo fløde kartofler senere :-)

IFRAME ... er det ikke kun IE der kan se det?

Jo men derfor bruges ILAYER så NS også kan være med :-)

http://bo-johansen.adsl.dk/formtest/new_member/new_member_sign_up1.asp

Så løkkedes det endelig...........mit site hos azero crashede åbenbart så jeg måtte lige over på egen server.

Nu laver For
for i = 1 to 10000000
next

rimeligt ged i serveren men det kan da ses.

Du får de sølle 30 points og mange tak for hjælpen.

Men jeg søger nu alligevel videre efter en server side løsning :-) det må da kunne lade sig gøre.........jeg er stædig :-)

Det var så lidt :-) At finde en server side løsning tvivler jeg på.

Hvor gamle browsere understøtter egentligt IFrame-Ilayer??

Hvis nu gamle browsere ikke kan fortolke det så må jeg jo nok hellere lige lægge en Browser tjekker ind på Form siden og diregere uden om Iframe-Ilayer siden!!

IE 4 = IFRAME
NS 4 = ILAYER
NS 6 = IFRAME

Oki, takker.

Jeg må lige have sådan en redirecter skruet sammen en af dagene.

Response.flush.............

siger det dig noget i denne sammenhængende????? Man skulle kunne kunne bryde en side op i flere stykker med denne kommando, men jeg døjer med at finde noget support på dette emne.

nogen ider?

måske i sammenhæng med buffer?

http://www.asp.dk/docs/asp/good/iishelp/iis/htm/asp/introbj_74tk.htm

Kig her engang netscrac

http://www.eksperten.dk/spm/59351