Opened by Gast at 2004-09-03 06:15
User since
2004-09-03
6 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2004-09-03
6 Artikel
BenutzerIn
Hier ein script zur der obigen Thema.
edit renee: [code]-Tags spendiert\n\n
<!--EDIT|renee|1094191521-->
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
#!/usr/bin/perl
require './system/cgi-lib.pl';
require './system/dbi-lib.pl';
require './system/sys-lib.pl';
#require './cgi.bin/banner.pl';
&ReadParse;
$id = &decode_number($ARGV[0]);
my $dbh = &dbi_connect;
$user = $dbh->selectrow_hashref("Select * from ssx_user_data Where u_id='$id'");
_dbi_disconnect($dbh);
print qq(Content-type: text/html\n\n );
print qq(
<body bgcolor=black background="../hintergrund.gif" text="white" link=white vlink=white>);
&display_top_info($id);
#Hier ist so ein beispiel beim ../hintergrund.gif mit html mit voller Pfadangabe oder abgekürzt egal wie es funkt nicht.
print qq(
<br>
<table border=1 align=center width =60%>
<font color=0000ff size=-1>
<td width =10% bgcolor=0000ff align=center><font size=2><a href ="main.cgi?$ARGV[0]" target=main style=text-decoration:none
alt="Übersicht"><font color=ffffff>Übersicht</font></a></td>
<td width =10% bgcolor=0000ff align=center><font size=2><a href ="main1.cgi?$ARGV[0]" target=main style=text-decoration:none
alt=""><font color=ffffff>Millitär</font></a></td>
<td width =10% bgcolor=0000ff align=center><font size=2><a href ="main2.cgi?$ARGV[0]" target=main style=text-decoration:none
alt="Wirtschaft"><font color=ffffff>Wirtschaft</font></a></td>
<td width =10% bgcolor=0000ff align=center><font size=2><a href ="main3.cgi?$ARGV[0]" target=main style=text-decoration:none
alt="Flotte"><font color=ffffff>Flotte</font></a></td>
</font>
</td>
<br>
</talbe>
edit renee: [code]-Tags spendiert\n\n
<!--EDIT|renee|1094191521-->