ich nochma!
also,
habe alles versucht! geht net!!!
ich weiss z.b. gar net wann ich den perl tags auf bzw. zumachen soll bei dem code von Claus.
also,
kein anderer ausweg!
hier der komplette code der page (db heisst im übrigen wirklich "test")...
diese fehlermeldung kommt im übrigen:
[ Fehler: (perl) in /beatbastler/beatz: syntax error at (eval 785) line 14, near
also, there u go!
<HTML>
<HEAD>
<META NAME="GENERATOR" CONTENT="wer wills wissen?">
<TITLE>beatbastler.com beat area</TITLE>
</HEAD>
<BODY BGCOLOR="#ffffff">
<BODY BGCOLOR="#ffffff">
<left>
<OBJECT classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
codebase="http://active.macromedia.com/flash2/cabs/swflash.cab#version=4,0,0,0"
ID=Untitled WIDTH=150 HEIGHT=50>
<PARAM NAME=movie VALUE="http://www.beatbastler.com/images/beatz_slide.swf">
<PARAM NAME=loop VALUE=false>
<PARAM NAME=quality VALUE=high>
<PARAM NAME=bgcolor VALUE=#FFFFFF>
<EMBED src="Untitled.swf" quality=high bgcolor=#FFFFFF loop=false
WIDTH=150 HEIGHT=50 TYPE="application/x-shockwave-flash"
PLUGINSPAGE="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash">
</EMBED>
</OBJECT>
</left>
<SCRIPT language="javascript"><!--
function test()
{window.open('test.html','popup','width=200,height=200,toolbar=no,scrollbars=no,menubar=no, titlebar=no');}
function sehnsucht()
{window.open('test2.html','popup','width=600,height=400,toolbar=no,scrollbars=yes,menubar=no, titlebar=yes');}
--></SCRIPT><BODY BACKGROUND="http://www.beatbastler.com/images/z.jpg" bgproperties="fixed" BGCOLOR="#ffffff"
LINK="#ff0000" TOPMARGIN="0" LEFTMARGIN="0" MARGINHEIGHT="0"
MARGINLEFT="5"><TABLE WIDTH="99%" BORDER="0" CELLSPACING="0"
CELLPADDING="0">
<TR>
<TD WIDTH="100%">
<BR>
<B><FONT COLOR="#000000">hier ist die beat-section mit vielen
(un)fertigen beats, die ich mit ner roland mc 505 beatbox gemixt
und produced habe.</FONT></B></TD>
</TR>
</TABLE><BR>
<TABLE WIDTH="98%" BORDER="0" CELLSPACING="0" CELLPADDING="0">
<TR>
<TD WIDTH="100%">
<B><FONT COLOR="#000000">zieht sie euch rein und gebt mir
n'bisschen feedback via forum ,gästebuch usw. <BR>
falls irgendjemand bock auf ne zusammenarbeit hat , m@ilt mir
einfach.</FONT></B></TD>
</TR>
</TABLE></P>
<P><CENTER><TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0">
<TR>
<TD WIDTH="39%" BGCOLOR="#e8e8e8">
<B><FONT COLOR="#000000"><BR>
~saugen durch ziel speichern unter~</FONT></B></TD>
<TD WIDTH="61%" BGCOLOR="#e6e6e6">
<IMG SRC="http://www.beatbastler.com/images/realplaya.jpg" WIDTH="38" HEIGHT="34"
ALIGN="BOTTOM" BORDER="0" NATURALSIZEFLAG="3"><FONT SIZE="-1">preview
</FONT><IMG SRC="http://www.beatbastler.com/images/downlogo.jpg" WIDTH="26" HEIGHT="28"
ALIGN="BOTTOM" BORDER="0" NATURALSIZEFLAG="3">download (mp3)
<IMG SRC="http://www.beatbastler.com/images/commentslogo.gif" WIDTH="22" HEIGHT="31"
ALIGN="BOTTOM" BORDER="0" NATURALSIZEFLAG="3">feedback</TD>
</TR>
</TABLE><BR>
<BR>
<I><TT><FONT COLOR="#000000">die previews sind sehr kurz gehalten
und haben relativ schlechte qualität! 1a qualität gibt's
bei den mp3s</FONT></TT></I></CENTER></P>
<table>
<tr>
<perl>
$anz_tds = 3 if (!$anz_tds); # hier legst du die anzahl der spalten fest
$anz_les = -1; # initialisieren des lese-zählers
while (get_next("test"))
{
$anz_les++; # sätze zählen
$anz_tr = $anz_les % $anz_tds;
out "<TR>\n" if (!$anz_tr);
out "<TD><font size="2"><b><i>$beatname</font></b></i><br>
<font size="-1" <b>$mb mb / $min min</font></b>
<A HREF="http://www.beatbastler.com/inhalt/beat-mp3z/$preview"><IMG
SRC="http://www.beatbastler.com/images/realplaya.jpg" WIDTH="38" HEIGHT="34" ALIGN="BOTTOM"
BORDER="0" NATURALSIZEFLAG="3"></A>
<A HREF="http://www.beatbastler.com/inhalt/beat-mp3z/$beatmp3"><IMG
SRC="http://www.beatbastler.com/images/downlogo.jpg" WIDTH="26" HEIGHT="28" ALIGN="BOTTOM"
BORDER="0" NATURALSIZEFLAG="3"></A>
<A HREF="javascript:test()"><IMG
SRC="http://www.beatbastler.com/images/commentslogo.gif" WIDTH="22" HEIGHT="31" ALIGN="BOTTOM"
BORDER="0" NATURALSIZEFLAG="3"></A>
</TD>";
out "</TR>\n" if ($anz_tr eq $anz_tds - 1);
}
if (!$anz_tr)
{
out "<TD> </TD>\n";
}
EOF
}
</perl>
<BR><BR><BR><BR><BR><BR><BR><BR><BR>
<P><CENTER><FONT SIZE="-2">alle Beatz (c) beatbastler.com 2001<BR>
<BR>
<BR><BR><BR><BR><BR>
</FONT></CENTER>
</BODY>
a
