Avatar billede jsl Nybegynder
24. marts 2002 - 21:55 Der er 4 kommentarer og
1 løsning

headerfejl-haster

Det her script tilføjer time til en db, og skal vende tilbage til den forgående side samt åbne en ny i et nyt vindue. Når jeg indsætter window.open, som skal åbne den nye side, så melder scriptet "headerfejl". window.open virker ikke, hvis den står sidst.
Hjælp!!!

<script>window.open("<%=minside%>")</script>

<!--#include file="adovbs.inc"-->
<%
Dim objConn, objRS, strConn, DSNName, a
Set objConn = Server.CreateObject("ADODB.Connection")
Set objRS = Server.CreateObject("ADODB.Recordset")
DSNName = "DRIVER=Microsoft Access Driver (*.mdb);DBQ="
DSNName = DSNName & Server.MapPath("mdsfdbx.mdb")
ObjConn.Open DSNName

If (Request.ServerVariables("CONTENT_LENGTH") > 0) Then

objRS.CursorLocation = adUseServer
objRS.CursorType = adOpenKeyset
objRS.LockType = adLockOptimistic
objRS.Open "banner", objconn, , , adCmdTable
       
    objRS.AddNew
    objRS("Dato") = Date

        objRS.Update
        objRS.Close

End If

response.redirect(request.servervariables("HTTP_REFERER"))
%>
Avatar billede netsrac Praktikant
24. marts 2002 - 21:58 #1
Sæt lige
<%
Response.buffer = True
%>

aller øverst i din ASP fil.
Avatar billede jsl Nybegynder
24. marts 2002 - 22:42 #2
Nu har jeg indsat response.buffer = true.
Det forhindre godt nok en fejl, men <script>window.open("<%=minside%>")</script> bliver IKKE afviklet.
Hvad er der galt?
Avatar billede netsrac Praktikant
24. marts 2002 - 22:59 #3
Det bliver ikke afviklet fordi du kører Response.redirect() så vil den jo aldrig vise en side, så skal du gøre det sådan her istedet:

<!--#include file="adovbs.inc"-->
<%
Dim objConn, objRS, strConn, DSNName, a
Set objConn = Server.CreateObject("ADODB.Connection")
Set objRS = Server.CreateObject("ADODB.Recordset")
DSNName = "DRIVER=Microsoft Access Driver (*.mdb);DBQ="
DSNName = DSNName & Server.MapPath("mdsfdbx.mdb")
ObjConn.Open DSNName

If (Request.ServerVariables("CONTENT_LENGTH") > 0) Then

objRS.CursorLocation = adUseServer
objRS.CursorType = adOpenKeyset
objRS.LockType = adLockOptimistic
objRS.Open "banner", objconn, , , adCmdTable
       
    objRS.AddNew
    objRS("Dato") = Date

        objRS.Update
        objRS.Close

End If
%>
<script>
window.open("<%=minside%>");
location.href = '<%=request.servervariables("HTTP_REFERER")%>';
</script>
Avatar billede jsl Nybegynder
25. marts 2002 - 10:08 #4
Nu virker det sku.
Avatar billede netsrac Praktikant
25. marts 2002 - 13:38 #5
:-)
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