Recommandé: Utilisez ASP pour analyser automatiquement l'adresse d'image dans la page Web Désormais, l'éditeur HTML basé sur les pages Web est utilisé de plus en plus dans le système d'information et le système d'articles. Une page Web peut maintenir son style d'origine dès qu'il colle, et les images peuvent également être maintenues sur cette page. Cependant, pendant l'utilisation, si l'image sur la page collée est supprimée, elle
ASP est une technologie lancée par Microsoft pour remplacer l'interface universelle de passerelle. Son nom complet est des pages de serveurs actifs. Il s'agit d'un environnement d'exécution côté serveur Web. ASP lui-même contient des moteurs VBScript et JavaScript, permettant à des scripts d'être intégrés directement dans HTML. Maintenant, je vais partager avec vous quelques conseils sur la façon dont nous utilisons ASP.
1. Colonne d'information
La plupart des pages Web ont des barres d'information pour afficher le sujet des nouvelles récentes. Cliquez sur ce sujet pour afficher les rapports détaillés. Si vous les écrivez tous les jours un par un sur la page Web, il serait trop difficile de créer des liens à tour de rôle. Comment le faire mettre à jour automatiquement en fonction du fichier?
1. Préparation:
1) Créez un dossier et nommez-le, en supposant qu'il est stocké dans d: / asp / répertoire;
2) Écrivez le contenu détaillé de chaque nouvelle dans un fichier, et la forme de dénomination de ce fichier est: x (newstime) .htm. Où X est le thème de cette nouvelle, et Newstime est le moment où la nouvelle est publiée (écrite dans l'ordre de l'année-mois). Pourquoi écrivez-vous comme ça? Vous le saurez après avoir lu les idées d'algorithmes et les programmes source ci-dessous.
2. De cette façon, les dernières nouvelles se classent au sommet. Tant que les principaux noms de fichiers dans le dossier d'actualités sont affichés dans la position correspondante de la page Web, les dernières nouvelles peuvent être affichées dans la colonne de nouvelles comme décrit dans 1.
3. Bloc source (écrit en VBScript)
| Ce qui suit est le contenu cité: <% DIM FS, F, F1, FC, Filenum dénombrement faible Dim I, J, T1, T2 Fichier DIM (100) Dim Mystr (100) 'Standard of Date dans le fichier comte = 0 Set fs = createObject (scripting.fileSystemObject) Définir F = Fs.GetFolder (D: / ASP / NEWS) Définir FC = F.Files Pour chaque F1 en FC compter = compter 1 'compter le nombre de fichiers fichier (count) = fs.getBasename (F1) 'Nom de la base du fichier de balise mypos = instr (1, fichier (count), () ') position dans le nom de base de fichier 'Chaîne de date dans le nom de la base de fichiers mystr (count) = mid (fichier (count), mypos 1, len (fichier (count)) - (mypos 1)) suivant pour i = 1 pour compter pour j = 1 à compter-i Si mystr (j) <mystr (j 1) alors T1 = fichier (j) fichier (j) = fichier (j 1 fichier (j 1) = t1 t2 = mystr (j) mystr (j) = mystr (j 1) mystr (j 1) = t2 terminer si suivant suivant j = 1 Si le nombre <10 alors 'La colonne de nouvelles montre 10 nouvelles TEMCOUNT = COUNT autre TEMCOUNT = 10 terminer si faire pendant que j <= temcount%> <a href = fichier: /// d: / asp / news / <% = file (j)%> .htm cible = new_window> <% = file (j)%> </a> <% J = J 1 boucle %> |
4. Contenu de la colonne d'information mise à jour:
Tant que vous développez de bonnes habitudes d'écriture, faites en sorte que le nom de l'actualité suive les exigences de 1, puis enregistrez les fichiers écrits dans le dossier d'actualités, les 10 dernières nouvelles s'affichent automatiquement.
2. Bulletin
En plus de la colonne d'information, la plus couramment utilisée est le babillard, qui est principalement utilisé pour afficher certaines notifications importantes. Bien sûr, ces notifications doivent être modifiées fréquemment. Allez-vous laisser les utilisateurs accéder au programme source pour modifier chaque fois qu'ils modifient le contenu de l'annonce? Bien sûr que non. Nous devons fournir une interface de maintenance à l'utilisateur, de sorte que tant que l'utilisateur entre une notification, le contenu de notification sera naturellement affiché dans le babillard sur la page Web.
1. La clé pour résoudre ce problème réside dans l'application flexible des objets FileSystemObject et des objets TextStream. Dans les applications réelles, vous n'avez pas besoin de créer un objet TextStream par vous-même, car tant que vous ouvrez le fichier avec l'objet FileSystemObject, le système créera automatiquement un objet TextStream. Autrement dit, une fois que la méthode OpenTextFile ou CreateTextFile sera appelée, l'objet TextStream sera remis en arrière.
2. Il y a trois fichiers pertinents requis: update.asp, annonce.asp, maintenance text.txt et les enregistrer dans le répertoire d: / asp / maintenir.
3. Les fonctions principales et les blocs source des trois fichiers:
1) Update.asp
La fonction principale consiste à permettre à l'utilisateur de saisir l'annonce pour afficher, vérifiez si le contenu d'entrée est vide. S'il n'est pas vide, il sera soumis au programme annonce.asp pour le traitement.
| Ce qui suit est le contenu cité: <html> <adal> <meta http-equiv = contenu contenu contenu = text / html; charse = gb2312> <méta-name = contenu du générateur = Microsoft FrontPage 4.0> <meta name = Progid Content = FrontPage.Editor.Document> <Title> Mettez à jour le contenu du Bulletin Board </Title> </ head> <body> <Script Language = VBScript> fonction datacheck () DIM MSG, ERRFLAG errflag = true Si Len (Trim (maintenue.t1.value)) = 0 alors focusto (0) errflag = false msg = veuillez saisir le contenu de l'annonce à soumettre terminer si if (errflag = false) alors MSGBOX MSG, 64, oh non! fonction de sortie terminer si datacheck = errflag maintenir. fonction finale sous-focuso (x) document.maintain.elements (x) .focus () Sub-Sub </cript> ① <Form Method = post-action = annonce.asp name = maintenir> <p> <Type d'entrée = nom de texte = t1 size = 84> <Type d'entrée = réinitialiser la valeur = réécriture de nom = b2> <entrée type = Button Value = Soumider Name = B1 onClick = Datacheck ()> </p> <hr color = # ff99ff size = 1> </ form> </docy> </html> |
La section Action = annonce.asp dans la déclaration ① souligne que le programme à démarrer après la soumission du formulaire est annonce.asp.
2) Annonce.asp
Le fichier .txt du texte de maintenance est lu et écrit via l'objet FileSystemObject et l'objet TextsCream, de sorte que le contenu des 5 principales lignes de ce fichier soit l'annonce à afficher dans le babillard.
| Ce qui suit est le contenu cité: <% schem str = request.form (t1) Dim S (5) const Forreading = 1, pour l'écriture = 2 DIM FSO, MYFILE set fso = server.createObject (scripting.fileSystemObject) Définissez MyFile = FSO.OPENEXTFILE (Maintenez Text.txt, ForReading) 'Ouvrir le fichier en mode de lecture pour i = 1 à 5 ', le panneau de bulletin affiche 5 annonces au total s (i) = myFile.readline'Read le contenu du fichier suivant myfile.close Définissez MyFile = FSO.OPENEXTFILE (Maintenez Text.txt, Forwriting, True) 'Ouvrir le fichier en mode d'écriture myfile.writeline str pour i = 1 à 4 myfile.writeline s (i) 'réécrire les données au fichier suivant myfile.close %> |
3) Maintenir le texte.txt
Ce fichier commence vide, et après avoir entré une annonce à partir de l'interface affichée dans la mise à jour .asp, le contenu de ce fichier est automatiquement écrit.
4. Ajoutez le code suivant au segment de code où l'emplacement d'annonce doit afficher l'annonce de mise à jour dans le fichier de page d'accueil (généralement default.asp) pour afficher l'annonce mise à jour.
| Ce qui suit est le contenu cité: <Marquee ScrollAmount = 2 ScrollDelay = 50 Direction = largeur UP = 223 HEAULD = 133 ID = A onMouseOver = A.Stop () OnMouseout = A.Start ()> 'Faites défiler vers le haut et descendre le tableau du bulletin <% Dim S (20) DIM FSO, MYFILE Set fso = createObject (scripting.fileSystemObject) Définissez MyFile = FSO.OPENEXTFILE (D: / ASP / REFENSE / SERVIEZ TEXT.TXT, 1, TRUE) pour i = 1 à 5 ReadLineTextFile = myFile.readline s (i) = readLineTextfile Response.Write ★ & S (I) réponse.WRITE <br> suivant %> </ Marquee> |
Les deux conseils ci-dessus peuvent résoudre de nombreux problèmes de ce type en apprenant d'un exemple. Les amateurs de conception Web pourraient aussi bien l'essayer.
Partager: la compréhension la plus profonde de la séance et des cookies Parlons du débat de la session sur la session, mais il devrait y avoir plus de 90 personnes qui peuvent comprendre la session. Mais laissez-moi vous dire, ne pensez pas que vous êtes vieux ~ certaines personnes sont d'accord avec la session, tandis que d'autres ne sont pas d'accord. Mais que devrais-je dire exactement de cette question? Pourquoi ne pas écouter