Recommandé: interpréter la liste complète des types d'erreur communs d'ASP ActiveServerPages, ASP0126 (0x80004005) - Le fichier incluse ne peut être trouvé Microsoft OledBProviderForodBCDrivers (0x80040e21) - Une erreur s'est produite dans l'instruction SQL (Type de données ou nom de tableau (nom de champ) ou le tableau est dans l'état de modification, ou le tableau n'existe pas dans une database ouverte par CONC) Oledbproviderforodbcdrivers (0x800
<%
'====================================================================.
'Navigation de la fonction
'Formatdate (dt, tp) ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'IsInteger (para) -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'ChkrequestDate (para) -----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'Chkpost () ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'IsValidEmail(email)--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'MAKEDOWNNAME () ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'getip () -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'Lefttrue (Str, N) -----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'ChecksQL () - Pour la sécurité du système, ajoutez directement l'immunité par injection SQL lorsqu'il y a une connexion de base de données
'Runtime () -----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'CheckFolder (FolderPath) -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'DeleteFolder (FolderPath) -----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'Filehaveno(FileName) ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'readFileCord (nom de fichier) ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'WriteString (chaîne, nom de fichier) ------------------------------ Écrivez la chaîne spécifiée dans le nouveau fichier spécifié
'---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'Encrypt (themumber) | Décrypter (alors numéroter) un ensemble de fonctions qui cryptent et décryptent les identifiants, jusqu'à 8 bits
'UTF2GB (UTFSTR) ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'toUTF8(szInput)--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'C10TO2 (x) -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'C16TO2 (X) -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'C2to16 (x) -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'C2TO10 (x) -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'=====================================================================.
%>
<%
StartTime = TIMER ()
'Formatage des dates
Fonction Formatdate (DT, TP)
dim y, m, d
Y = an (dt)
M = mois (dt)
D = jour (dt)
Si m <10 alors m = 0 & m
Si d <10 alors d = 0 & d
Sélectionnez Case TP
cas 1 formatdate = y & y & m & m & m & d & d
cas 2 formatdate = y & / & m & / & d
cas 3 formatdate = m & / & d
cas 4 formatdate = y & / & m & / & d
cas 5 formatdate = y & - & m & - & d
fin de sélection
Fonction finale
'--------------------------------
'--- juger si les données sont entières -----------------------------------------
Fonction est IntInteger (para)
schem
dim l, je
Si Isnull (para) alors
isInteger = false
fonction de sortie
terminer si
str = cstr (para)
Si Trim (str) = alors
isInteger = false
fonction de sortie
terminer si
l = len (str)
pour i = 1 à L
Si mid (str, i, 1)> 9 ou mid (str, i, 1) <0 alors
isInteger = false
fonction de sortie
terminer si
suivant
isInteger = true
Si err.number <> 0 alors err.clear
Fonction finale
'--------------------------------
«Détection si le paramètre passé est le type de date
Fonction chkrequestDate (para)
ChkrequestDate = false
Sinon (isNull (para) ou Trim (para) = ou pas isdate (para)) alors
ChkrequestDate = true
Terminer si
Fonction finale
'--------------------------------
Partager: ASP met en œuvre le code pour les longs articles manuels % setRecordSet1 = server.createObject (adodb.recordSet) exec = select * fromNewswhereid = id RecordSet1.OPenexec, Conn, 1,1% Tablewidth = 85% border = 0Align = CentercellPadding = 3CellSpactive = 0 trtd .....% ifrequest (page) = alors pagénum = 0 0
6 pages au total Page précédente 123456