Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 1
[R] Batch pour la mise en service de modems
Auteur Message
Répondre en citant
Message [R] Batch pour la mise en service de modems 
Salut à tous,

Je me lance dans l'écriture de mon premier batch mais je manque de connaissance...

Je me pose pas mal de question sur la façon dont je coder les 2 parties (2.test de débit et 3.Relever des infos sur le CPE). >> voir code ci dessous

Code:
@echo off
title Test de mise en service xDSL
color 02
rem script pour la mise en servive de lien xDSL
:menu
echo ------------------------------------------------------------------
echo --------- Mise en Service de lien ADSL et FTTLA ----------
echo ------------------------------------------------------------------
echo.
echo.
echo MENU PRINCIPAL
echo ___________________________________________________________
echo.
echo 1.Test de Ping
echo 2.Test de Débit
echo 3.Relever des infos sur le CPE (débit, atténuation et marge au bruit)
echo Q.Quitter
echo ___________________________________________________________
echo.
rem menu principal
set /p menuprincipal="Appuyer sur la touche de votre choix et valider avec la touche entrée... > "
if /i "%menuprincipal%"=="1" goto :testping
if /i "%menuprincipal%"=="2" goto :speedtest
if /i "%menuprincipal%"=="3" goto :infoscpe
if /i "%menuprincipal%"=="Q" goto :fin
rem test de ping - 2 minutes - vers speedtest
:testping
cls
echo -------------------------------------------------------------
echo ----------------------- Test de PING ------------------------
echo -------------------------------------------------------------
echo.
echo.
echo Veuillez Patienter SVP, Le test de ping va durer 2 minutes et s'arrêter automatiquement...
echo.
ping 85.158.112.35 -n 120
echo.
echo Appuyer sur n'importe quelle touche pour revenir au menu principal...
pause>nul
cls
goto :menu
rem test de debit vers speedtest
:speedtest
cls
echo -------------------------------------------------------------
echo ----------------------- Test du débit -----------------------
echo -------------------------------------------------------------
echo speedtest code à finir rem renvoi vers le speedtest voir avec service pour info pour à jour le speedtest, manque affichage du upload
pause
cls
goto :menu
rem relever du debit, attenuation et marge au bruit
:infoscpe
cls
echo -------------------------------------------------------------
echo ----------------------- Relevé sur CPE ----------------------
echo -------------------------------------------------------------
echo.
echo.
set /p ipmodem="L'adresse IP de votre CPE est bien en 192.168.1.1, appuyer sur O/N (Oui/Non) > "
if /i "%ipmodem%"=="O" goto :ipdefaut
if /i "%ipmodem%"=="N" goto :ipsaisie
echo.
rem affichage des valeurs broadband
:ipdefaut
echo Veuillez patientez les valeurs de synchronisation de votre modem vont s'afficher...
echo.
cmd /C start http://192.168.1.1 rem manque authentification automatique et redirection vers la page affichant le broadband
echo Appuyer sur n'importe quelle touche pour revenir au menu principal...
pause>nul
cls
goto :menu
cls
:ipsaisie
rem saisie ip du cpe
set varnav=http://
set varipcpe=
set /p varipcpe="Saisir l'adresse ip du modem > "
echo.
cmd /C start %varnav%%varipcpe% rem manque authentification automatique et redirection vers la page affichant le broadband
echo Appuyer sur n'importe quelle touche pour revenir au menu principal...
pause>nul
cls
goto :menu
rem quitter le programme
:fin
cls
exit


Je me concentre d'abord sur le menu "3.Relever des infos sur le CPE".

Je souhaite afficher les valeurs de synchronisation d'un modem (débit,atténuation et marge au bruit) soit dans le batch ou sur le navigateur web par défaut.

J'ai commencé par un start suivi de l'ip local du modem et je souhaite m'authentifier automatiquement avec login et mot de passe de connection. login:mdp@192.168.1.1 ne fonctionne pas donc je pense faire un requête type post mais je n'ai aucune idée sur comment m'y prendre.

Je dois aussi afficher la page avec les valeurs de synchro en récupérant le lien de cette page avec les valeurs (enfin je pense...).

Que dois-je utiliser pour y arriver? FOR?

Sachant je ne sais pas utiliser FOR, je ne comprends pas la syntaxe même l'aide dans batch.

Qu'en pensez vous?

Pour le menu "2.Test de Débit", j'ai trouvé sur le forum http://batch.xoo.it/t4544-Bat-AutoIT-Testeur-de-bande-passante.htm mais le lien n'est pas valide.



Dernière édition par djukonline le Sam 18 Fév 2017 - 15:57; édité 1 fois

______________________________________________________
Essayer c'est réussir!!!
Réussir n'est pas la finalité...
Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message Re: Batch pour la mise en service de modems 
Salut,
djukonline a écrit:
Je dois aussi afficher la page avec les valeurs de synchro [...]
Que dois-je utiliser pour y arriver? FOR? [...] je ne sais pas utiliser FOR

Je ne sais pas à quoi ressemble ce qu'il faut extraire, mais au cas où t'aurais besoin d'apprendre à utiliser FOR, voici les liens de mes tutoriels sur FOR Smile
(la partie 1 pourrait être la plus utile dans ce cas)
Tuto' for partie 1 (décomposer une variable) : http://batch.xoo.it/t4285-D-composer-une-variable.htm
Tuto' for partie 2 (les substitutions de références de variables) : http://batch.xoo.it/t4314-Tuto-Les-substitutions-de-r-f-rences-de-variables…
Tuto' for partie 3 (for /L) : http://batch.xoo.it/t4480.htm
Tuto' for partie 4 (variables dans for) : http://batch.xoo.it/t5183-Les-variables-dans-FOR.htm




______________________________________________________
Cordialement,
Hugo, qui adore programmer, jouer à Minecraft, ZT2 et FSX.
Boutons-liens :

Hugo7, sans faire exprès... a écrit:
Il conviendra de [...] supprimer le panneau de la liste des panneaux présente dans une variable liste dans la liste des variables.
Visiter le site web du posteur Skype
Répondre en citant
Message Re: Batch pour la mise en service de modems 
djukonline a écrit:
Pour le menu "2.Test de Débit", j'ai trouvé sur le forum http://batch.xoo.it/t4544-Bat-AutoIT-Testeur-de-bande-passante.htm mais le lien n'est pas valide

Salut Laughing Désolé j'ai changé de nom de domaine sur mon site entre temps, j'ai mis à jour le post et j'ai remis le zip sur mon serv Okay

Citation:
Je souhaite afficher les valeurs de synchronisation d'un modem (débit,atténuation et marge au bruit) soit dans le batch ou sur le navigateur web par défaut.

C'est sur le pannel de la box ou modem que tu veux récupérer ça ? C'est quoi sa marque ? Et tu veux récupérer l'html de la page et ensuite le parser ?

Si oui tu peux télécharger la page avec une fonction que j'avais faite pour ne pas utiliser de commande externe
http://batch.xoo.it/t4835-T-l-charger-en-vbs-sans-probl-me-de-cache.htm

Et si c'est ça que tu veux je te dis comment parser le html pour avoir seulement les valeurs que tu veux Wink
Sky'




______________________________________________________
Visiter le site web du posteur
Répondre en citant
Message [R] Batch pour la mise en service de modems 
Citation:
Je ne sais pas à quoi ressemble ce qu'il faut extraire, mais au cas où t'aurais besoin d'apprendre à utiliser FOR, voici les liens de mes tutoriels sur FOR Smile
(la partie 1 pourrait être la plus utile dans ce cas)
Tuto' for partie 1 (décomposer une variable) : http://batch.xoo.it/t4285-D-composer-une-variable.htm
Tuto' for partie 2 (les substitutions de références de variables) : http://batch.xoo.it/t4314-Tuto-Les-substitutions-de-r-f-rences-de-variables…
Tuto' for partie 3 (for /L) : http://batch.xoo.it/t4480.htm
Tuto' for partie 4 (variables dans for) : http://batch.xoo.it/t5183-Les-variables-dans-FOR.htm


Super les tutos, je vais pouvoir me casser la tête sur ton mur de brique.
J'ai pas tout saisie mais ça va m'être utile...
Tu cartonnes !

Citation:
Salut Laughing Désolé j'ai changé de nom de domaine sur mon site entre temps, j'ai mis à jour le post et j'ai remis le zip sur mon serv Okay


Tu n'as pas à être désolé, c'est cool ton partage!
Tu pourrais expliquer comment fonctionne ton script? As tu mis en place une application sur ton serveur?

Citation:
C'est sur le pannel de la box ou modem que tu veux récupérer ça ? C'est quoi sa marque ?


C'est pas vraiment sur le pannel, les valeurs du brodband se situe dans un onglet sachant que pour le moment je me concentre
uniquement une box Technicolor TG588, c'est celle que j'installe régulièrement.
Il y a plusieurs marque de box : bewan, audiocode, cisco, technicolor.

Avant toute chose, je dois d'abord réussir à me logger sur la box de façon automatique et ensuite récupérer les valeurs.
Si je décortique les étapes pour la TG588 :
    > Connection au modem 192.168.1.1
    > Insertion automatique du login et mot de passe sur la page de connection
    > Arrivé au pannel >> redirection automatique vers l'onglet braodband
    > Récupération des valeurs


Citation:
Et tu veux récupérer l'html de la page et ensuite le parser ?

Euh, tu entends quoi par récupérer l'html et le parser... Créer un xml pour récupérer les valeurs?
Je sens que je vais apprendre des choses...

Citation:
Et si c'est ça que tu veux je te dis comment parser le html pour avoir seulement les valeurs que tu veux

Si je comprends à quoi ça me sert! Laughing Okay

Ton script vbs, je ne comprends pas vraiment ce que je dois en faire! C'est pour download le code source d'une page web???




______________________________________________________
Essayer c'est réussir!!!
Réussir n'est pas la finalité...
Répondre en citant
Message [R] Batch pour la mise en service de modems 
Oui, il sert à télécharger le coude source d'une page. Il te suffit de mettre ce code en fonction (je te conseille de le mettre tout en bas de ton code) :
Code:
:DownloadVBS :: By Skywalker
pushd "%temp%"&(echo src="%~1"&echo Set sk=CreateObject("MSXML2.XMLHTTP"^)&echo Set sy=CreateObject("ADODB.Stream"^)&echo sk.open"GET",src,false &echo sk.send(^)&echo sy.open&echo sy.Type=1&echo sy.Write sk.ResponseBody&echo sy.SaveToFile"%~2")>down.vbs&cscript down.vbs>nul2>nul&del down.vbs>nul2>nul&popd&move /Y "%tmp%\%~2" "%~2">nul
goto:eof


Puis pour enregistrer le code source dans un fichier tu procèdes ainsi :
Code:
call :DownloadVBS "http://url" "sortie.extension"

Il suffit de remplacer http://url par l'URL du site et sortie.extension par le nom du fichier ^^




______________________________________________________

Répondre en citant
Message [R] Batch pour la mise en service de modems 
Ozachi a écrit:
Oui, il sert à télécharger le coude source d'une page. Il te suffit de mettre ce code en fonction (je te conseille de le mettre tout en bas de ton code) :
Code:
:DownloadVBS :: By Skywalker
pushd "%temp%"&(echo src="%~1"&echo Set sk=CreateObject("MSXML2.XMLHTTP"^)&echo Set sy=CreateObject("ADODB.Stream"^)&echo sk.open"GET",src,false &echo sk.send(^)&echo sy.open&echo sy.Type=1&echo sy.Write sk.ResponseBody&echo sy.SaveToFile"%~2")>down.vbs&cscript down.vbs>nul2>nul&del down.vbs>nul2>nul&popd&move /Y "%tmp%\%~2" "%~2">nul
goto:eof


Puis pour enregistrer le code source dans un fichier tu procèdes ainsi :
Code:
call :DownloadVBS "http://url" "sortie.extension"

Il suffit de remplacer http://url par l'URL du site et sortie.extension par le nom du fichier ^^
ça sent un peu la pub non ?
Et si j'ai pas le cscript.exe, le script marche pas ?

Il y a d'autres codes qui font la même chose mais différemment dont 2 par moi (un avec csc, et l'autre avec SockeT).




Dernière édition par TSnake41 le Ven 20 Jan 2017 - 22:39; édité 3 fois

______________________________________________________
Partager permet le savoir. Le savoir permet de partager de nouveau savoirs.
Répondre en citant
Message [R] Batch pour la mise en service de modems 
TSnake41 a écrit:
ça sent un peu la pub non ?


T'es sérieux ?? xDDDDDD

Rien que très récemment:

-> http://batch.xoo.it/t5622-Images-cr-es-pour-cmd.htm
-> http://batch.xoo.it/t5614-Batch-Snake-IK-DC.htm
-> http://batch.xoo.it/t5634-BATCH-SkyPlayer.htm?q=#p42311




______________________________________________________
Do what you want cause a pirate is free: you are a pirate !
Skype
Répondre en citant
Message [R] Batch pour la mise en service de modems 
TSnake41 a écrit:
ça sent un peu la pub non ?


Bravo, t'as eu le mérite de me faire rire là ! Laughing
Sky a proposé son aide avant mais djukonline a dit ne pas savoir la syntaxe à utiliser, je vais pas aller détourner le sujet en allant citer des trucs hors-sujet MOI Wink
Simple taquinerie bien sûr, venez pas me taper

De plus j'ai cscript par défaut et DownloadVBS se fait via une commande interne au Batch, c'est quand même plus pratique mais là on cherche à aider notre jeune batcher en détresse alors n'allons pas débattre sur les moyens de télécharger une page web ici Mort de Rire




______________________________________________________

Répondre en citant
Message [R] Batch pour la mise en service de modems 
Ozachi a écrit:
Sky a proposé son aide avant mais djukonline a dit ne pas savoir la syntaxe à utiliser, je vais pas aller détourner le sujet en allant citer des trucs hors-sujet MOI Wink
Ok, ok, j'avais pas vu les messages d'avant Mr. Green.

Citation:
DownloadVBS se fait via une commande interne au Batch
Quoi ? cscript(.exe) est une commande EXTERNE, tout comme finstr(.exe), xcopy(.exe), robocopy(.exe), certutil(.exe), même more(.com), mode(.com)

Pour le reste : je n'avais pas vu les messages d'avant.


timothe_2000 a écrit:
Rien que très récemment:

-> http://batch.xoo.it/t5622-Images-cr-es-pour-cmd.htm
-> http://batch.xoo.it/t5614-Batch-Snake-IK-DC.htm
-> http://batch.xoo.it/t5634-BATCH-SkyPlayer.htm?q=#p42311


http://batch.xoo.it/t5634-BATCH-SkyPlayer.htm?q=#p42311 : Quoi ? Où voit tu de la pub ?
http://batch.xoo.it/t5614-Batch-Snake-IK-DC.htm : Là aussi, je ne comprends pas le délire.
http://batch.xoo.it/t5622-Images-cr-es-pour-cmd.htm : Ici, j'ai produit un programme alternatif et optimisé, comme batbox ne convient pas à mon optimisation, je n'ai pas eu d'autres choix que d'utiliser darkbox.
J'ai surtout montré les limtes de batbox, et pourquoi il ne convient pas à tous les usages.

Bon reprenons, la discussion de base...


Citation:
je souhaite m'authentifier automatiquement avec login et mot de passe de connection. login:mdp@192.168.1.1 ne fonctionne pas donc je pense faire un requête type post mais je n'ai aucune idée sur comment m'y prendre.
Il faudrait donc trouver un moyen de gérer le login en Batch, pour ça, ça doit probablement se faire facilement en VBS, je pense que Sky devrait adapter son code en conséquence.
Sinon, j'ai aussi une solution bulldozer qui marchera à tout les coups, mais demandera plus de recherche et la commande SockeT.




______________________________________________________
Partager permet le savoir. Le savoir permet de partager de nouveau savoirs.
Répondre en citant
Message [R] Batch pour la mise en service de modems 
Pour le login sur un site en VBS :

http://batch.xoo.it/t4619-VBS-Login-automatique-sur-un-s-te-web.htm

Okay




______________________________________________________
AffPng.exe , StringBetween.exe , Hex2Png.exe
Répondre en citant
Message [R] Batch pour la mise en service de modems 
Salut les gars,

Donc j'ai récupéré le code source de la page de connexion et de la page du broadband.

Par contre, je vous avoue que j'ai pas utilisé le script mais je les ai enregistrés manuellement avec le petit renard en feu (firefox). Embarassed

Page Login :
Nom du fichier > http _192.168.1.1_login.lp.htm

Code:


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
  <title>MediaAccess Gateway - Login</title>
  <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
  <link rel="stylesheet" type="text/css" href="/styles.css">
</head>
<body height="100%" style="margin:0px;">
  <noscript>
    <h1>Technicolor - MediaAccess Gateway</h1>
    <h4>To view the Web interface of your device, JavaScript must be supported and enabled on your browser! <br><br>Please enable scripting and refresh your browser.</h4>
  </noscript>
 
<script type="text/javascript">
//<![CDATA[
function disable_fields(theForm)
{
  var len = theForm.elements.length;
  for (var i = 0; i < len; i++) {
    // Don't disable "hidden" fields.
    // Don't disable the input elem "user", to compatible with Safari and Opera
    // which execute this function before form submit() method.
    if((theForm.elements[i].type.toLowerCase() != "hidden") &&
       (theForm.elements[i].name != "user"))
      theForm.elements[i].disabled = 1;
  }
}

function setLanguage(langCode)
{
  document.langSelect.elements[0].value = langCode;
  document.langSelect.submit();
  disable_fields(document.langSelect);
}

//----RTL GUI support start----
function traversingDOMNode(rootNode, callback)
{
  var currentNode = rootNode.childNodes;
  for (var i = 0; i < currentNode.length; i++){
    callback(currentNode[i]);
    traversingDOMNode(currentNode[i], callback);
  }
}

function alignByClassFlag(node)
{
  if (node.className && node.className != "") {
    if (node.className.search(/js_right/i)!=-1) {
      node.style.textAlign = "right";
    }
    else if (node.className.search(/js_left/i)!=-1) {
      node.style.textAlign = "left";
    }
  }
}

function getLanguageDirection(lang_code)
{
  var dir = "ltr";
  var rtlLangSet = new Array()
  rtlLangSet[0] = "ar"

  for (var i=0; i<rtlLangSet.length; i++) {
    if (lang_code && (lang_code.toLowerCase() == rtlLangSet[i])) {
      dir = "rtl";
      break;
    }
  }
  return dir;
}

function js_dir_rtl()
{
  document.documentElement.dir = "rtl";
  traversingDOMNode(document.documentElement, alignByClassFlag);
}
//----end----
function noenter(e) {
  var keycode;

  if (window.event)
    keycode = window.event.keyCode;
  else if (e)
    keycode = e.which;
  else
    return true;

  if (keycode == 13)
    return false;
  else
    return true;
}

// NOTE: Chrome and Safari will ignore this function and submit form directly,
//       when press "ENTER".
function enter_submit(e) {
  var keycode;

  if (window.event)
    keycode = window.event.keyCode;
  else if (e)
    keycode = e.which;
  else
    return true;

  if (keycode == 13) {
    submitAuthentication();
  }

  return true;
}

var hex_chr = "0123456789abcdef";
function rhex(num)
{
  str = "";
  for(j = 0; j <= 3; j++)
    str += hex_chr.charAt((num >> (j * 8 + 4)) & 0x0F) +
           hex_chr.charAt((num >> (j * 8)) & 0x0F);
  return str;
}
 
/*
 * Convert a string to a sequence of 16-word blocks, stored as an array.
 * Append padding bits and the length, as described in the MD5 standard.
 */
function str2blks_MD5(str)
{
  nblk = ((str.length + 8) >> 6) + 1;
  blks = new Array(nblk * 16);
  for(i = 0; i < nblk * 16; i++) blks[i] = 0;
  for(i = 0; i < str.length; i++)
    blks[i >> 2] |= str.charCodeAt(i) << ((i % 4) * 8);
  blks[i >> 2] |= 0x80 << ((i % 4) * 8);
  blks[nblk * 16 - 2] = str.length * 8;
  return blks;
}

/*
 * Add integers, wrapping at 2^32. This uses 16-bit operations internally
 * to work around bugs in some JS interpreters.
 */
function add(x, y)
{
  var lsw = (x & 0xFFFF) + (y & 0xFFFF);
  var msw = (x >> 16) + (y >> 16) + (lsw >> 16);
  return (msw << 16) | (lsw & 0xFFFF);
}
 
/*
 * Bitwise rotate a 32-bit number to the left
 */
function rol(num, cnt)
{
  return (num << cnt) | (num >>> (32 - cnt));
}
 
/*
 * These functions implement the basic operation for each round of the
 * algorithm.
 */
function cmn(q, a, b, x, s, t)
{
  return add(rol(add(add(a, q), add(x, t)), s), b);
}
function ff(a, b, c, d, x, s, t)
{
  return cmn((b & c) | ((~b) & d), a, b, x, s, t);
}
function gg(a, b, c, d, x, s, t)
{
  return cmn((b & d) | (c & (~d)), a, b, x, s, t);
}
function hh(a, b, c, d, x, s, t)
{
  return cmn(b ^ c ^ d, a, b, x, s, t);
}
function ii(a, b, c, d, x, s, t)
{
  return cmn(c ^ (b | (~d)), a, b, x, s, t);
}

/*
 * Take a string and return the hex representation of its MD5.
 */
function MD5(str)
{
  x = str2blks_MD5(str);
  var a =  1732584193;
  var b = -271733879;
  var c = -1732584194;
  var d =  271733878;

  for(i = 0; i < x.length; i += 16)
  {
    var olda = a;
    var oldb = b;
    var oldc = c;
    var oldd = d;

    a = ff(a, b, c, d, x[i+ 0], 7 , -680876936);
    d = ff(d, a, b, c, x[i+ 1], 12, -389564586);
    c = ff(c, d, a, b, x[i+ 2], 17,  606105819);
    b = ff(b, c, d, a, x[i+ 3], 22, -1044525330);
    a = ff(a, b, c, d, x[i+ 4], 7 , -176418897);
    d = ff(d, a, b, c, x[i+ 5], 12,  1200080426);
    c = ff(c, d, a, b, x[i+ 6], 17, -1473231341);
    b = ff(b, c, d, a, x[i+ 7], 22, -45705983);
    a = ff(a, b, c, d, x[i+ 8], 7 ,  1770035416);
    d = ff(d, a, b, c, x[i+ 9], 12, -1958414417);
    c = ff(c, d, a, b, x[i+10], 17, -42063);
    b = ff(b, c, d, a, x[i+11], 22, -1990404162);
    a = ff(a, b, c, d, x[i+12], 7 ,  1804603682);
    d = ff(d, a, b, c, x[i+13], 12, -40341101);
    c = ff(c, d, a, b, x[i+14], 17, -1502002290);
    b = ff(b, c, d, a, x[i+15], 22,  1236535329);

    a = gg(a, b, c, d, x[i+ 1], 5 , -165796510);
    d = gg(d, a, b, c, x[i+ 6], 9 , -1069501632);
    c = gg(c, d, a, b, x[i+11], 14,  643717713);
    b = gg(b, c, d, a, x[i+ 0], 20, -373897302);
    a = gg(a, b, c, d, x[i+ 5], 5 , -701558691);
    d = gg(d, a, b, c, x[i+10], 9 ,  38016083);
    c = gg(c, d, a, b, x[i+15], 14, -660478335);
    b = gg(b, c, d, a, x[i+ 4], 20, -405537848);
    a = gg(a, b, c, d, x[i+ 9], 5 ,  568446438);
    d = gg(d, a, b, c, x[i+14], 9 , -1019803690);
    c = gg(c, d, a, b, x[i+ 3], 14, -187363961);
    b = gg(b, c, d, a, x[i+ 8], 20,  1163531501);
    a = gg(a, b, c, d, x[i+13], 5 , -1444681467);
    d = gg(d, a, b, c, x[i+ 2], 9 , -51403784);
    c = gg(c, d, a, b, x[i+ 7], 14,  1735328473);
    b = gg(b, c, d, a, x[i+12], 20, -1926607734);

    a = hh(a, b, c, d, x[i+ 5], 4 , -378558);
    d = hh(d, a, b, c, x[i+ 8], 11, -2022574463);
    c = hh(c, d, a, b, x[i+11], 16,  1839030562);
    b = hh(b, c, d, a, x[i+14], 23, -35309556); 
    a = hh(a, b, c, d, x[i+ 1], 4 , -1530992060);
    d = hh(d, a, b, c, x[i+ 4], 11,  1272893353);
    c = hh(c, d, a, b, x[i+ 7], 16, -155497632);
    b = hh(b, c, d, a, x[i+10], 23, -1094730640);
    a = hh(a, b, c, d, x[i+13], 4 ,  681279174);
    d = hh(d, a, b, c, x[i+ 0], 11, -358537222);
    c = hh(c, d, a, b, x[i+ 3], 16, -722521979);
    b = hh(b, c, d, a, x[i+ 6], 23,  76029189); 
    a = hh(a, b, c, d, x[i+ 9], 4 , -640364487);
    d = hh(d, a, b, c, x[i+12], 11, -421815835);
    c = hh(c, d, a, b, x[i+15], 16,  530742520);
    b = hh(b, c, d, a, x[i+ 2], 23, -995338651);

    a = ii(a, b, c, d, x[i+ 0], 6 , -198630844);
    d = ii(d, a, b, c, x[i+ 7], 10,  1126891415);
    c = ii(c, d, a, b, x[i+14], 15, -1416354905);
    b = ii(b, c, d, a, x[i+ 5], 21, -57434055); 
    a = ii(a, b, c, d, x[i+12], 6 ,  1700485571);
    d = ii(d, a, b, c, x[i+ 3], 10, -1894986606);
    c = ii(c, d, a, b, x[i+10], 15, -1051523);   
    b = ii(b, c, d, a, x[i+ 1], 21, -2054922799);
    a = ii(a, b, c, d, x[i+ 8], 6 ,  1873313359);
    d = ii(d, a, b, c, x[i+15], 10, -30611744); 
    c = ii(c, d, a, b, x[i+ 6], 15, -1560198380);
    b = ii(b, c, d, a, x[i+13], 21,  1309151649);
    a = ii(a, b, c, d, x[i+ 4], 6 , -145523070);
    d = ii(d, a, b, c, x[i+11], 10, -1120210379);
    c = ii(c, d, a, b, x[i+ 2], 15,  718787259);
    b = ii(b, c, d, a, x[i+ 9], 21, -343485551);

    a = add(a, olda);
    b = add(b, oldb);
    c = add(c, oldc);
    d = add(d, oldd);
  }
  return rhex(a) + rhex(b) + rhex(c) + rhex(d);
}

var realm = "Technicolor Gateway";
var nonce = "3668:144516:29f451217e16731d60117359ee753db6";
var qop = "auth";
var uri = "/login.lp";

function submitAuthentication()
{
  var user = document.getElementById("user").value;
  var pwd  = document.getElementById("password").value;
  document.getElementById("password").disabled = true;
  var HA1 = MD5(user + ":" + realm + ":" + pwd);
  var HA2 = MD5("GET" + ":" + uri);
  document.getElementById("hidepw").value = MD5(HA1 + ":" + nonce +
                          ":" + "00000001" + ":" + "xyz" + ":" + qop + ":" + HA2);
  document.authform.submit();
  disable_fields(document.authform);
}

function cancelLogin()
{
  if (window.opener || window.name == "userpage")
    window.close();     // Close pop-up login window
  else
    location.href="/";
}
//]]>
</script>

  <table cellspacing="0" cellpadding="0" border="0" class="main" height="100%">
    <tr>
      <td>
        <table cellspacing="0" cellpadding="0" class="banner" width="100%">
          <tr>
             <td>
         <table class="nopadtable">
            <tr><td id="productName" class="product js_right">
                      <script type="text/javascript">
                  var headerText = 'MediaAccess TG588v'; //CPE_P00111538
                  document.write(headerText.replace(" ","&nbsp;"));
                     </script>
                        </td></tr>
            <tr><td class="displaySettings js_right" id="displaySettings">
               <span class="langSelect" id="langSelect">
                  <form name="langSelect" action="" method="post"><input type="hidden" name="6" value="en">
                                     <input type="hidden" name="rn" value="-257071764">

                            <script type="text/javascript">
                              var g_dir = getLanguageDirection("en");
                            </script>

                     </form>
                  </span>           
            </td></tr>
            <script type="text/javascript">
               
                  document.getElementById('displaySettings').style.visibility = "hidden";
               
                </script>
         </table>   
            </td>
            <td class="logo js_left">
            <img src="/images/logo.gif"/>
            </td>           
          </tr>
        </table>
      </td>
    </tr>
    <tr>
    <td class="page" width="760">
        <table cellpadding="0" cellspacing="0" border="0" width="100%">
          <tr>
            <td>
              <table cellspacing="0" cellpadding="0" border="0" width="100%">
                <tr>
                  <td>
             
<div class='contentcontainer'>
<hr>
<div class='contentitem'>
<table cellspacing='0' cellpadding='0'>
  <tr><td class='icon js_right' valign='top' width='100px'><img src='/images/user__xl.gif' alt='Login !'></td>
  <td class='data js_right' valign='top'><table cellspacing='0' cellpadding='0'><tr><td align='left' class='js_right'><span class='itemtitle'>Login</span></td><td align='right'></td></tr>
  <tr><td colspan='2'>
    <p>Enter your username and password to access your MediaAccess Gateway.</p>


    <form method="post" action="login.lp" name="authform" id="authform">
    <input type="hidden" name="rn" value="-520188644">
    <input type="hidden" name="hidepw" id="hidepw" value=""/>

    <table width='100%' cellspacing='0' cellpadding='0'>
      <tr><td width="40" valign="top"></td>
      <td valign="top">
        <table width='100%' class="datatable" cellspacing='0' cellpadding='0'>
          <tr><td></td><td width='30px'></td><td width='220px'></td><td width='50px'></td></tr>
          <tr><td colspan='4' height='7'><img src='/images/spacer.gif' alt='' border='0' height='7' width='1'></td></tr>
          <tr>
            <td width='120px'>Username:</td>
            <td colspan='3'><input type="text" name="user" id="user" style="width: 250px;" onkeypress="return noenter(event)" maxlength="63" /></td>
          </tr>
          <tr><td colspan='4' height='7'><img src='/images/spacer.gif' alt='' border='0' height='7' width='1'></td></tr>
          <tr>
            <td width='120px'>Password:</td>
            <td colspan='3'><input type="password" name="password" id="password" maxlength="64" style="width: 250px;" onkeypress="return enter_submit(event);" /></td></td>
          </tr>
          <tr><td colspan='4' height='7'><img src='/images/spacer.gif' alt='' border='0' height='7' width='1'></td></tr>
          <tr>
            <td colspan="4" align="right">
              <input name="ok" type="button" value="OK" onclick='submitAuthentication()' />
              <input name="cancel" type="button" value="Cancel" onclick='cancelLogin()' />
            </td>
          </tr>
        </table>
      </td></tr>
    </table>
    </form>
    </td></tr></table>
</td></tr></table>
</div>

<script type="text/javascript">
//<![CDATA[
document.authform.user.focus();
if (g_dir == "rtl")
  js_dir_rtl();
//]]>
</script>

</div>
                  </td>
                </tr>
              </table>
            </td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
</body>
</html>


Page Broadband :
Nom du fichier > http _192.168.1.1_cgi_b_dsl_dt_ be=0&l0=2&l1=0.htm

Code:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
  <title>MediaAccess Gateway - DSL Connection</title>
  <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
  <script type="text/javascript">var g_navitem = -1;</script>
  <script type="text/javascript"> var g_focus = -1;</script>
  <script type='text/javascript' src='/util.js'></script>
  <script type="text/javascript">var g_dir = getLanguageDirection("en");</script>
  <link rel="stylesheet" type="text/css" href="/styles.css">
  <!-- Fix for CPE_P00112452 -->
  <script>
    function setCookie(name,value,days)
    {
        if (days)
        {
            var date = new Date();
            date.setTime(date.getTime()+(days*24*60*60*1000));
            var expires = "; expires="+date.toGMTString();
        }
        else
            var expires = "";

        document.cookie = name+"="+value+expires+"; path=/";
    }

    function getCookie(c_name)
    {
        var i,x,y,ARRcookies=document.cookie.split(";");
        for (i=0;i<ARRcookies.length;i++)
        {
            x=ARRcookies[i].substr(0,ARRcookies[i].indexOf("="));
            y=ARRcookies[i].substr(ARRcookies[i].indexOf("=")+1);
            x=x.replace(/^\s+|\s+$/g,"");
            if (x==c_name)
            {
                return unescape(y);
            }
        }
    }   

    function eraseCookie(name)
    { 
        setCookie(name,"",-1);
    }

    function reload()
    {
        var useragent = navigator.userAgent;
        var url = document.URL;
        var isFirefox = useragent.search("Firefox");
        var isTelephonyPage = url.search("cgi/b/_voip_/ov");
        if ( isFirefox > 0 && isTelephonyPage > 0 )
        {
            var cookie = getCookie("test");
            if (cookie == null)
            {
                document.getElementById("reload").innerHTML="Loading data... Please Wait...";
                setCookie("test","test",1);
                location.reload(true);
            }
            else
            {
                eraseCookie("test");
            }
        }
    }
  </script>
  <!-- Fix for CPE_P00112452 -->
</head>
<body onLoad="reload();setFocus();" height="100%" style="margin:0px;">
  <noscript>
    <h1>Technicolor - MediaAccess Gateway</h1>
    <h4>To view the Web interface of your device, JavaScript must be supported and enabled on your browser! <br><br>Please enable scripting and refresh your browser.</h4>
  </noscript>
  <table cellspacing="0" cellpadding="0" border="0" class="main" height="100%" width="960">
    <tr>
      <td colspan="2">
        <table cellspacing="0" cellpadding="0" class="banner" width="100%">
          <tr>
             <td>      
              <table class="nopadtable">
                <tr><td id="productName" class="product js_right">
                   <script type="text/javascript">
                      var headerText = 'MediaAccess TG588v';
                      document.write(headerText.replace(" ","&nbsp;"));
                  </script>
            </td></tr>
                <tr><td class="displaySettings js_right" id="displaySettings">
               <script type="text/javascript">
                     writeDisplaySettings();
               </script>
               <span class="langSelect" id="langSelect">
                  <script type="text/javascript">
                     document.write('|&nbsp;'+'Language'+':');
                  </script><form name="langSelect" action="/cgi/language.cgi" method=post><span class="langSelect"><input type="hidden" name=30 value="en"><input type="hidden" name='2' value='740097831'></span></form>
               </span>           
            </td></tr>
            <script type="text/javascript">               
                    if (0==1) {
                      var start;
                      var urlstr = "://";
                      if ((start=location.href.indexOf(urlstr)) != -1) {
                        var url = new String(location.href.substr(start+urlstr.length));
                        GoAndRemember("/aws.lp", "url="+url);
                      }
                    }
                </script>
            <script type="text/javascript">
               if (document.getElementById('langSelect').innerHTML.search("setLanguage")==-1)
                  document.getElementById('langSelect').style.visibility = "hidden";
               </script>   
              </table>
            </td>
            <td class="logo js_left">
                <script type="text/javascript">
                   var logoRedirect = ''
                   if (logoRedirect && logoRedirect.replace(/^\s+|\s+$/g, "").length )
                      document.write('<a href = '+logoRedirect+' > <img src="/images/logo.gif"/></a>');
                   else
                      document.write('<img src="/images/logo.gif"/>');
                </script>
            </td>
         </tr><tr>
            <td colspan="2"><script type="text/javascript">pm_write_messages();</script>
</td>           
          </tr>
        </table>
      </td>
    </tr>
    <tr>   
      <td class="Menu">
        <script type="text/javascript">writeMenu();</script>&nbsp;
      </td>
      <td class="page" style="width:760px">
        <table cellpadding="0" cellspacing="0" border="0" width="100%">
          <script type="text/javascript">writeNavBar();</script>
          <tr>
            <td>
              <table cellspacing="0" cellpadding="0" border="0" width="100%">
                <tr>
                  <td>


<div class='contentcontainer'>
<hr>
<div class='contentitem js_right'>
<table cellspacing='0' cellpadding='0'>
<tr><td class='icon' valign='top' width='100px'><img src='/images/cplngrxl.gif' alt='Physical Connectivity OK'></td>
<td class='data' valign='top'><table cellspacing='0' cellpadding='0'><tr><td align='left' class='js_right'><span class='itemtitle'>DSL Connection</span></td><td align='right' class='js_left'></td></tr>
<tr><td colspan='2'><br><table cellspacing='0' cellpadding='0' width='100%'><tr><td width='40' valign='top'><img src='/images/bull__md.gif' alt=''></td><td valign='top'>
<span class='blocktitle'>Link Information</span><br>
<table width='100%' class='datatable' cellspacing='0' cellpadding='0'>
<tr><td></td><td width='30px'></td><td width='220px'></td><td width='50px'></td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>Uptime:</td><td colspan='3'>0 days, 0:55:42</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>DSL Type:</td><td colspan='3'>ITU-T G.992.5 Annex A (ADSL2+ over POTS)</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>Bandwidth (Up/Down) [kbps/kbps]:</td><td colspan='3'>1.023 / 22.896</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>Data Transferred (Sent/Received) [<span class='inv_unit'>kB/kB</span>]:</td><td colspan='3'>267,26 / 453,08</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>Output Power (Up/Down) [dBm]:</td><td colspan='3'>12,6 / 0,0</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>Line Attenuation (Up/Down) [dB]:</td><td colspan='3'>9,3 / 13,5</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>SN Margin (Up/Down) [dB]:</td><td colspan='3'>10,7 / 8,9</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>System Vendor ID (Local/Remote):</td><td colspan='3'>TMMB / ----</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>Chipset Vendor ID (Local/Remote):</td><td colspan='3'>BDCM / IFTN</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>Loss of Framing (Local/Remote):</td><td colspan='3'>0 / 0</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>Loss of Signal (Local/Remote):</td><td colspan='3'>0 / 0</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>Loss of Power (Local/Remote):</td><td colspan='3'>0 / 0</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>Loss of Link (Remote):</td><td colspan='3'>-</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>Error Seconds (Local/Remote):</td><td colspan='3'>0 / 0</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>FEC Errors (Up/Down):</td><td colspan='3'>0 / 13</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>CRC Errors (Up/Down):</td><td colspan='3'>0 / 0</td></tr>
<tr><td height='7' colspan='4'><img src='/images/spacer.gif' width='1' height='7' border='0' alt=''></td></tr>
<tr><td width='170'>HEC Errors (Up/Down):</td><td colspan='3'>0 / 0</td></tr>
</table>
</td></tr></table>
</td></tr></table></td></tr></table></div>
<script type='text/javascript'>generateTasks()</script>
</div>
<script type='text/javascript'>
if (g_dir == "rtl")
  js_dir_rtl();
</script>
                  </td>
                </tr>
              </table>
            </td>
          </tr>
        </table>
      &nbsp;
      </td>
    </tr>
  </table>
</body>
</html>


Citation:
Pour le login sur un site en VBS :

http://batch.xoo.it/t4619-VBS-Login-automatique-sur-un-s-te-web.htm


Cela peut le faire sauf que ça ouvre la page avec IE.

Sinon c'est possible de l'adapter avec ce VBS???

Code:
Dim oShell
Set oShell = WScript.CreateObject ("WSCript.shell")
oShell.run "http://192.168.1.1"


Cela ouvre le navigateur par défaut.




______________________________________________________
Essayer c'est réussir!!!
Réussir n'est pas la finalité...
Répondre en citant
Message [R] Batch pour la mise en service de modems 
djukonline a écrit:

Cela peut le faire sauf que ça ouvre la page avec IE.

Sinon c'est possible de l'adapter [...]avec le navigateur par défaut.

Je ne pense pas, car le code de Sacha utilise des instructions qu'il envoie à IE, alors que ces instructions dépendent de ton navigateur, il est même possible que ce genre d'instructions n'existent pas.
Après pourquoi vouloir faire compliqué quand on peut faire ça avec IE? Laughing




______________________________________________________
Cordialement,
Hugo, qui adore programmer, jouer à Minecraft, ZT2 et FSX.
Boutons-liens :

Hugo7, sans faire exprès... a écrit:
Il conviendra de [...] supprimer le panneau de la liste des panneaux présente dans une variable liste dans la liste des variables.
Visiter le site web du posteur Skype
Répondre en citant
Message [R] Batch pour la mise en service de modems 
Slt à tous,

Je suis toujours au point mort pour ce programme...
Un petit up!




______________________________________________________
Essayer c'est réussir!!!
Réussir n'est pas la finalité...
Répondre en citant
Message [R] Batch pour la mise en service de modems 
Salut,

J'avais codé ça ya longtemps pour pouvoir parler avec cleverbot, en ligne de commande :

Code:
@echo off

set /p "message= : "

(echo On Error Resume Next
echo set nav = CreateObject^("InternetExplorer.Application"^)
echo Set WshShell = WScript.CreateObject^("WScript.Shell"^)
echo nav.Navigate "http://www.cleverbot.com/"
echo nav.Visible = false
echo Do While not nav.ReadyState = 4
echo Loop
echo nav.document.All.tags^("input"^).Item^("stimulus"^).Value = "%message%"
echo WshShell.AppActivate "InternetExplorer.Application"
echo WshShell.SendKeys "~")>send.vbs

send.vbs
del send.vbs


En fait j'entrais un msg et ça l'envoyait en passsant par IE qui se lance en étant caché, essaye de faire ça pour que ça envoit dans le formulaire pour se log ^^ (dsl suis sur tel :c)




______________________________________________________
Visiter le site web du posteur
Répondre en citant
Message [R] Batch pour la mise en service de modems 
Salut Sky,

Je pense devoir réapprendre le VB!
Sans ça je ne pourrais pas aller bien loin...

Bon ce n'est que parti remise. Okay




______________________________________________________
Essayer c'est réussir!!!
Réussir n'est pas la finalité...
Message [R] Batch pour la mise en service de modems 


Montrer les messages depuis:
Répondre au sujet Page 1 sur 1
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch