korea1

hi,

weiss jemand von euch, wie ich es hinbekomme aus einem datum z.b. yyyy-mm-dd die woche herauszufiltern?

so in etwa:

select to_char(datum, 'ww') from tabelle

das ganze sollte sich möglichst an die iso halten. => 1. donnerstag im neuen jahr = 1. kalenderwoche

danke im voraus korea1

also du hast 2 verschiedene frame seiten.

du kommst vermutlich von einer haupt-seite (html) richtig?

so wenn du jetzt z.b. auf deine 1. frame seite verlinken möchtest und dabei einen parameter übergeben möchtest, dann sieht das so aus:

im html-code deiner hauptseite, die auf die nächste frame seite verweist.

<a href="seite1.php?parameter=1">seite1</a>

arbeitest du denn mit templates?

poste doch einfach mal ein stück von deinem code, dann kann man dir besser helfen.

oder schilder mal genau, wie deine links aussehen und die seiten heissen.

mfg korea1

hi,

du kannst die daten auch in hidden fields setzten. anstatt in die url, dann sieht sie nicht jeder sofort.

die hidden fields kannst du dann auch mit get wieder auslesen.

z.b. $HTTP_GET_VARS["name von deinem hiddenfield"]

zu der url-lösung sieht das ganze so aus: www.musteradresse.de/seite.php?parameter=1

=> $HTTP_GET_VARS["parameter"] gibt dir die 1 zurück.

ansonsten eben mit sessions.

mfg korea1

ich hab das problem jetzt gelöst und zwar so:

system("XCACLS \"$Pfad$Verzeichnis$Unterverzeichnis\" /T /G Jeder:C /Y");

das /y setzt rechte ohne vorher zu fragen.

trotzdem danke

hi,

nein hatte ich auch versucht, das hat auch nicht geklappt.

hat noch jemand eine idee?

bin für alles dankbar

hi,

mein code sieht jetzt so aus:

<qoute>

system("CACLS \"$Pfad.$Verzeichnis\" /T /G Jeder:C");

echo Y | cacls;

</qoute>

jetzt bekomme ich folgende fehlermeldung:

Can't locate object method "echo" via package "Y" at E:\attribute_tool\add_attribute.pl line 36.

hab ich da was falsch verstanden?

danke korea1

hi,

ich habe ein script geschrieben, das Verzeichnisrechte setzt.

dabei greife ich über system auf den befehl cacls zu.

das programm funktioniert soweit, aber ich werde jedesmal gefragt, ob ich die rechte setzten möchte und muss dann immer noch manuell ja eingeben.

wie kann ich es in meinem perlcode realisieren, dass die eingabe ja automatisch gemacht wird?

geht das ungefähr so: print STDIN?

ich dachte man kann das ganze so lösen, dass man einfach den ascii - code von ja und enter eingibt.

geht das so?

danke korea1

jetzt hab ich´s kapiert. leider fällt mir dazu aus dem stehgreif auch keine lösung ein.

mfg korea1:rolleyes:

hi,

also ich hatte auch schon mal so ein ähnliches problem.

ich hatte allerdings eine html-seite und ein php script.

in der html seite baust du für jeden button eine extra form.

in die form machst du ein hidden field.

bei update heisst das hidden-field update und bei submit heisst es submit.

du könntest den submit-buttons aber auch namen geben z.b. submit und update.

in dem php script würde das ganze dann so aussehen:

switch(hidden-field od. buttonname)

{

case "update":

führe aktion für update aus.

break;

case "submit":

führe aktion für submit aus.

break;

}

und damit sich dein script wieder selbst aufruft baust du einfach ein redirect ein.

das müsste mit perl auch so zu lösen sein. musst halt nach der syntax schauen. die switch syntax für perl könnte ich dir auch noch posten, falls du sie nicht kennst.

mfg korea1

hi,

versuch doch mal das $serv in einfache hochkommata zu schreiben.

'$serv'

mfg korea1

hi,

du brauchst für jeden button eine eigene form, dann müsste es funktionieren.

was für ein script liegt den dahinter? php, perl?

mfg korea 1

so ziemlich einfach wäre es wenn du z.B. deinen kalender in eine tabelle aufspalten würdest.

ungefähr so:

datum status buchen

---------|------------------|-----------

xxxxxx |frei od. belegt| checkbox

dann machst du da ein formular draus wenn die checkbox angehakt wird und du das formular abschickst dann hast du sozusagen gebucht.

dann müsstest du natürlich jeden tag einzeln anhaken.

nicht gerade benutzerfreundlich.

dann müsstest du vielleicht nach dem ersten absenden zur nächsten seite verweisen, so dass man dort dann seine daten einstellen kann. oder du machst dass gleich auf die tabellenseite.

mit php könntest du eine datenbank hinterlegen und auch ne schöne oberfläche basteln. da kannst du dann auch mit templates arbeiten, das wär dann eleganter,

aber auch aufwändiger und schwieriger.

korea1

ich hab dass bei mir schon mal ausprobiert und ich hatte keine problem mit der browserabfrage.

übrigens meinte ich

alert(navigator.appVersion);

und

alert(navigator.appName);

korea1

mit

alert(navigator.appVersion);

und

alert(navigator.appVersion);

bekommst du den namen des browsers und der version heraus.

dann kannst du ja ne if abfrage basteln und je nach dem welche version und welcher browser kannst du dann zu deiner gewünschten seite weiterleiten.

das wär mal so mein lösungsansatz.

ich hoffe das war so einigermassen das was du gemeint hast.

mfg korea1

so inzwischen habe ich das problem eingegrenzt.

es scheint, dass es an folgendem stück code liegt:

<Quote>

if ($Config{'redirect'}) {

print "Location: $Config{'redirect'}\n\n";

}

</Quote>

in dem redirect befindet sich die url, auf die weitergeleitet werden soll.

im server error log wird mir folgende fehlermeldung angezeigt:

premature end of script headers

kann mir jetzt jemand weiterhelfen?

bin für alles dankbar korea1

hallo zusammen,

kennt sich jemand von euch mit formmail aus?

ich habe eine textarea und ein textfeld, wenn ich dort versuche meinen text abzuschicken, bekomme ich folgende fehlermeldung:

____________________________________

internal server error

the server encountered in internal error or misconfiguration and was unable to complete your request.

____________________________________

wenn ich das formmail.pl über die konsole laufen lasse, bekomme ich folgende fehlermeldung:

_____________________________________

Fehler: Request Method

Die von Ihnen eingesetzte Aufrufmethode ist weder GET noch POST. Bitte überprüfen Sie die Form und stellen Sie sicher,

dass die method= - Anweisung groß geschrieben ist und GET oder POST entspricht.

_____________________________________

die anweisungen habe ich groß geschrieben.

weiss jemand von euch, was ich noch tun kann, oder woran der fehler liegt?

danke im voraus korea1

hi,

wenn du dich für cgi interessierst, dann kann ich dir folgendes buch empfehlen:

das einsteigerseminar

perl

von thorsten roßner

mit großem cgi - teil

isbn: 3-8287-1032-8

ich find das teil ganz gut, da sind übersichtliche codes drin und alles schritt für schritt erklärt.

sind auch ganz brauchbare beispiele drin, wie z.b. cgi - chat oder ein gästebuch.

mir hats am anfang auch weitergeholfen.

mfg korea1

hi,

mit $datum bekommst du 20021211 => 11 is der tag den du wolltest, od?

das unterprogramm sub zweistellig sorgt dafür, dass du den tag auch zweistellig ausgegeben bekommst z.B. 03.

mfg

Hi,

probiers mal hiermit:

<Code>

($sek,$min,$std,$tag,$mon,$jahr) = gmtime(time);

$sek = &zweistellig ($sek);

$min = &zweistellig ($min);

$std = &zweistellig ($std);

$tag = &zweistellig ($tag);

$mon = &zweistellig (++$mon);

$jahr = $jahr + 1900;

$datum = ("$jahr$mon$tag");

sub zweistellig

{

if (length ($_[0]) < 2)

{

return "0".$_[0];

}

else

{

return $_[0];

}

}

</Code>

mfg korea1

Hi,

mit folgender Codezeile:

my $Result = $Dir->SetRecurse('e:/test_auftraege');

bekomme ich zwar keine Fehlermeldung mehr, aber das rekursive Setzen der Verzeichnisrechte wird ignoriert.

Das Recht bzw. die Gruppe wird nur im Stammverzeichnis e:/test_auftraege gesetzt.

Die Verzeichnisse, die darunter liegen werden nicht bearbeitet.

Woran liegt das?

Ich benütze WinNT 4.0 und SP 6.

<Code>

use Win32::Perms;

$Dir = new Win32::Perms( 'e:/test_auftraege' ) || die;

$Dir->Add( {Account=>'TD_G', Mask=>FULL } );

my $Result = $Dir->SetRecurse('e:/test_auftraege');

$Dir->Close();

</Code>

Vielen Dank korea1

Hallo zusammen, ich versuche mit perl ein Script zu schreiben, das mir Verzeichnisrechte hinzufügen soll. Funktioniert soweit auch.

Wenn ich das ganze aber rekursiv machen möchte, dann bekomme ich folgende Fehlermeldung:

Undefined subroutine &main::SetRecurse called at E:\attribute_tool\add_attribute.pl line 28.

Kann mir jemand sagen was ich falsch gemacht habe?

Anbei noch mein Code:

<CODE>

use Win32::Perms;

$Dir = new Win32::Perms( 'e:/test_auftraege' ) || die;

$Dir->Add( {Account=>'TD_G', Mask=>FULL } );

SetRecurse('e:/test_auftraege');

$Dir->Close();

</CODE>

Danke

hi,

soweit ich mich erinnern kann, müsstest du im menü view, dann Adress bar die leiste wieder sichtbar machen können.

mfg