nicht angemeldet
Hi Christoph, hier also der Quelltext, ich habe übrigens auch versucht das neue Fenster (MeinFenster) zu ersetzen, indem ich den Inhalt in einen dritten Frame geschickt habe; und er schickt es auch richtigerweise dorthin. Hier also der Quelltext:
</head> <script language="JAVASCRIPT"> // EINIGE VARIABLEN var Lollo; var Lolita=new Array(); var DaWolf; var JobPosition=new Array(); var LeaderCount; var LeaderNumber; function Frame2schliessen() { parent.frame2.location.href="../../frame4.html"; } var DaFormCounter=new Array();
</script> <% 'Definition der Variablen ACCESSZUGRIFF über OLEDB, Quelle der Datenbank ' Name der Tabelle, Öffnen der Datenbank, Datensatz, verschiedene SQLs, ' Zaehler usw. Dim strCon, strDB, strTabelle, strFormCounter Dim objCon, objRS Dim strSQL, strSQL1, strSQL2, strCountIt Dim LeaderCount, Formularname1, Formularname2 LeaderCount=0 strFormCounter=0
'Routine zum Schreiben der Namen und Titel Sub NameUndTitel Response.Write "<b>" & objRS("FirstName") & " " Response.Write objRS("LastName")& "<br></b><I>" Response.Write objRS("JobTitleShort")& " </I>" End Sub
strTabelle = "Userportraits" strDB = "Data Source=" &_ Server.MapPath("/fpdb/PORTRAIT.MDB") Set objCon = Server.CreateObject("ADODB.Connection") strCon = "Provider=Microsoft.Jet.OLEDB.4.0;" & strDB objCon.Open strCon Set objRS = Server.CreateObject("ADODB.Recordset") 'Datenbankzugriff
' VERSCHIEDENE SQLs strSQL = "Select * From UserPortraits Where JobPosition = 'Director_1_DM' ;" strSQL1 = "Select * From UserPortraits Where JobPosition = 'DM_Ass' Order By User_Id ;" strSQL2 = "Select * From UserPortraits Where JobPosition Like '%DM_%x' Order By JobPosition ;"
'Öffnen von SQL (Geschaeftsfuehrer in Datenbank ) objRS.open strSQL, objCon
' Zaehler für die Datensatzanzahl insgesamt in diesem Formular strCountIt=0 %>
<!-- **************************************************************** --> <!-- **************************************************************** --> <!-- BEGINN DER BEHANDLUNG VON DIREKTOREN-->
<% 'Datenbankzugriff für SQL2 (Direktoren) Set objRS = Server.CreateObject("ADODB.Recordset") objRS.open strSQL2, objCon
'Schleife mit Anzahl der Direktoren laut SQL2 do while not objRS.eof strCountIt=strCountIt + 1 LeaderCount=LeaderCount + 1 %> <tr><td colspan=3> <Div id=<% =strCountIt %> class="A" onmouseover="javascript:document.getElementById(<% =strCountIt %>).style.color='#990000';document.getElementById(<% =strCountIt %>).style.textDecoration='underline';" onmouseout="tauschenout(<% =strCountIt %>);" onclick="javascript:MitarbeiterClick(<% =strCountIt %>)">
<!-- Formular zur Datenweitergabe an den Steckbrief, gesendet wird hier die User_Id --> <Form METHOD=POST > <INPUT TYPE="HIDDEN" NAME="User_Id" VALUE=<% =objRS("User_Id") %> onclick="javascript:Mitarbeiterclick(<% =strCountIt %>)">
<!-- Formular zur Datenweitergabe an Frame 2, gesendet wird hier die Variable LeaderCount um zu sehen, wer in der Abteilung hier DM welche Untergebene hat <INPUT TYPE="HIDDEN" NAME="Subcategory" VALUE="<% =LeaderCount %>" onclick="javascript:Mitarbeiterclick(<% =strCountIt %>)" > --> </Form>
<!-- Formular zur Datenweitergabe an Frame 2, gesendet wird hier die Variable LeaderCount um zu sehen, wer in der Abteilung hier DM welche Untergebene hat --> <Form METHOD=POST> <INPUT TYPE="HIDDEN" NAME="Subcategory" VALUE="<% =LeaderCount %>" onclick="javascript:Mitarbeiterclick(<% =strCountIt %>)" > </Form>
<% ' Zaehler welches Formular angesprochen wird strFormCounter=strFormCounter + 2 Response.Write strFormCounter %>
<script language="JAVASCRIPT">
// Der gleiche Zaehler nur in Javascript als Variable DaFormCounter[<% =strCountIt %>]=<% =strFormCounter %> ; </script>
<% ' Schreiben von Name und Titel der Direktoren Call NameUndTitel %> </div>
</td></tr></table> <% objRS.movenext Loop strCountIt=strCountIt + 1 %>
<!-- ENDE BEARBEITUNG DER DIREKTOREN --> <!-- ************************************************************ --> <!-- ************************************************************ -->
<% 'SCHLIESSEN DER DATENFELDER, BZW. DATENBANK objRS.close Set objRS = Nothing objCon.close Set objCon = Nothing %>
<script language="JAVASCRIPT"> var fensteractive="inaktiv"; // ****************************************************** // ****************************************************** // Öffnen des Steckbrieffensters // ********************************************************* // ********************************************************* function Steckbrieffenster() { DasFenster=window.open("../Steckbrief.asp", "MeinFenster", "fullscreen=1,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0, scrolling=0" ); //window.name='Main'; fensteractive="aktiv";
// ******************************************************************** // ******************************************************************** // ABSCHICKEN DES FORMULARS AN STECKBRIEF // ******************************************************************** // ******************************************************************** document.forms[DaWolf].action = "../Steckbrief.asp" ; document.forms[DaWolf].target = "MeinFenster"; // Open in a new window document.forms[DaWolf].submit(); // Submit the page DasFenster.focus();
// ******************************************************************** // ******************************************************************** // ABSCHICKEN DES FORMULARS AN FRAME 2 ZUR ERMITTLUNG DER UNTERGEBENEN // ******************************************************************** // ******************************************************************** if (Lollo > 0) { document.forms[Lolita].action="frame2_dm.asp" ; document.forms[Lolita].target="frame2"; // Open in frame2 document.forms[Lolita].submit(); } }
// ******************************************************************** // ******************************************************************** // Schliessen des Steckbriefes // ******************************************************************** // ******************************************************************** function Steckbriefschliessen() { if(DasFenster.closed == false) {DasFenster.close();}
}
var z;
var elstatus=new Array(<% =strCountIt %>);
// ******************************************************************** // ******************************************************************** // Funktion zum Entleeren der Frames // ******************************************************************** // ******************************************************************** function clearall3frames() { //parent.frame2.location.href="../../frame4.html"; parent.frame3.location.href="../../frame4.html"; parent.frame4.location.href="../../frame4.html";
}
// ******************************************************************** // ******************************************************************** // Deaktivieren Für MouseOver MouseOut // ******************************************************************** // ******************************************************************** function deaktivate() { for (z=0; z<<% =strCountIt %>; z++) {elstatus[z]="inaktiv";} for (z=0; z<<% =strCountIt %>; z++) { document.getElementById(z).style.color="#666666"; document.getElementById(z).style.textDecoration="none"; } }
// ******************************************************************** // ******************************************************************** // MouseOver EFFEKTE // ******************************************************************** // ******************************************************************** function tauschenout (id) { if (elstatus[id]=="aktiv") { document.getElementById(id).style.color="#990000"; document.getElementById(id).style.textDecoration="underline"; } else { document.getElementById(id).style.color="#666666"; document.getElementById(id).style.textDecoration="none"; } }
// ********************************************************************** // ********************************************************************** // HIER WIRD DAS FORMULAR AN DIE A S P Dateien geschickt // ON CLICK // ************************************************************************ // *********************************************************************** function MitarbeiterClick(id) { Lollo=(id) ; // ********* AKTUELLER MITARBEITER Lolita=DaFormCounter[id]; // ********* ZAEHLER WELCHES FORMULAR DaWolf=Lolita -1 ; // *********
// ZWEITEN FRAME KURZFRISTIG ENTLEEREN parent.frame2.location.href="../../frame4.html";
// FÜR MOUSEOVEREFFEKTE, ALLE SCHRIFTEN GRAU deaktivate();
// FÜR MOUSEOVEREFFEKTE AKTIVER LINK = ROT elstatus[id]="aktiv"; document.getElementById(id).style.color='#990000'; document.getElementById(id).style.textDecoration='underline';
// HIER WIRD JETZT DAS STECKBRIEFFENSTER GEÖFFNET, FUNKTION SIEHE OBEN (Dort werden die Daten auch an Frame2 geschickt) Steckbrieffenster();
} </script>
<body text="#000000" background="../../images/Frame_Background.gif" link="#990000" alink="#990000" vlink="#990000" marginwidth='5' marginheight='5' onUnload="Steckbriefschliessen()" onload="Frame2schliessen()"> </body> </html>