Novacreations » Código

Manual para PHP y Oracle (PDF)

admin — Wed, 09 Sep 2009 17:24:14 +0000

Nuestras aplicaciones en PHP usualmente se conectaran a servidores de base de datos Mysql. Sin embargo al elevar la complejidad de las mismas o al crear aplicaciones de porte empresarial será necesario interactuar con Oracle.

Aunque la lógica es semejante existen algunas cuestiones en la implementación que tenemos que considerar para crear aplicaciones eficientes, segurar y robustas.

Oracle pone a nuestra disposición “The Underground PHP and Oracle Manual”, Ebook escrito por Christopher Jones y Alison Holloway que nos dará toda la información que necesitamos para ingresar al mundo de Oracle y PHP.

http://www.oracle.com/technology/tech/php/pdf/underground-php-oracle-manual.pdf

Convención de código para Javascript

admin — Thu, 03 Sep 2009 22:21:16 +0000

Douglas Crockford, autoridad en JavaScript, nos comparte en su sitio las convenciones de código para JavaScript.

Por muy expertos o principiantes que seamos es importante utilizar las convenciones de código. Esto permite que nuestro código sea manipulado y entendido por otros aumentando el valor a largo plazo del mismo y la facilidad de mantenimiento, mejora e implementación. Es un requerimiento esencial si el código va a ser público o si uno va a trabajar en equipo.
Al igual que el tener una buena letra, o el hablar correctamente el codificar en base a las convenciones permite incrementar nuestra comunicación. Aunque el código tiene como principal objetivo ser leído por una máquina, recordemos que en algún momento otra persona o incluso nosotros tendremos la necesidad de volver a darle un vistazo. Y si no somos capaces de entenderlo, perderemos mucho tiempo y corremos el riesgo de “romper” algo que genere errores y fallas inesperados.

Code Conventions for the JavaScript Programming Language
http://javascript.crockford.com/code.html

30 Mejores Prácticas en PHP para Principiantes

admin — Thu, 20 Aug 2009 16:46:03 +0000

Al empezar a programar en PHP es necesario aprender conceptos y prácticas que dan mayor calidad, funcionalidad y solides a nuestras aplicaciones. Una vez que conocemos como usar el código es importante instruirse en como darle vida al mismo.

En el articulo Mas de 30 mejores prácticas en PHP para principiantes de Glen Stansberry nos ilustra con recomendaciones que debe tomar en cuenta todo principiante.

Algunas de ellas son:

Conoce el manual. Sin duda una de las mejores herramientas para programar en PHP ya que es muy completo, concreto y lleno de recomendaciones.
Usa un IDE. Considero importante aprender a programar en un editor de texto. Pero al empezar a trabajar ya en forma vas a necesitar un IDE que te de mayor potencia a tu trabajo. Empezar a probarlos y encontrar uno que se ajuste a tu estilo es fundamental.
Aprende la técnica “No te repitas a ti mismo“. Evita redundacia, copiar y pegar código y otras malas prácticas.
Usa capas para diferenciar funcionalidad, de datos de presentación
Usa siempre . Recuerdo que el que existan atajos no significa que sea bueno o debas utilizarlos.
Comenta tu código y lo mas importante aprende a comentar
Nunca confíes en tus usuarios y protege tu código de inyección SQL
Pregunta y aprende a preguntar. Por ejemplo en el Foro de PHP

30+ PHP Best Practices for Beginners
http://net.tutsplus.com/tutorials/php/30-php-best-practices-for-beginners/

qTranslate: Contenido multilingüe para Wordpress

admin — Wed, 13 May 2009 16:00:30 +0000

En un blog Wordpress que administro el usuario solicito como requerimiento la capacidad de poder publicar contenido en español e ingles. Después de una amplia investigación y prueba de plugins que me ofrecieran la capacidad de convertir mi blog en un espacio bilingüe llegue a la conclusión de utilizar qTranslate.

qTranslate es una extensión escrita por Quian Qin con el objetivo de permitir administrar contenido multilingüe con una sencilla interfaz. Es muy fácil añadir cualquier cantidad de idiomas y configurar tu sitio.

Una de las características que más me importaban era la facilidad de publicación debido a que mis usuarios no son muy técnicos. Esta herramienta muestra tabs diferentes para cada idioma facilitando la publicación y edición.

Crear un cuadro de selección de idioma también me fue muy sencillo. El cuál además se actualiza de acuerdo a los idiomas que tienes instalados. Para acceder a tu contenido puedes usar esquemas muy sencillos en la URL (micontenido?lang=en) por lo que no afecta la operación normal de tu blog.

El plugin actualiza mucho del texto generado automáticamente. Sin embargo también te permite ingresar la traducción de las categorías y con un sencillo tag puedes modicar tus templates para que también su texto sea bilingüe.

Es sencillo de instalar y muy fácil de utilizar. En verdad una herramienta muy recomendada.

Lo pueden descargar desde:

http://www.qianqin.de/qtranslate/

Solo les doy una recomendación, ya que si lo cargan en una instalación de Wordpress en español tienen que cambiar los valores del $wp_default_secret_key ya que de lo contrario el panel de administración les mostrara un error indicando que no tienen los privilegios suficientes. Para mayor información visita esta entrada en el foro: “qTranslate chaning default languae not working“

¿Tienes algún blog Wordpress biblingue? Comparte tus experiencias y la liga a tu blog en los comentarios.

Crear Acceso Directo

admin — Tue, 13 Nov 2007 00:34:49 +0000

El siguiente script permite crear un acceso directo en el escriotorio.

desktop.vbs

PLAIN TEXT

Visual Basic:

Dim WSHShell, fs
Set WSHShell = WScript.CreateObject("WScript.Shell")
Set fs = WScript.CreateObject("Scripting.FileSystemObject")
Function MakeDesktopShortcut( name, target )
Dim Shortcut,DesktopPath,StartupPath
DesktopPath = WSHShell.SpecialFolders("Desktop")
Set Shortcut = WSHShell.CreateShortcut(DesktopPath & "\" & name & ".lnk")
Shortcut.TargetPath = target
StartupPath = fs.GetParentFolderName( target )
If fs.FolderExists( StartupPath ) then
Shortcut.WorkingDirectory = StartupPath
End If
Shortcut.Save
End Function
MakeDesktopShortcut "Shortcut to Calc","c:/windows/system32/calc.exe"

WSH: Acceso Directo en el Menu Inicio

admin — Wed, 07 Nov 2007 21:33:12 +0000

El siguiente Script te permite crear un Acceso Directo en tus entradas del menu de inicio.

startmenu.vbs

PLAIN TEXT

Visual Basic:

Set objNetwork = CreateObject("Wscript.Network")
strUser = objNetwork.UserName
strPath = "C:\Documents and Settings\" & strUser
Set objShell = CreateObject("Wscript.Shell")
strPrograms = objShell.SpecialFolders("Programs")
Set objShellLink = objShell.CreateShortcut(strPrograms & "\" & strUser & ".lnk")
objShellLink.TargetPath = "c:/windows/system32/calc.exe"
objShellLink.Description = "Calculadora de " & strUser
objShellLink.WorkingDirectory = strPath
objShellLink.Save

WSH: FileInfo Script

admin — Tue, 06 Nov 2007 20:56:58 +0000

Este Script te permite buscar un archivo y te muestra sus detalles. Es un buen ejemplo ya que te ayuda a empezar a usar algunas funciones de manipulación de archivos, ventanas y ciclos.

FileInfo.vbs

PLAIN TEXT

Visual Basic:

' FileInfo.vbs Quickly search your drive for specified file name and return
' path, version, size and date information. Can search a specified drive, or
' or all drives. Use only the file name, not the extension. Requires WMI,
' which is included with Windows 2000 and Windows XP. For Windows 95, 98, ME
' and NT4, WMI can be downloaded at
' http://msdn.microsoft.com/downloads/sdks/wmi/download.asp
Option Explicit
Dim fso, OutFile, sDrv, sFName, sReport, sFile, sTitle
Set fso = CreateObject("Scripting.FileSystemObject")
OutFile = "C:\searched.txt"
If fso.FileExists(OutFile) Then fso.DeleteFile(OutFile)
Set sReport = fso.OpenTextFile(OutFile, 8, True)
sDrv = InputBox("Enter drive letter to search (letter only)" & vbcrlf & _
vbcrlf & "(Enter * to search all local drive letters)", sTitle)
If sDrv = "" Then WScript.Quit
sFName = InputBox ("Enter file name to search for (no extension)", sTitle)
If sFName = "" Then WScript.Quit
GetResults "c:", sFName
sReport.Close
Set sReport = Nothing
Dim f, ra, Results
Set f = fso.OpenTextFile(OutFile)
On Error Resume Next
ra = f.ReadAll
If Err Then
Results = 0
End If
On Error GoTo 0
f.Close
Set f = Nothing
Set fso = Nothing
If Results> 0 Then
Wscript.CreateObject("WScript.Shell").Run OutFile
Else
MsgBox "No matches found for " & chr(34) & sFName & chr(34) & " on " & sDrv,, sTitle
End If
Sub GetResults(drv, fname)
Dim sWQL, oFile, sAttrib
sWQL = "select * from cim_datafile where Drive='" & _
drv & "' AND FileName = '" & fname & "'"
For Each oFile In GetObject("winmgmts:").execquery(sWQL)
Results = Results + 1
sFile = oFile.Name
Set f = fso.GetFile(sFile)
sReport.WriteLine sFile & vbcrlf & "Version: " & _
fso.GetFileVersion(sFile) & vbcrlf & "Created: " & _
f.DateCreated & vbcrlf & "Modified: " & f.DateLastModified & _
vbcrlf & "Size: " & FormatNumber(f.Size, 0) & " bytes"
If oFile.Archive Then sAttrib = "Archive "
If oFile.Compressed Then sAttrib = sAttrib & "Compressed "
If oFile.Encrypted Then sAttrib = sAttrib & "Encrypted "
If oFile.Hidden Then sAttrib = sAttrib & "Hidden "
If oFile.System Then sAttrib = sAttrib & "System "
If NOT oFile.Writeable Then sAttrib = sAttrib & "ReadOnly "
If sAttrib <> "" Then sReport.WriteLine "Attributes: " & sAttrib & vbcrlf
sAttrib = ""
Next
End Sub
' Revisions
' 15 Nov 2002 - Added MsgBox if no search matches found.
' 16 Nov 2002 - Added file attributes to the report

WSH: Crear una entrada ODBC para SQL Server

admin — Mon, 05 Nov 2007 18:57:45 +0000

Este script automatiza la creación de una entra ODBC para conectarse a un servidor SQL Server.

CreateDSN.vbs

PLAIN TEXT

Visual Basic:

'===================
'
' File: CreateDSN.vbs
'
' AUTHOR: Dixan Martinez
' Date : 2/2/2000
'
' COMMENT:
'
'===================
Dim DataSourceName
Dim DatabaseName
Dim Description
Dim DriverPath
Dim DriverName
Dim LastUser
Dim Regional
Dim Server
Const SystemFolder= 1
Dim fso
Dim SysFolder
Dim SysFolderPath
Set fso = wscript.CreateObject("Scripting.FileSystemObject")
Set SysFolder =fso.GetSpecialFolder(SystemFolder)
SysFolderPath= SysFolder.Path
Set oArg= wscript.Arguments
if oArg.Count <> 4 then
call Usage
end if
'Specify the DSN parameters.
DataSourceName = oArg(0)
DatabaseName = oArg(1)
Description = "Odbc de BD" & DatabaseName
DriverPath = SysFolderPath & "\sqlsrv32.dll"
Server = oArg(2)
LastUser = oArg(3)
DriverName = "SQL Server"
'Creamos objetos que escriben en el registro
Set WshShell = WScript.CreateObject("WScript.Shell")
'Establecemos el Key del DSn en el registro
Dim RegEdPath
RegEdPath= "HKLM\SOFTWARE\ODBC\ODBC.INI\" & DataSourceName & "\"
'Grabamos
WshShell.RegWrite RegEdPath , ""
'Ponemos los valores de la nueva Key correspondiente al DSN
WshShell.RegWrite RegEdPath & "Database" , DatabaseName
WshShell.RegWrite RegEdPath & "Description" , Description
WshShell.RegWrite RegEdPath & "Driver" , DriverPath
WshShell.RegWrite RegEdPath & "LastUser" , LastUser
WshShell.RegWrite RegEdPath & "Server" , Server
'Escribo en el Key "ODBC Data Sources" para poder listar el nuevo DSN
' en el ODBC Manager
WshShell.RegWrite "HKLM\SOFTWARE\ODBC\ODBC.INI\ODBC Data Sources\" & DataSourceName , DriverName
wscript.Quit
'--------------------
Sub Usage
wscript.echo "Create a DSN to access a SQL Server database with ODBC"
wscript.echo "Uso :"
wscript.echo "CreateDSN.vbs "
wscript.echo ""
wscript.echo "Ejemplo 1 : CreaDSN.vbs NuevoDSN Pub MySQLServer AdminUser"
wscript.Quit
end sub

Descargar un archivo de internet

admin — Sat, 22 Sep 2007 18:06:59 +0000

Estas lineas de código nos permite descargar un archivo desde la red y guardarlo en algún medio de almacenamiento local.

PLAIN TEXT

JAVA:

import java.io.BufferedInputStream;
import java.io.FileOutputStream;
import java.io.IOException;
import java.net.MalformedURLException;
import java.net.URL;
public class GetFileExample
{
public GetFileExample()
{
try
{
byte[] bite = new byte[2048];
int read;
URL url = new URL("http://switch.dl.sourceforge.net/sourceforge/pys60miniapps/FlickrS60_src_v0.1b.tar.bz2");
BufferedInputStream bis = new BufferedInputStream(url.openStream());
FileOutputStream fos = new FileOutputStream("/tmp/file.tar.bz2");
while((read = bis.read(bite))>0)
{
fos.write(bite, 0, read);
System.out.println("--");
}
fos.close();
bis.close();
System.out.println("FINE");
}
catch(MalformedURLException e)
{
e.printStackTrace();
}
catch(IOException e)
{
e.printStackTrace();
}
}
public static void main(String[] args)
{
new GetFileExample();
}
}

MergeSort

admin — Thu, 30 Aug 2007 04:15:06 +0000

Algoritmo MergeSort para ordenar números usando la estrategia de divide y conquista

PLAIN TEXT

JAVA:

public class MergeSortV2 {
/**
* @param args
*/
static void Merge(int A[],int p, int q, int r)
{
int n1 = q-p+1;
int n2 = r-q;
int L[] = new int[n1+2];
int R[] = new int[n2+2];
for(int i = 1; i <= n1; i++)
{
L[i] = A[p+i-1];
}
for(int j = 1; j <= n2; j++)
{
R[j] = A[q+j];
}
L[n1+1] = Integer.MAX_VALUE;
R[n2+1] = Integer.MAX_VALUE;
int i = 1;
int j = 1;
for(int k = p; k <= r; k++)
{
if(L[i] [j])
{
A[k] = L[i];
i++;
}
else
{
A[k] = R[j];
j++;
}
}
}
static void MergeSort(int A[],int p, int r)
{
if(p)
{
int q = (p+r)/2;
MergeSort(A, p, q);
MergeSort(A, q+1, r);
Merge(A, p, q, r);
}
}
public static void main(String[] args) {
// TODO Auto-generated method stub
int arr[] = {6,23,33,1,5,77};
MergeSort(arr,1,5);
for(int i = 0; i <6; i++)
{
System.out.println(arr[i]);
}
}
}