GetRows() en 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 response.write("Nombre:...
GetRows() en 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 PathOrigen =...
GetRows() en 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 sTiempo(dInicio As Date, dFin As...

Ordenar Array en ASP

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...
GetRows() en ASP Classic

Separar un String con Split

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...
GetRows() en ASP Classic

Leer todas las variables request

Con este código podrás obtener el valor y todas las variables que se están enviando mediante Request. <% For x = 1 to Request.Form.Count Response.Write x & ": " & Request.Form.Key(x) & "=" & Request.Form.Item(x) &...