Naslu: Code Snippets from retebenito

Home Search

Code Snippets of retebenito

<%

Set fs=CreateObject("Scripting.FileSystemObject")

sumfile="/"
If fs.FolderExists(Server.MapPath(sumfile)) then
	Set objFolder=fs.GetFolder(Server.MapPath(sumfile))
	For Each objItem in objFolder.SubFolders
		response.write "<a href="""&sumfile & ObjItem.Name&""">"&objItem.Name&"</a><br>"
	next
End If

%>

Listar los directorios con ASP
Uploaded on 7/4/2008 4:34:39 AM
0 comments
Programming Language: ASP

asp

filesystemobject

lista directorios

<%
set FSO = Server.CreateObject("Scripting.FileSystemObject")
set oFich = FSO.CreateTextFile ( Server.MapPath("/prueba.txt"), True )

oFich.WriteLine ("¡Hola mundo!")
oFich.Write ("Este es mi primer fichero de texto creado desde Visual Basic script." & vbCrlf )

oFich.Close
set oFich = nothing
%>

Escribir en un fichero de texto (ASP). Hola mundo!
Uploaded on 7/4/2008 4:28:57 AM
0 comments
Programming Language: ASP

asp

CreateTextFile

escribir en fichero

fichero de texto

filesystemobject

generar fichero

<?php   
$cadena1= "Viva Cuenca";   
$cadena2= "Cuenca";   
  
if (strrpos($cadena1, $cadena2))   
    echo "Pozi está incluida la cadena2 en la cadena1";   
else  
    echo "NO!";   
  
//Nota: la función strrpos es sensitiva a mayúsculas y minúsculas. Si cadena2="cuenca" no la encontraría en cadena1   
  
?>

Buscar un carácter o una cadena dentro de otra cadena (PHP)
Uploaded on 7/4/2008 4:22:36 AM
0 comments
Programming Language: PHP

buscar cadena

php

strrpos

<?php   
  
$cadena1= "Viva Cuenca";   
  
echo strtolower($cadena1);   
  
?>

Convertir una cadena a minúsculas (PHP)
Uploaded on 7/4/2008 4:21:05 AM
0 comments
Programming Language: PHP

convertir a minusculas

php

strtolower

<%
Dim cadena1

cadena1="Viva Cuenca"

response.write lcase(cadena1) 

%>

Convertir una cadena a minúsculas (ASP)
Uploaded on 7/3/2008 8:07:22 AM
0 comments
Programming Language: ASP

asp

convertir a minusculas

lcase

1 2

Help	Help by email

Select language: Español | English