Empfohlen: Verwenden Sie das Vertrauen, um einen Lasttest für Ihr ASP -Programm durchzuführen In der Einführung der Programme, die von herkömmlichen CS-strukturierten Anwendungen zu den derzeit beliebten Web-Space-Programmen wechseln, stellen wir fest, dass wir versuchen, mit den wachsenden Anforderungen an Messbarkeit und Leistung Schritt zu halten. Eine der größten Herausforderungen besteht darin, zu bestimmen, wie viele Benutzer Ihr Programm unterstützen kann
Lassen Sie uns kurz über das ID3 -Tag von MP3 sprechen, da es hauptsächlich verwendet wird, um dieses Ding zu bedienen
MP3 war nicht so, wie wir heute zu Beginn gesehen haben, einschließlich Sänger, Epochen, Sammlungen und anderen Informationen.
Es gibt nur einige einfache Parameter wie Ja/Nein, um anzuzeigen, ob es privat oder urheberrechtlich geschützt ist, was für die damit verbundene Arbeit von MP3 zu viel Unannehmlichkeit geführt hat. Im Jahr 1996 schlug ein Ausländer vor, einen Daten hinter jeder MP3 hinzuzufügen, um die oben genannten Informationen zu speichern. Später entwickelte es sich zu ID3 V1. Soweit ich weiß, hat es 1,1 erreicht. Für Details sollte es selbst überprüft werden.
Es ist immer noch die alte Angewohnheit, Metadaten zur Einführung von DLLs zu verwenden. Ich habe bereits Artikel gepostet. Wenn Sie es nicht wissen, überprüfen Sie es bitte selbst.
Schauen Sie sich den Code an
| 〈!-Metadaten Typ = Typelib UUID = 00000205-0000-0010-8000-00AA006D2EA4 Name = adodb Typbibliothek -> （% Funktionskonvertbin (binär) 'Diese Funktion wandelt ein binäres Byte in ein ASCII -Byte um. für i = 1 bis lenb (binär) strar = chr (ascb (Midb (binär, i, 1))) Convertbin = Convertbin & Strchar Nächste Endfunktion Dimer Objstream Dimer Strtag, Strsongname, Strartist, Stralbum, Stryear, _ StrComputer, StrGenre, Strfile 'Geben Sie den Ordner an, den Sie durchführen möchten, und zeigen Sie alle MP3s an Const order = c:/mp3s/ 'Schnapp dir die Ordnerinformationen Dim OBJFSO, Objfolker, Objfile Setzen Sie OBJFSO = Server.createObject (scripting.filesystemObject) Setzen Sie objfolker = objfso.getFolder (Ordner) 'Erstellen Sie das Stream -Objekt Setzen Sie objstream = server.createObject (adodb.stream) objstream.type = adypebinary 'Schaufeln Sie die Dateien im Ordner durch Für jede objfile in objfolder.files 'Öffne den Stream objstream.open objstream.loadfromfile objfile.path 'Lesen Sie die letzten 128 Bytes objstream.position = objstream.size - 128 'Lesen Sie die ID3 V1 -Tag -Info Strag = Convertbin (Objstream.read (3)) Wenn ucase (strtag) = tag dann dann strsongname = convertbin (objstream.read (30)) startist = convertbin (objstream.read (30)) stralbum = convertbin (objstream.read (30)) Stryear = convertbin (objstream.read (4)) StrComputer = Convertbin (Objstream.read (30)) Ende wenn 'Zeigen Sie die Ergebnisse an Antwort. ID3 -Tag -Info für: 〈/td〉 〈/tr 〈tr〉 & _ 〈Td colspan = 2〉 & objFile.name & 〈/td 〈/tr〉 Antwort. 〈Td〉 & startist & 〈/td〉 〈/tr〉 Antwort. 〈Td〉 & strsongname & 〈/td 〈/tr〉 Antwort. 〈Td〉 & stralbum & 〈/td 〈/tr〉 Antwort. 〈Td〉 & stryear & 〈/td 〈/tr〉 Antwort. 〈/Td〉 〈td〉 & strComputer & 〈/td 〈/tr〉 Antwort.Write 〈/Tabelle〉 objstream.close Antwort. Nächste Setzen Sie Objstream = nichts 'Aufräumen ... %〉 |
Probieren Sie es selbst aus
Hoffe es hilft dir
Teilen: ASP: Richtig oder falsch, Sie verstehen Ihren IF -Anweisungsprozess deutlich Lernen Sie ASP, um Ihren IF -Anweisungsprozess zu verstehen. Das Folgende ist der zitierte Inhalt: Wenn Bedingung dann [Anweisungen1] sonst [Anweisungen2] enden, wenn