Fejl i javascript
Hej..Jeg får en fel når jeg afvikler min kode, men jeg kan ikke finde ud af hvor det er henne...
Linie: 99
Fejl: Et objekt var ventet
<!-- #Include file="../../../../../dbconn.asp" -->
<html>
<head>
<title></title>
<script language="javascript" type="text/javascript" src="../../tiny_mce_popup.js"></script>
<script>
function mySubmit(ImgUrl) {
var URL = ImgUrl;
var win = tinyMCE.getWindowArg("window");
// insert information now
win.document.getElementById(tinyMCE.getWindowArg("input")).value = URL;
if (win.getImageData) win.getImageData();
win.tinyMCE.setWindowArg('editor_id','mce_editor_0');
tinyMCEPopup.close();
}
</script>
</head>
<body onload="tinyMCEPopup.executeOnLoad('init();')">
<p align="center">
<%
SubFolder = request.querystring("subfolder")
if SubFolder = "" then
SubFolder = request.form("folderSelect")
end if
if SubFolder = "Mapper" then
SubFolder = ""
end if
if Request.QueryString("type") = "file" then%>
Her vises en liste over de sider du har oprettet. Klik på den side som du ønsker at linke til.
<p align="center">
<a href="browse.asp?type=image">Vis billeder</a>
<table border="0" width="100%" id="table1">
<tr>
<td colspan="2"><b>Side titel</b></td>
</tr>
<%
Set Rs = Conn.Execute("SELECT * FROM cms_pages WHERE active = '1' ORDER by title asc")
Do While Not rs.EOF
ID = rs("id")
Title = rs("title")
%>
<tr>
<td colspan="2"><a href="#" onclick="mySubmit('index.asp?SideID=<%=id%>')"><%=Title%></a></td>
</tr>
<%
Set Rssub = Conn.Execute("SELECT * FROM cms_pages WHERE active = '1' AND parentid = '"&ID&"' ORDER by title asc")
Do While Not rssub.EOF
ID = rssub("id")
Title = rssub("title")
%>
<tr>
<td width="10px"></td>
<td><a href="#" onclick="mySubmit('index.asp?SideID=<%=id%>')"><%=Title%></a></td>
</tr>
<%
RSsub.MoveNext
Loop
RS.MoveNext
Loop
Rs.Close
Set Rs = Nothing
%>
</table>
<p align="center">
<%else%>
Der bliver automatisk oprettet et "preview" billede, når du uploader et billede.</li>
<table width="100%" border="0">
<tr>
<td>
<form method="POST" action="upload.asp?SubFolder=<%=SubFolder%>" enctype="multipart/form-data">
<p align="center"><input type="file" name="file" size="36">
<input type="submit" value="Upload" name="B1">
</form>
</td>
</tr>
</table>
<a href="?type=image">Vis små billeder</a> | <a href="?type=image&mode=stor">Vis store billeder</a>
<%
strType = request.querystring("type")
if SubFolder > "" then
SubFolder = SubFolder & "/" <----------------Linie 99
end if
billedeSti = "/upload/"&SubFolder
if Request.QueryString("billede") = "" then
Dim myFso
Set myFso = Server.CreateObject("Scripting.FileSystemObject")
Dim myFolder
Dim myFolder1
Set myFolder = myFso.GetFolder(Server.MapPath("/upload/"))
Set myFolder1 = myFso.GetFolder(Server.MapPath(billedeSti))
Dim SubFolders
Set SubFolders = myFolder.SubFolders
%>
<p align="center">
<%if SubFolder = "" then%>
Opret ny mappe:
<form method="post" action="new_folder.asp?type=<%=strType%>&SubFolder=<%=SubFolder%>" name="form2">
<p align="center">
<input type="text" name="newFolder" size="20">
<input type="submit" value="Opret" name="B1">
</select>
</p>
<%end if%>
</form>
<form method="post" action="browse.asp?type=<%=strType%>" name="form3">
<p align="center">
<select name="folderSelect" size="1" onchange="this.document.form3.submit()">
<option>Mapper</option>
<%
For Each folder in subFolders
Response.Write "<option>" & folder.Name & "</option>"
Next
%>
</select>
</p>
</form>
<%
Dim files
Set files = myFolder1.Files
%>
<div align="center">
<table border="0" width="500">
<tr>
<td><b>Billede</b></td>
<td><b>Størrelse</b></td>
<td><b>Funktioner</b></td>
</tr>
<%
For Each file in files
Response.Write "<tr><td><img src='" & billedeSti & file.Name & "' height='100' onclick=""mySubmit('"&billedeSti & file.Name&"')""></td>"
Response.Write "<td>" & file.Size & "</td>"
Response.Write "<td><a href='delete.asp?File=" & file.Name & "&type="&strType&"&SubFolder="&SubFolder&"'>Slet</a></td></tr>"
Next
Set files = Nothing
Set subFolders = Nothing
Set myFolder = Nothing
Set myFso = Nothing
%>
</table>
</div>
<%end if%>
</p>
<center>
<%end if%>
</div>
</body>
</html>
I linie 99 er der slet ikke noget javascript...
