Recommandé: Exemple de pagination de procédure stockée ASP + SQL2000 1. Renvoie la procédure stockée du nombre total d'ensembles d'enregistrements: Créer la procédure dbo.recordCount (@TableName nvarchar (100), - - Database Nom de la table @Strwhere Nvarchar (500), --Query Condition @count int Output --- Valeur de sortie, Nombre total de l'ensemble d'enregistrements) comme Déclare @SQLSTr nvarchar (1000) If @Strwhel! = ''
- <%
- '----------------------------------------------------------------
- 'Introduction du programme: complétez l'ajout, la suppression, la modification et la visualisation du texte du nœud spécifié dans le document XML par la langue ASP
- 'Paramètres d'entrée: aucun
- 'Paramètres d'exportation: aucun
- '------------------------------------------------
- 'Nom de la fonction: connectXml ()
- «Paramètres de l'entremermination: le nom de fichier nécessite une connexion ou un nom de fichier XML d'ouverture
- 'Paramètres d'exportation: aucun
- 'Valeur de retour: connectXml = 0, xmlMornTekDocument est un objet qui charge avec succès des documents XML.
- 'ConnectXml <> 0, Imprimer le message d'erreur
- '------------------------------------------------
- dimxmlmorntekDocument
- functionconnectxml (nom de fichier)
- dimstrsourcefile
- strSourcefile = server.mappath (nom de fichier)
- SetXmlMornTekDocument = Server.CreateObject (Microsoft.xmldom)
- XmlMornTekDocument.async = false
- XmlMornTekDocument.Load (strSourcefile)
- ConnectXml = xmlMornTekDocument.ParseError.Errorcode
- ifxmlMornTekDocument.Parseerror.ErrorCode <> 0THEN
- STRERROR = <H2> ERREUR & XMLMORNTEKDOCUMENT.PARSEERROR.ERRORCODE & </H2>
- STRERRORSTRERRORSTRERRORSTRERRORORROR = STRERROR & XMLMORNTEKDOCUMENT.PARSEERROR.reason & <br>
- STRERRORSTRERRORSTRERRORSTRERRORORROR = STRERROR & XMLMORNTEKDOCUMENT.PARSEERROR.URL & <BR>
- STRERRORSTRERRORSTRERRORSTRERRORORROR = STRERROR & XMLMORNTEKDOCUMENT.PARSEERROR.LINE & <BR>
- StrerorRerrorRerrorRerRerrororror = STRERROR & XMLMORNTEKDOCUMENT.PARSEERROR.FILEPOS & <BR>
- STRERRORSTRERRORSTRERRORSTRERRORORROR = STRERROR & XMLMORNTEKDOCUMENT.PARSEERROR.SRCText & <br>
- réponse.WriteStRerror
- endire
- finition de fin
- '------------------------------------------------
- 'Nom de la fonction: closexml ()
- 'Paramètres d'entrée: aucun
- 'Paramètres d'exportation: aucun
- '------------------------------------------------
- FunctionClosexML (XMLMornTekDocument)
- ifisObject (xmlMornTekDocument) alors
- setXmlMornTekDocument = rien
- endire
- finition de fin
- '------------------------------------------------
- 'Nom de la fonction: selectXmlNodeText (élémentName)
- 'Paramètre d'entrée: le nom de l'élément ElementName
- 'Paramètres d'exportation: aucun
- '------------------------------------------------
- FunctionSelectXmlNodeText (élément)
- elementName = // & elementName
- temp = xmlMornTekDocument.SelectSingLenode (elementName) .Text
- selectXmlNodeText = server.htmlencode (temp)
- finition de fin
- '------------------------------------------------
- 'Nom de la fonction: insertxmlNodeText (BefElementName, elementName, elementText)
- 'Paramètre d'entrée: le nom de l'élément inséré par ElementName
- 'BefElementName Insérer un élément avant le nom de cet élément
- 'Texte d'élément de l'élément inséré
- 'Paramètres d'exportation: aucun
- '------------------------------------------------
- functionInsertXmlNodeText (BefElementName, elementName, elementText)
- Dimbefelement, élément
- setBeFelement = xmlMornTekDocument.SelectSingLenode (// & BefElementName)
- setElement = xmlMornTekDocument.CreateElement (elementName)
- erreur.insertBeforeLement, BefElement.Firstchild
- element.text = elementText
- finition de fin
- '------------------------------------------------
- 'Nom de la fonction: updatexmlNodeText (elementName, newelementText)
- 'Paramètre d'entrée: le nom de l'élément ElementName
- Le nouveau texte de l'élément NewelementText
- 'Paramètres d'exportation: aucun
- '------------------------------------------------
- FunctionUpDatexmlNodeText (elementName, NewElementText)
- dimementation
- setElement = xmlMornTekDocument.SelectSingLenode (// & ElementName)
- element.text = newelementText
- finition de fin
- '------------------------------------------------
- 'Nom de la fonction: DeletexMlNodeText (élémentName)
- 'Paramètre d'entrée: le nom de l'élément ElementName
- 'Paramètres d'exportation: aucun
- '------------------------------------------------
- functiondeleTexmlNodeText (elementName)
- XmlMornTekDocument.SelectSingLenode (// & ElementName) .Text =
- finition de fin
- %>
Partager: ASP cliquez pour actualiser le code d'instance de code de vérification La plupart des codes de vérification sur le site Web sont des codes de vérification d'image, tout comme celui ci-dessous http://dwww.cn/books.asp. Les utilisateurs peuvent rester sur la page pendant longtemps et le code de vérification peut expirer lorsque la dernière soumission est enfin soumise. Vous devez donc ajouter une fonction de rafraîchissement. Code de vérification: entrée name = 'checkImg' type = 'text' class = 'input' id = 'che