Hjælp til popup

Vil du have en popup, hvis man klikker på billedet ?-)

ja

og hvis det er muligt skal den åbne i størrelsen 100% i både højde og bredde og der skal kun være remmen ikke noget med toolbar,location,status,scrollbars o.s.v

Response.Write ("<img src='" & rs("Filsti") & "' width='100' height='100' onclick=""window.open('ditFilNavn.html','klikBillede','width='+screen.availWidth+',height='+screen.availHeight+',top=0,left=0,status=no')""></a>")

Jeg ved ikke lige hvad der går galt når jeg vil overføre id´en til popup´en. Den viser ikke nogen fejl eller noget, men overføre vist fint.

<!--#include virtual="connection.asp" -->
<%
OpenDatabase
strSQL = "Select * From keywords Where kw_ID = "&Request.Querystring("id")&""
Set rs = Conn.Execute(strSQL)

If (Not RS.BOF) And (Not RS.EOF) Then
  RS.MoveFirst
        While Not RS.EOF
           
                    Width = Rs("Width")
                    If Int(Width) >= 100 Then
                        FixWidth = 100
                    Else
                        FixWidth = Width
                    End if
                   
                Percent = FixWidth/Width
                FixHeight = int(rs("Height")*Percent)

                    Response.Write ("<img src='" & rs("Filsti") & "' width='100' height='100' onclick=""window.open('images.asp?id=" & rs("kw_ID") & "','klikBillede','width='+screen.availWidth+',height='+screen.availHeight+',top=0,left=0,status=no')""></a>")
                    RS.MoveNext
  Wend
    Else
        Response.Write "Beklager - Men er er ikke noget billedet til denne vare. <br />"
    End If

CloseDatabase

%>


visning af billedet:


<!--#include virtual="connection.asp" -->
<%
OpenDatabase
strSQL = "Select * From keywords Where kw_ID = "&Request.Querystring("kw_ID")&""
Set rs = Conn.Execute(strSQL)

        While Not RS.EOF
           
                    Response.Write ("<img src='" & rs("Filsti") & "' </a>")
                    RS.MoveNext
  Wend
    Else
        Response.Write "Beklager - Men er er ikke noget billedet til denne vare. <br />"
    End If

CloseDatabase

%>

nu har jeg fået løst problemet og det bliver vist fint. det jeg mente med størrelsen på rammen var at om det var muligt at lave det så rammen tilpasset sig billedets størrelse.og ikke bare fuld skærm

À la dette:

http://roenving.users.whitehat.dk/WD1ResizeTilBillede.html ?-)

jepper, lige sådanne

hvorfor kommer der ikke nogen hånd når musen føres over billedet?

Hvorhenne ?-)

Hvis du vil have det ovenpå et billede uden at sætte a-tags rundt om, skal du tilføje:

style="cursor:hand;cursor:pointer;" inde i tagget !o]

(og cursor:hand; er kun nødvendig, hvis du også vil have det til at virke på de gamle IE'er !-)

okay det er lige meget. hvad med det med størrelsen?

Response.Write ("<img src='" & rs("Filsti") & "' width='100' height='100' onclick=""popWin(this.src);"" style=""cursor:hand;cursor:pointer;""></a>")

-- og så indsætte dette, f.eks. i en blok udenfor asp-scriptet:

  <script language="javascript" type="text/javascript">
    function popWin(file){
      newWin=window.open("","ResizeBillede","width=300,height=200,status=no");
      txt='<ht'+'ml><he'+'ad><ti'+'tle>Resize til billede<\57ti'+'tle><scri';
      txt+='pt language="javascript" type="text/javascript">';
      txt+='function resPic(){h=document.images[0].scrollHeight;';
      txt+='w=document.images[0].scrollWidth;window.resizeTo(w+6,h+32);}<\57scri';
      txt+='pt><\57he'+'ad><bo'+'dy style="overflow:hidden;';
      txt+='border:0px;margin:0px"><i'+'mg src="'+file+'" style="top:0px;left:0px;border:0px;';
      txt+='" onload="resPic();"><\57bo'+'dy><\57ht'+'ml>';
      newWin.document.write(txt);
      newWin.document.close();
    }
  </script>

når jeg indsætte det kommer den med denne fejl: HTTP 500 - Intern serverfejl

Du skal sikkert gøre det sådan:

%>
  <script language="javascript" type="text/javascript">
    function popWin(file){
      newWin=window.open("","ResizeBillede","width=300,height=200,status=no");
      txt='<ht'+'ml><he'+'ad><ti'+'tle>Resize til billede<\57ti'+'tle><scri';
      txt+='pt language="javascript" type="text/javascript">';
      txt+='function resPic(){h=document.images[0].scrollHeight;';
      txt+='w=document.images[0].scrollWidth;window.resizeTo(w+6,h+32);}<\57scri';
      txt+='pt><\57he'+'ad><bo'+'dy style="overflow:hidden;';
      txt+='border:0px;margin:0px"><i'+'mg src="'+file+'" style="top:0px;left:0px;border:0px;';
      txt+='" onload="resPic();"><\57bo'+'dy><\57ht'+'ml>';
      newWin.document.write(txt);
      newWin.document.close();
    }
  </script>
<%

skal de vende den vej %><script language for det kan den ikke lide?

samme fejl

det første virker. tak for hjælpen, det var meget dejligt

HUSK at læg et svar

Velbekomme '-)

-- og tak for point ;~}