Necesito interpretacion de codigo de asp a php

[maurioli8]

hola soy mauricio y necesitaria que me den una mano en una interpretacion de codigo asp a php, resulta q soy programador de asp y en donde trabajo el servidor es de linux por eso lo q hice no me anda. Desde ya les agradezco por tomarse el tiempo en darme una mano. Aqui les dejo mi codigo.

Código asp:

<% option explicit %>
 
<!--#include file="../Include/Conexion.inc" -->
 
<%
 
dim rs, sql, MObjArch, MFolder, MArchivos, MArchivo,a,i
 
 
set rs=Server.CreateObject("ADODB.Recordset")
' Cambiar fpdb por el directorio donde ubiqueis la base de datos
' Recordar darle permisos de escritura que vamos a escribir en ella
sql = "SELECT     Ordenanzas.IdOrdenanzas, Ordenanzas.ordenanza, Anos.ano, Ordenanzas.IdAno FROM Ordenanzas INNER JOIN Anos ON Ordenanzas.IdAno = Anos.IdAno"
rs.Open sql, cn, adopenkeyset, adlockoptimistic,adcmdtext
a=0
i=1982
do until i= year(now())+1
i=i+1
Set MObjArch = Server.CreateObject("Scripting.FileSystemObject")
Set MFolder = MObjArch.getFolder(server.mappath("\hcdcanuelas\documentos\ordenanzas\" & i & "\")) 
Set MArchivos = MFolder.Files
 
For Each MArchivo In MArchivos
 
a=a+1
'esto los muestra por pantalla, para que veamos que valores 
'se van a añadir a la base de datos.
 
'Esto los ubica en la base de datos
rs.addnew
rs("idordenanzas")=a
rs("ordenanza")=MArchivo.Name
rs("IdAno")=i-1982
' Aqui podriamos capturar tambien otros valores como el tamaño
' Fecha y hora, etc
rs.update
rs.movenext
Next
 
loop
 
rs.close
set rs=nothing
 
response.Redirect("MenuAdm.asp")
%>
 

[helacer]

Expliquenos exactamente que qwuiere hacer con el codigo y le ayudamos a crear el codigo en PHP nos queda mas facil que ponernos a traducirlo

Espero respuesta o que nos comente si ya lo logro pasar a PHP

[maurioli8]

Iniciado por helacer

Expliquenos exactamente que qwuiere hacer con el codigo y le ayudamos a crear el codigo en PHP nos queda mas facil que ponernos a traducirlo

Espero respuesta o que nos comente si ya lo logro pasar a PHP

Tengo una Base de datos Creada con nombres de archivos y un ID de ano. Desde ahi lo q hago es actualizar esa base con una funcion en donde recorra todas las carpetas y muestre todos los nombres de archivos.
Las carpetas van desde el 1983 hasta el 2009.

Espero q me hayan entendido. Desde ya muchas gracias.

[jam1138]

veamos ...
- Primero tienes un include: www.php.net/include
- Luego tienes una conexión a la BD. Aquí deberías especificar de qué BD se trata (sospecho el código trabajará con Acces?), mientras ve por acá: www.php.net/pdo o www.php.net/refs.database
- Una query .. no hay problema con eso
- Para obtener el año usa date: www.php.net/date
- Luego haces un do {} while(): www.php.net/do.while
- Luego abres un directorio: www.php.net/opendir
- Lees el contenido: www.php.net/readdir
- Un foreach para iterar sobre cada archivo: www.php.net/foreach
- Luego ... aquí se va a poner fea la cosa. No alcanzo a entender si actualizar o insertas nuevos datos a la BD, como sea, lo mejor sería manejaras SQL puro.

Eso mas o menos entendiendo tu código (estando en un foro de PHP, no se tiene por qué saber de ASP, ¿cierto?). Igual hay traductores de código (¿buscaste? asp2php) aunque no tengo idea de qué tan efectivos resulten.

Suerte, si tienes problemas mencionalos.

[GatorV]

Con el rs.addNew creo insertas, por lo que si va a tener que hacer una instrucción insert directa.

[maurioli8]

Hola, mira no se si me estoy expresando bien, voy a tratar de hacer lo mejor posible. lo q tengo q lograr es llegar a colocar en un BD (en este caso mysql), los links en los cuales se encuentran los documentos (.doc). De la forma en q puse el codigo en sqlserver y en asp me anduvo. Pero en php todavia no logro hacerlo. los nombres de las carpetas son los anos. Creo q eso facilitaria bastante la colocacion de los registros en la BD.

Desde ya, muchas gracias!