Avatar billede jesperkh Nybegynder
14. november 2001 - 10:48 Der er 18 kommentarer og
1 løsning

debug /optimmere aspfil

Er der en der kan debug og optimmere denne asp fil ?

<%
domain = Lcase(Request.ServerVariables(\"SERVER_NAME\"))
If left(domain, 4) = \"www.\" Then
    domain = Mid(domain, 5)
End if
Response.Write(\"<html>\")
Response.Write(\"<head>\")
Response.Write(\"<title></title>\")
Response.Write(\"</head>\")
Response.Write(\"<frameset framespacing=\"\"0\"\" border=\"\"0\"\" rows=\"\"0,*\"\" frameborder=\"\"0\"\">\")
Response.Write(\"<frame name=\"\"aboutblank\"\" src=\"\"about:blank\"\" target=\"\"_self\"\" scrolling=\"\"no\"\">\")
If domain = \"cleopatra-pizza.dk\" Then
    id = \"2\"
End if
\'Response.Write(id)
Response.Write(\"<frame name=\"\"headframe\"\" src=\"\"http://www.cleopatra-pizza.dk/pizza2/default.asp?id=\" & id & \"\"\" target=\"\"_self\"\" scrolling=\"\"auto\"\">\")
Response.Write(\"<noframes></noframes>\")
Response.Write(\"</frameset>\")
Response.Write(\"</html>\")
%>
Avatar billede cool_casper Nybegynder
14. november 2001 - 10:51 #1
Hmmm..... Seems pretty good to me!
Avatar billede jesperkh Nybegynder
14. november 2001 - 10:54 #2
hvor vigtig er globel.asa ? skal man bruge den ?
Avatar billede jesperkh Nybegynder
14. november 2001 - 10:55 #3
ups... global.asa
Avatar billede nute Nybegynder
14. november 2001 - 10:56 #4
det er ikke så mye å hverken debugge eller optimere, men du kan jo allikevel skrive koden litt penere:

<%
Dim domain, indOf, id
domain = Lcase(Request.ServerVariables(\"SERVER_NAME\"))
indOf = InStr( domain, \"www.\" )
If( indOf > 0 ) Then
    domain = Mid( domain, indOf + 4)
End if
If domain = \"cleopatra-pizza.dk\" Then
    id = 2
End if
with response
    .Write(\"<html>\")
    .Write(\"<head>\")
    .Write(\"<title></title>\")
    .Write(\"</head>\")
    .Write(\"<frameset framespacing=\"\"0\"\" border=\"\"0\"\" rows=\"\"0,*\"\" frameborder=\"\"0\"\">\")
    .Write(\"<frame name=\"\"aboutblank\"\" src=\"\"about:blank\"\" target=\"\"_self\"\" scrolling=\"\"no\"\">\")
    .Write(\"<frame name=\"\"headframe\"\" src=\"\"http://www.cleopatra-pizza.dk/pizza2/default.asp?id=\" & id & \"\"\" target=\"\"_self\"\" scrolling=\"\"auto\"\">\")
    .Write(\"<noframes></noframes>\")
    .Write(\"</frameset>\")
    .Write(\"</html>\")
end with
%>
Avatar billede jesperkh Nybegynder
14. november 2001 - 10:59 #5
nute: kan du sende den som asp fil på jesperkh@esenet.dk
Avatar billede nute Nybegynder
14. november 2001 - 11:02 #6
kan du ikke bare kopiere all kode fra <% til %> og paste det inn i en fil, som du gemmer med extension .asp, selv ?????
Avatar billede jesperkh Nybegynder
14. november 2001 - 11:07 #7
jeg sidder og prøve på og pilled alle de <BR> ud så det ligner dit
Avatar billede nute Nybegynder
14. november 2001 - 11:09 #8
det er da ingen <br> i min kode ??!!!!
Avatar billede marit Nybegynder
14. november 2001 - 11:10 #9
det ser ud til at du ikke bruger dine frames, når du har en række der er 0, hvis det bare er for at redirecte, så er dette måske bedre?
<%
domain = Lcase(Request.ServerVariables(\"SERVER_NAME\"))
If left(domain, 4) = \"www.\" Then
    domain = Mid(domain, 5)
End if

If domain = \"cleopatra-pizza.dk\" Then
    id = \"2\"
End if

response.redirect \"http://www.cleopatra-pizza.dk/pizza2/default.asp?id=\"& id %>
Avatar billede nute Nybegynder
14. november 2001 - 11:13 #10
marit >> ???? \"det ser ud til at du ikke bruger dine frames, når du har en række der er 0\" ????
Avatar billede marit Nybegynder
14. november 2001 - 11:19 #11
Jeg mener at rows=\"0,*\" må være det samme som en stor række, da første række fylder 0.
Nu ved jeg ikke hvad du vil, men for mig ser det ud til at du vil omdireger brugeren til url\'en. Og så mener jeg at min kode er en optimering.
Avatar billede nute Nybegynder
14. november 2001 - 11:22 #12
nåja....men så kan det jo hende at den første frame blir brukt som en slags ghostframe. det kan hende at filene i den andre frame legger innhold i denne frame til fx printing av dokumenter eller lignende...

/nute
Avatar billede marit Nybegynder
14. november 2001 - 11:30 #13
je, det er rigtigt, et andet eksempel er at man kan blande html og asp.
<%
domain = Lcase(Request.ServerVariables(\"SERVER_NAME\"))
If left(domain, 4) = \"www.\" Then
    domain = Mid(domain, 5)
End if

If domain = \"cleopatra-pizza.dk\" Then
    id = \"2\"
End if
%>
<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">

<html>
<head>
    <title>Untitled</title>

<frameset framespacing=\"0\" border=\"0\" rows=\"0,*\" frameborder=\"0\">
<frame name=\"aboutblank\" src=\"blank.html\" target=\"_self\" scrolling=\"no\">
<frame name=\"headframe\" src=\"http://www.cleopatra-pizza.dk/pizza2/default.asp?id=<%=id%> target=\"_self\" scrolling=\"auto\">
<noframes></noframes>
</frameset>

</head>
<body>

</body>
</html>
Avatar billede jesperkh Nybegynder
14. november 2001 - 11:45 #14
den som den skal kalde er den her...

<%
Response.buffer = True
Response.Expires = -1
Response.AddHeader \"PRAGMA\", \"NO-CACHE\"
%>
<HTML>
<HEAD>
<TITLE>Pizza</TITLE>
</HEAD>
<%
id = Request.QueryString(\"id\")
action = Request.QueryString(\"action\")
If action = \"smallframe\" Then
%>
    <frameset framespacing=\"0\" border=\"0\" rows=\"130,*\" frameborder=\"0\">
    <frame name=\"topframe\" src=\"top.asp?id=<%=id%>&popup=false\" target=\"_self\" scrolling=\"auto\">
    <frame name=\"main\" src=\"bestil1.asp?id=<%=id%>\" target=\"_self\" scrolling=\"auto\">
    <!--<frame name=\"vogn\" src=\"vogn.asp?id=<%=id%>\" target=\"_self\" scrolling=\"no\">-->
    <noframes></noframes>
    </frameset>
<%
Else
%>
    <frameset framespacing=\"0\" border=\"0\" rows=\"130,*, 45\" frameborder=\"0\">
    <frame name=\"topframe\" src=\"top.asp?id=<%=id%>\" target=\"_self\" scrolling=\"auto\">
    <!--<frame name=\"main\" src=\"cookietest.asp?url=<%=Server.URLEncode(\"main.asp?id=\" & id)%>&id=<%=id%>\" target=\"_self\" scrolling=\"auto\">-->
    <frame name=\"main\" src=\"main.asp?id=<%=id%>\" target=\"_self\" scrolling=\"auto\">
    <frame name=\"vogn\" src=\"vogn.asp?id=<%=id%>\" target=\"_self\" scrolling=\"auto\">
    <noframes></noframes>
    </frameset>
<%
End if
%>
</HTML>
Avatar billede jesperkh Nybegynder
14. november 2001 - 11:49 #15
var det nogen hjælp.. jeg har ikke så meget forstand på asp , men en eller anden bug for serven til at gå ned og serv udbyderen siger at det er en fejl i asp programeringen
Avatar billede marit Nybegynder
14. november 2001 - 12:01 #16
Hvis jeg kalder det nye kode fra min side, så virker det. Hvilket kode eksempel har du brugt? Hvilken fejlmeddelse får du?
Avatar billede jesperkh Nybegynder
14. november 2001 - 12:12 #17
Jeg får ikke nogen fejl meddelse, serven går bare ned... og jeg har ikke prøved de eksempler i har lavede... da man ikke bare kan kopier de koder i lægger op her,jeg har prøvet og se om jeg kunne pillede de <BR> og andre htmlkoder man får med, ud men det  lykkedes ikke for mig og gøre det rigtigt (det virker ihvert tilfælde ikke :( ... så jeg bliver nødtil og bede om at du sender koden som en vedhæftet asp fil på jesperkh@esenet.dk
Avatar billede nute Nybegynder
14. november 2001 - 12:38 #18
jesperkh >> hvis du har problemer med at din editor lager ekstra kode (noe som \"jeg-kan-alt-men-er-allikevel-unyttig editorer\" som dreamweaver og andre lignende gjør, så skal du bare dumpe teksten over i rent tekstformat først. Gjør flgende:

1) kopier teksten
2) åpne notepad
3) paste inn teksten
4) marker alt og kopier
5) paste inn i dreamweaver

så slipper du for all unødig kode...

/nute
Avatar billede marit Nybegynder
14. november 2001 - 12:52 #19
det var så lidt!
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