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 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69
|
<script language="JavaScript">
window.resizeTo(1024,768);
function showFilled(Value)
{ return (Value > 9) ? "" + Value : "0" + Value;
}
// setInterval ( "doSomething()", 5000 );
var adOpenUnspecified = -1; adOpenForwardOnly = 0; adOpenKeyset = 1; adOpenDynamic = 2; adOpenStatic = 3;
var adLockUnspecified = -1; adLockReadOnly = 1; adLockPessimistic = 2; adLockOptimistic = 3; adLockBatchOptimistic = 4;
var dat = new Date();
var tabJours = new Array ("dimanche", "lundi", "mardi","mercredi", "jeudi", "vendredi", "samedi");
var tabMois = new Array("janvier","février","mars","avril","mai","juin","juillet","août","septembre","octobre","novembre","décembre");
var conn = new ActiveXObject("ADODB.Connection");
conn.open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=inventaire.mdb;Persist Security Info=False");
if (conn)
{ var rs = new ActiveXObject("ADODB.Recordset");
var sqlString = "DELETE * FROM import_AD;";
rs.Open(sqlString , conn, adOpenUnspecified, adLockUnspecified);
if (!rs)
{ alert ("Erreur lors de l'initialisation de la table d'import."); }
}
else { alert ("Impossible de se connecter à la base pour effectuer les mises à jour"); }
function AjouteMachine (nomClass, nomMachine)
{ var sqlString = "INSERT INTO import_AD ( Type, Machines ) SELECT \"" + nomClass + "\" AS Expr1, \"" + nomMachine + "\" AS Expr2;"
rs.Open(sqlString , conn, adOpenUnspecified, adLockUnspecified);
if (!rs)
{ alert ("Erreur lors de l'ajout de la machine " + nomMachine); }
}
function AjouteLigne (NumScan, Zone, TypeZone, Valeur1, Valeur2)
{ var sqlString = "INSERT INTO import ( IDScan, Type, P1, P2, P3 ) SELECT " + NumScan + " AS Expr1, \"" + TypeZone + "\" AS Expr2, \"" + Zone + "\" AS Expr3 ";
sqlString = sqlString + ", \"" + Valeur1 + "\" AS Expr4, \"" + Valeur2 + "\" AS Expr5;";
// alert (sqlString);
rs.Open (sqlString , conn, adOpenUnspecified, adLockUnspecified);
alert (Err.Number);
if (!rs)
{ alert ("Erreur ajout ligne " + sqlString);
}
}
function InitScan (Machine)
{ sqlString = "INSERT INTO Scans (Machine) SELECT \"" + Machine + "\" AS Expr1;";
rs.Open(sqlString , conn, adOpenUnspecified, adLockUnspecified);
if (rs)
{ sqlString = sqlString = "SELECT TOP 1 IDScan FROM Scans WHERE (((Scans.Machine)=\"" + Machine + "\")) ORDER BY Scans.IDScan DESC;";
rs.Open(sqlString , conn, adOpenUnspecified, adLockUnspecified);
if (rs)
{ return rs.fields("IDScan").Value;
}
else
{ alert ("Erreur lors de la récupération de l'ID du scan " + Machine);
return 0;
}
}
else
{ alert ("Erreur lors de l'initialisation du scan " + Machine);
return 0;
}
}
</script> |
Partager