Voir ici pour plus de détails
http://hi.baidu.com/lael80/blog/item/6633d7fc89f9f282b801a061.html
http://www.gzyd.net/lael/coding.rar
Encodage de fichiers Conversion / écran écran et déchiffrement / Conversion chinoise simplifiée et traditionnelle 1.0
Remarques sur l'utilisation:
1. Veuillez sauvegarder avant utilisation, et vous êtes responsable des pertes causées par l'utilisation de ce logiciel;
2. Avant d'effectuer un codage et une conversion, assurez-vous que le codage source de tous les fichiers est cohérent et sélectionnez correctement, sinon une erreur peut se produire.
3. Avant de crypter ou de décrypter le code ASP ou de convertir un chinois simple et traditionnel, vous devez confirmer que le code du fichier est ANSI, sinon un code brouillé peut se produire.
Après avoir terminé l'opération, vous pouvez revenir au code d'origine.
4. Le cryptage ASP équivaut à appeler Microsoft:
Si inclus: <% @ lingots = "vbscript" codepage = "936"%>
screnc.exe / s / f / xl / easp *. *
screnc.exe / s / f / xl / ehtm *. *
sinon:
screnc.exe / s / f / easp *. *
screnc.exe / s / f / ehtm *. *
Crypt externe * .js ou * .vbs, veuillez d'abord ajouter le fichier.
<ScriptLanguage = "Script Language"> Code </cript>, supprimez-le après la fin.
5. Le décryptage ASP est modifié par vous-même. Le texte original est de JScript, et il a fallu une journée pour le changer en VBScript, haha
6. Si le fichier d'origine contient à la fois des codes cryptés et non cryptés (la situation se produit rarement ~ _ ~),
Veuillez d'abord exécuter le décryptage, puis le crypter à nouveau.
7. Coding.txt est la liste de codage du fichier système.
8. Lorsque vous utilisez ce logiciel, vous n'ajoutez aucune information personnelle au code, donc il assurera la saveur d'origine.
9. Merci pour votre utilisation.
10. Ce logiciel peut également vous aider à enregistrer des fichiers sous plusieurs dossiers dans le même répertoire ~ _ ~
11. Certains systèmes peuvent avoir besoin d'installer la bibliothèque d'exécution VB6 ou VB ou WindowsScriptencoder
Autres instructions:
1. TextBox prend-il en charge le contenu binaire?
2. Ce logiciel n'autorise pas le cryptage deux fois.
Cela peut être un problème avec le décryptage du code (certains caractères inconnus apparaîtront après le premier décryptage).
Il se peut également que certains caractères inconnus apparaissent plusieurs fois dans le chiffrement, ce qui fait échouer l'opération de décryptage. Si vous souhaitez terminer les erreurs mentionnées dans les autres instructions ci-dessus
La pièce de conversion d'encodage peut être automatiquement identifiée et sélectionnée librement si vous devez ajouter / supprimer des en-têtes de fichiers bom.
Veuillez laisser votre adresse e-mail et mon URL et je vous enverrai le code source. Identifiez automatiquement l'encodage ...
Il existe déjà une fonction dans le code source (module1.bas / filecodingCheck ()).
Mais il n'est pas très précis après les tests, en particulier les fichiers sans en-têtes BOM.
PublicFunctionFilecodingCheck (ByValFilePathassstring)
Dimsmobjasnewadodb.stream
Dimsmread1asinteger, smread2asinteger, smread3asinteger
Smobj.type = 1
Smobj.open
Smobj.loadfromfilefilepath
Smobj.position = 0
Iflenb (smobj.read)> = 1Then
Smobj.position = 0
SmRead1 = ASCB (smobj.read (1))
Endire
Smobj.position = 0
Iflenb (smobj.read)> = 2Then
Smobj.position = 1
SmRead2 = ASCB (smobj.read (1))
Endire
Smobj.position = 0
Iflenb (smobj.read)> = 3Then
Smobj.position = 2
SmRead3 = ASCB (smobj.read (1))
Endire
Ifsmread1 = & hffandsmread2 = & hfethen
FileCodingCheck = "Unicode"
Elseifsmread1 = & hFeandSmRead2 = & hfftThen
FileCodingCheck = "UnicodeBigendien"
Elseifsmread1 = & hefandsmread2 = & hbbandsmread3 = & hbftThen
FileCodingCheck = "UTF-8"
Autre
FileCodingCheck = "ANSI"
Endire
Smobj.close
Setsmobj = rien
Finition de fin