Array dinámicos en ASP Clásico

Array dinámicos en ASP Clásico

by | Oct 8, 2020 | ASP Classic, Destacados

Array dinámicos en ASP Clásico En asp clásico, es imposible iniciar una matriz sin especificar el tamaño de la matriz. Entonces, tienes que cambiar el tamaño de la matriz dinámicamente, lo puedes hacer de la siguiente forma: Dim arr() ReDim arr(-1) Do While objRs.eof...
Array dinámicos en ASP Clásico

GetRows() en ASP Classic

by | Abr 18, 2019 | ASP Classic

GetRows() en ASP Classic Recorset dim Conn,query,RS Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open DBName query = "SELECT nombre,email,telefono FROM usuarios" Set RS = Conn.execute(query) if not RS.EOF then do while not RS.EOF...
Array dinámicos en ASP Clásico

Mover archivos

by | Feb 27, 2019 | ASP Classic

Mover archivos La función que he creado para realizar la copia de un archivo a otra carpeta dentro del sitio es así: function Move_File(archivoOrigen, archivoDestino) Dim PathOrigen, PathDestino, fs, extension 'Obtener el path en donde se encuentan los archivos...
Array dinámicos en ASP Clásico

Calcular diferencia de fechas

by | Feb 27, 2019 | ASP Classic

Calcular diferencia de fechas Para comparar dos fechas y obtener la cantidad de dias, horas, minutos y segundos que han pasado se puede utilizar la función DateDiff que retorna el número de intervalos de tiempo entre dos fechas. Ejemplo de una función: Function...

Ordenar Array en ASP

by | Feb 26, 2019 | ASP Classic

Ascendente: <% MyArray=Array(25,14,20,45,25,4,1,31,22,7) max=ubound(MyArray) For i=0 to max For j=i 1 to max if MyArray(i) &amp; MyArray(j) then TemporalVariable=MyArray(i) MyArray(i)=MyArray(j) MyArray(j)=TemporalVariable end if next next Response.write...
Array dinámicos en ASP Clásico

Separar un String con Split

by | Feb 25, 2019 | ASP Classic

Separar un string por algún carácter específico, para esto debes utilizar la función “split”: <% a=Split("PeTeR Tips On-Line") for each x in a response.write(x & "<br />") next %> El resultado sería: PeTeR Tips On-Line...