Avatar billede morpheus Nybegynder
07. januar 2000 - 09:02 Der er 13 kommentarer og
2 løsninger

Åbne nyt vindue med bruger info....

Hej !

Jeg er ved at lave en ICQ liste...

Her kan brugeren indtaste noget ekstra information i textarea.

Når brugeren så blir listet kan man klikke på et link for at læse mere !

Dette vil jeg gerne have åbnet i et nyt vindue.

Evt. med et JavaScript, hvor den husker at trække ID'et med...

Er der nogen der kan hjælpe ????

<//morpheus\\>
Avatar billede flemming Nybegynder
07. januar 2000 - 10:22 #1
Indsæt følgende kode i <HEAD></HEAD> sektionen:

<script language="JavaScript">
<!--
function NewWindow()
{
  var hWnd = window.open("liste.asp","titel","width=540,height=550,resizable=yes,scrollbars=yes");
  if (!hWnd.opener) hWnd.opener = self;
}
-->
</script>


Lav en link der starter vinduet:
<a href="java script:NewWindow()">Liste</A>

Det var det hele ;=)

/Flemming
Avatar billede morpheus Nybegynder
07. januar 2000 - 11:11 #2
...Hvad nu hvis jeg skal have trukket et id ud i liste.asp ?

liste.asp?id="& Request.QueryString("ID")"


???
<//morpheus\\>
Avatar billede morpheus Nybegynder
07. januar 2000 - 12:59 #3
Jeg har lavet det her:
---
<SCRIPT>
function NewWin () {
NY=window.open('more.asp?id="<%=rs("id")%>"','NY','width=625,height=480,toolbar=no,scrollbars=no menubar=no location=yes')
}
</script>
----

Men den vil ikke trække ID'et ud...!

Hjælp ?
Avatar billede emil Nybegynder
07. januar 2000 - 13:33 #4
Du kan ikke have ASP-kode stående i et Javascript. I stedet kan du lave det som følgende:

<SCRIPT>
function NewWin (ID) {
NY=window.open('more.asp?id=' + ID,'NY',' width=625,height=480,toolbar=no,scrollbars=no menubar=no
location=yes')
}
</script>

Og så skal dit link se således ud:

<a href="java script:NewWindow(<%=rs("ID")%>)">

<emil>
Avatar billede morpheus Nybegynder
07. januar 2000 - 13:41 #5
Nu ser det sådan her ud:

<SCRIPT>
function NewWin (ID) {
NY=window.open('more.asp?id= + ID,'NY',' width=625,height=480,toolbar=no,scrollbars=no menubar=no
location=yes')
}
</script>

<a href='java script:NewWin(" & rs("ID") & ")'>Mere info</a>

Men det virker stadig ikke....

<//morpheus\\>
Avatar billede emil Nybegynder
07. januar 2000 - 13:53 #6
Min fejl (sædvanlige problem med gåseøjne).

Prøv med:

<a href="java script:NewWin('<%=rs("ID") %>')">Mere info</a>
Avatar billede euhp Nybegynder
07. januar 2000 - 15:51 #7
Man kan altså godt have ASP kode stående i et Javascript.

-peter
Avatar billede morpheus Nybegynder
07. januar 2000 - 20:04 #8
Du, Emil !
Jeg er altså en total nød til JavaScript....

Min linie ser således ud og melder fejl:

    response.write "<td class='text' width='30%' align='right'>[<a href='java script:NewWin('<%=rs("ID") %>')'>Mere info</a>Mere info</a>]</td>"

????

<//morpheus\\>
Avatar billede emil Nybegynder
07. januar 2000 - 22:59 #9
OK, fik lige taget mig sammen til at starte InterDev. Følgende er testet og virker. Hvis du stadig får en fejl ligger den et andet sted end den nævnte kode.

Test1.asp==================================
<!--
    Først skal du selvfølgelig lige have åbnet og fundet de data du skal bruge
-->
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<SCRIPT>
function NewWin () {
NY=window.open('test2.asp?id=<%=Personer("ID")%>','NY',' width=625,height=480,toolbar=no,scrollbars=no menubar=no location=yes')
}
</script>
</HEAD>
<BODY>
<a href="java script:NewWin()">Mere info</a>
</BODY>
</HTML>
====================

Test2.asp==========================
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<%=Request.QueryString("id")%>
</BODY>
</HTML>
============================

<emil>

p.s. Tak til euhp for at pointere at man godt kan have ASP i JavaScript (ved ikke hvad jeg har gjort de andre gange, men nu virker det i hvert fald)
Avatar billede morpheus Nybegynder
11. januar 2000 - 11:31 #10
EMIL !!!! >>>

HJÆLP !

Jeg poster lige mit script her:

SOURCE:
------
<html>
<head>
<SCRIPT LANGUAGE="JavaScript">
function NewWin () {
window.open('more.asp?id=<%=members("ID")%>','width=200, height=200, toolbar=no, scrollbars=no, menubar=no, location=yes')
}
</script>

<title>ICQSvendborg ver. 1.0</title>
</head>
<body bgcolor="#FFFFFF">

<%
intPage = Request("page")
If isNumeric(intPage) = False Or intPage < 1 Then
  intPage = 1
End If

Set rs = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM members"
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("icq.mdb")
rs.Open strSQL, strDSN, 1
If Not (rs.BOF Or rs.EOF) Then
  rs.PageSize = 10
  rs.AbsolutePage = intPage
  intRecCount = rs.PageSize
  intPageCount = rs.PageCount
  Response.Write "<p><b>Side " & intPage & " af " & intPageCount & "</b></p>"
  Do While Not rs.EOF And intRecCount > 0
   

    response.write "<table width='50%' align='center' border='0'>"
    response.write "<tr>"
    response.write "<td class='text' width='20%'>Bruger oprettet:</td>"
    response.write "<td class='text' width='30%' align='right'>" & FormatDateTime(rs("dato"), VbLongDate) & "</td>"
    response.write "</tr>"
    response.write "<tr>"
    response.write "<td class='text' width='20%'>Navn:</td>"
    response.write "<td class='text' width='30%' align='right'>" & rs("realname") & "</td>"
    response.write "</tr>"
    response.write "<tr>"
    response.write "<td class='text' width='20%'>Alder:</td>"
    response.write "<td class='text' width='30%' align='right'>" & rs("alder") & "&nbsp;år</td>"
    response.write "</tr>"
    response.write "<tr>"
    response.write "<td class='text' width='20%'>Nickname:</td>"
    response.write "<td class='text' width='30%' align='right'>" & rs("nick") & "</td>"
    response.write "</tr>"
    response.write "<tr>"
    response.write "<td class='text' width='20%'>ICQ #:</td>"
    response.write "<td class='text' width='30%' align='right'>" & rs("icqnummer") & "</td>"
    response.write "</tr>"
    response.write "<tr>"
    response.write "<td class='text' width='20%'>Online / Offline:</td>"
    response.write "<td class='text' width='30%' align='right'><img src='http://online.mirabilis.com/scripts/online.dll?icq=" & rs("icqnummer") & "&amp;img=5'></td>"
    response.write "</tr>"
    response.write "<tr>"
    response.write "<td class='text' width='20%'>Hjemmeside:</td>"
    response.write "<td class='text' width='30%' align='right'>[<a href=http://" & rs("url") & ">" & rs("titel") & "</a>]</td>"
    response.write "</tr>"
    response.write "<tr>"
    response.write "<td class='text' width='20%'>E-Mail:</td>"
    response.write "<td class='text' width='30%' align='right'>[<a href='mailto:" & rs("email") & "'>" & rs("email") & "</a>]</td>"
    response.write "</tr>"
    response.write "<tr>"
    response.write "<td class='text' width='20%'>Mere information:</td>"
    response.write "<td class='text' width='30%' align='right'>[<a href='NewWin()'>Mere info</a>]</td>"
    response.write "</tr>"
    response.write "</table>"
    response.write "<hr width='50%' align='center' noshade size='1'>"






  intRecCount = intRecCount - 1
  rs.MoveNext
  Loop
End If
rs.Close
Set rs = Nothing

Response.Write "<p>Gå til side "
For intNum = 1 To intPageCount
  Response.Write "<a href=paging.asp?page=" & intNum & ">" & intNum & "</a> "
Next

Response.Write "<p>"
If Clng(intPage) > 1 Then
  Response.Write "<a href=paging.asp?page=" & intPage - 1 & ">&lt;&lt;</a>"
Else
  Response.Write "&lt;&lt;"
End If

Response.Write "&nbsp;"

If Clng(intPage) < Clng(intPageCount) Then
  Response.Write "<a href=paging.asp?page=" & intPage + 1 & ">&gt;&gt;</a> "
Else
  Response.Write "&gt;&gt;"
End If
%>
<br>
<br>
<div align='center' class='text'>
[<a href='tilmeld.asp'>Tilmeld dig listen</a>]
</div>

</body></html>


----------

Der sker overhovedet ngenting når jeg kører dette...
Men fjerner jeg scriptet virker det fint !?

???? HELP ????

<//morpheus\\>
Avatar billede morpheus Nybegynder
11. januar 2000 - 12:49 #11
YES, YES, YES !!!!

Det lykkedes !

Mange tak, Flemming og Emil ! :o)

<//morpheus\\>
Avatar billede morpheus Nybegynder
11. januar 2000 - 13:06 #12
Et lille tillægsspørgsmål...

Hvordan får jeg forskellige id's trukket ud...

Besøg siden her:
[ http://d-net.dk/work/icq ]

I vil da se at det er det samme id der bliver trukket ud...og der er jo ikke meningen...

Hvordan får jeg rettet dette så ID'erne kommer til at passe sammen med teksten ?

<//morpheus\\>

P.S Der er her tale om ekstra point af ca. 60 stk. !
Avatar billede emil Nybegynder
11. januar 2000 - 18:50 #13
Hvis du kun skal have en bruger pr. side kan det klares med to ting. Først skal du rykke åbningen af databasen op inden dit javascript, og dels skal du ændre så du hiver ID'et fra databasen

SOURCE:
                  ------
                  <html>
                  <head>
<%
                  Set rs = Server.CreateObject("ADODB.RecordSet")
                  strSQL = "SELECT * FROM members"
                  strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("icq.mdb")
                  rs.Open strSQL, strDSN, 1
                  If Not (rs.BOF Or rs.EOF) Then
                    rs.PageSize = 10
                    rs.AbsolutePage = intPage
                    intRecCount = rs.PageSize
                    intPageCount = rs.PageCount
%>
<SCRIPT LANGUAGE="JavaScript">
                  function NewWin () {
                  window.open('more.asp?id=<%=rs("ID")%>','width=200, height=200, toolbar=no, scrollbars=no, menubar=no,
                  location=yes')
                  }
                  </script>

                  <title>ICQSvendborg ver. 1.0</title>
                  </head>
                  <body bgcolor="#FFFFFF">

                  <%
                  intPage = Request("page")
                  If isNumeric(intPage) = False Or intPage < 1 Then
                    intPage = 1
                  End If

                    Response.Write "<p><b>Side " & intPage & " af " & intPageCount & "</b></p>"
.
.
.%>
og så er det ellers det oprindelige script.

Hvis du ønsker mulighed for at vise flere på samme side bliver du nødt til at ændre det således af id-nummeret bliver smidt over som parameter til din javascript funktion:

SOURCE:
======
<SCRIPT LANGUAGE="JavaScript">
                  function NewWin (ID) {
                  window.open('more.asp?id=' + ID,'width=200, height=200, toolbar=no, scrollbars=no, menubar=no,
                  location=yes')
                  }
                  </script>
.
.
.
.
  response.write "<td class='text' width='20%'>Mere information:</td>"
                      response.write "<td class='text' width='30%' align='right'>[<a href="NewWin('<%=rs("ID")%>')">Mere info</a>]</td>"
                      response.write "</tr>"
.
.
.

/emil

p.s. Prikkerne betyder at der ikke skal ændres noget i den tilsvarende ASP/HTML
Avatar billede morpheus Nybegynder
13. januar 2000 - 08:44 #14
ARRGGG....!

Nu udskriver den følgende i browserens vindue:
http://multi03/icq/NewWin('1')

Her har jeg valgt at få vist info om brugeren med ID nummer 1

<//morpheus\\>
Avatar billede morpheus Nybegynder
13. januar 2000 - 10:03 #15
Her findes de ekstra 60 point:

http://www.eksperten.dk/spm.asp?id=9626
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