Just nu i M3-nätverket
Gå till innehåll
Eforum är stängt för nya inlägg och svar sedan 20 juni 2022. Klicka för att läsa vad som hände och om alternativ.

Pop up fönster i ASP-kod

Inkan

Startad av Inkan,
i Webbutveckling

Rekommendera Poster

Inkan

Inkan

Postad
  • Trådskapare
Postad

Prövade

"<a href=""javascript:popUp('lank1')"">"

Men då får jag meddelandet att ett objekt förväntas

 

Länk till kommentar
Dela på andra webbplatser
  • Svars 58
  • Skapad
  • Senaste svar
Inkan

Inkan

Postad
  • Trådskapare
Postad

Här är hela felmeddelandet på koden

 

Response.Write"<a href='javascript:popUp(\""
Response.Write"lank1"
Response.Write"\")'>"

 

 

Kompileringsfel i Microsoft VBScript fel '800a0409'

 

Oavslutad strängkonstant

 

/sida4.asp, rad 62

 

Response.Write"Response.Write"<td>"

-----------------------------------^

 

 

Länk till kommentar
Dela på andra webbplatser
Rickard Liljeberg

Rickard Liljeberg

Postad
Postad

står det så här i din kod nånstanns

 

Response.Write"Response.Write"<td>" ??

det skall ju bara vara

Response.Write"<td>"

 

Länk till kommentar
Dela på andra webbplatser
Magnus Gladh

Magnus Gladh

Postad
Postad

Jag testade min kod.

Response.Write"<a href=""javascript:popUp('lank1')"">Öppna fönster</a>"

 

Och det fungerade hur bra som helst. Alltså kan ditt fel inte ligga där.

 

- Magnus

-----------------------------------------------------

Ropen skalla, BBB (eller BOSTREAM) åt alla!!!

 

Länk till kommentar
Dela på andra webbplatser
Magnus Gladh

Magnus Gladh

Postad
Postad

"" gör att man skriver ut ett " om man kan skriva \" som i mer "riktigt" programmeringspråk vet jag faktiskt inte, har aldrig provat.

 

'' ger dig INTE ett ' utan två.

 

- Magnus

-----------------------------------------------------

Ropen skalla, BBB (eller BOSTREAM) åt alla!!!

 

Länk till kommentar
Dela på andra webbplatser
Inkan

Inkan

Postad
  • Trådskapare
Postad

Ja, ungefär. "" skiljer vbscript från vanlig html kod. Man börjar alltså med " skriver html-kod här och avslutar med ".

 

Länk till kommentar
Dela på andra webbplatser
Inkan

Inkan

Postad
  • Trådskapare
Postad

Själva popupen fungerar, men det blir hela tiden en och samma sida som öppnas. Jag har lagt in tre olika sidor i databasen och meningen är att varje länk ska öppna var och en. Tänkte om det skulle kunna fungera med att lägga in länken i en vektor och öppna sidan med For Each ...Next.

 

Länk till kommentar
Dela på andra webbplatser
  • 1 month later...
Inkan

Inkan

Postad
  • Trådskapare
Postad

Tjenix!!!!

Har nu löst hela problemet som vi dryftat ett antal gånger. Här lyckats lösa hela problematiken med nedanstående kod. Och den fungerar. Tänkte att det kunde vara intressant att veta......

 

 

<html>

<head>
<title></title>
<meta name="GENERATOR" content="Arachnophilia 4.0">
<meta name="FORMATTER" content="Arachnophilia 4.0">
<SCRIPT LANGUAGE="JavaScript">

<!--

//-->
</script>
</head>

<body bgcolor="#cccccc" text="#000000" marginheight="0" marginwidth="0" topmargin="0" leftmargin="0">
<!------>
<%
Dim objConn, sql,id
Set objConn=Server.CreateObject("ADODB.Connection")

objConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/databas.mdb")

'Hämta värden från tabellen Kunder och sortera
Dim objRS
Set objRS=Server.CreateObject("ADODB.Recordset")
sql="SELECT * FROM Tabell"
objRS.Open sql, objConn

%>

<%
'Kör så länge det finns värden i posterna
Do While Not objRS.EOF
%>

<script language="JavaScript">
<!--Funktion hämtar värden från tabellen --->

function popUp<%=objRS("lankid")%>(){
window.open('<%=objRS("pop")%>.html','theForm','scrollbars,resizable,height=550,width=600,top=50,left=50');
}
//-->
</script>
<font family="verdana" size="2">

<%
'Värden hämtas från funktionen
Response.Write"<a href='javascript:popUp"&objRS("lankid")&"()'><pre><div class='tunn'>"&objRS("lank")&"</a> " &objRS("text")
Response.Write"</div></pre"
Response.Write"<td><img src='clear.gif' width='400' height='1'"

objRS.MoveNext
Loop

objRS.Close 'Recordset stängs
Set objRS=Nothing 'Recordset töms

objConn.Close 'Databasen stängs
Set objConn=nothing 'Databasen töms
%>
</body>
</html>

 

 

Länk till kommentar
Dela på andra webbplatser

Arkiverat

Det här ämnet är nu arkiverat och är stängt för ytterligare svar.

Gå till ämneslista


×
×
  • Skapa nytt...