Just nu i M3-nätverket
Gå till innehåll
Inkan

Pop up fönster i ASP-kod

Rekommendera Poster

Prövade

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

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

 

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser

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>"

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

 

 

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser

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!!!

 

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser

"" 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!!!

 

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser

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

 

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser

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.

 

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser

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>

 

 

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser

Skapa ett konto eller logga in för att kommentera

Du måste vara medlem för att kunna kommentera

Skapa ett konto

Skapa ett nytt konto på vårt forum. Det är lätt!

Registrera ett nytt konto

Logga in

Redan medlem? Logga in här.

Logga in nu



×
×
  • Skapa nytt...