link funktioniert nicht

[ingrid]

Hallo

ich habe folgendes in meinem Script. Alles funktioniert relativ gut, d.h.
ich kriege meine Auswahlliste und kann darin was anklicken.
Nur der Link 'createMap' funktioniert nicht.
Weiss jemand, warum?

Gruss
Ingrid
--------------------------------------------------------
<table>
 <tr>
  <td>
  <form name="Brueckenname">
  Brücken:
  </td>
  <td>
  <select name="BrName" size="1" style="width: 90px;">
  <option value="">...</option>

<%
MySQL = "select distinct Name from object order by Name"
set MyRSList = MyConn.Execute(MySQL)

While Not MyRSList.EOF
 Response.Write ( "<option value=" & chr(34) & MyRSList("Name") & chr(34) )
 Response.write ( ">" & MyRSList("Name") & "</option>" & vbCrLf)
 MyRSList.MoveNext
Wend
%>
  </select>
  </td>
 </tr>
</table>
</form>

<a href="JavaScript:createMap()">Karte erzeugen</a>

<a href="Javascript:window.close()">Fenster schliessen</a>

<%
' clean up
Set MyRSList = Nothing
Myconn.Close
Set MyConn = Nothing
 %>

</td>
</tr>
</table>
</body>
</html>
-----------------------------------------------------------

[Tobias]

Vielleicht ein fehler in der crateMap function ? ? ?

=====================================================================

Hallo

ich habe folgendes in meinem Script. Alles funktioniert relativ gut, d.h.
ich kriege meine Auswahlliste und kann darin was anklicken.
Nur der Link 'createMap' funktioniert nicht.
Weiss jemand, warum?

Gruss
Ingrid

<table>
<tr>
  <td>
  <form name="Brueckenname">
  Brücken:
  </td>
  <td>
  <select name="BrName" size="1" style="width: 90px;">
  <option value="">...</option>

<%
MySQL = "select distinct Name from object order by Name"
set MyRSList = MyConn.Execute(MySQL)

While Not MyRSList.EOF
Response.Write ( "<option value=" & chr(34) & MyRSList("Name") & chr(34) )
Response.write ( ">" & MyRSList("Name") & "</option>" & vbCrLf)
MyRSList.MoveNext
Wend
%>
  </select>
  </td>
</tr>
</table>
</form>

<a href="JavaScript:createMap()">Karte erzeugen</a>

<a href="Javascript:window.close()">Fenster schliessen</a>

<%
' clean up
Set MyRSList = Nothing
Myconn.Close
Set MyConn = Nothing
%>

</td>
</tr>
</table>
</body>
</html>