Foros del Web » Programando para Internet » ASP Clásico »

convertir de PHP a ASP

Estas en el tema de convertir de PHP a ASP en el foro de ASP Clásico en Foros del Web. hola alguien sabe si se puede convertir este codigo de PHP a ASP? gracias Código PHP:   <?php    if ( $_REQUEST [ "bindata" ] ===  NULL ...
  #1 (permalink)  
Antiguo 30/06/2008, 16:09
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
convertir de PHP a ASP

hola
alguien sabe si se puede convertir este codigo de PHP a ASP?

gracias

Código PHP:
 
<?php
  
if ($_REQUEST["bindata"] === NULL) { 
    echo 
"missing parameter.";
  }
  else {
    
$img_data base64_decode($_REQUEST["bindata"]);
    
$name $_REQUEST["name"] === NULL "anonymous\n" $_REQUEST["name"] ."\n";
    
$name strip_tags($name);
    
$comment strip_tags($_REQUEST["comment"]) . "\n";
    
$img_size strlen($img_data);
    if (
$img_size 10000) {
      
$img_filename "data/snapshot.jpg";
      
$comment_filename "data/comment.txt";
      
unlink($img_filename);
      
unlink($comment_filename);
      
$img_file fopen($img_filename"w") or die("can't open file");
      
fwrite($img_file$img_data);
      
fclose($img_file);
      echo 
"$img_size bytes uploaded.";
      
// write comments
      
var_dump($comment);
      
$comment_lines explode("\r"$comment);
      
var_dump($comment_lines);
      
$comment_file fopen($comment_filename"w");
      
fwrite($comment_file$name);
      foreach (
$comment_lines as $line) {
        
fwrite($comment_file$line "\n");
      }
      
//fwrite($comment_file, $comment);
      
fclose($comment_file);
    }
    else {
      echo 
"image too big.";
    }
  }
  
//var_dump($_REQUEST);
?>
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #2 (permalink)  
Antiguo 30/06/2008, 16:32
Avatar de AlZuwaga
Colaborador
 
Fecha de Ingreso: febrero-2001
Ubicación: 34.517 S, 58.500 O
Mensajes: 14.550
Antigüedad: 24 años, 2 meses
Puntos: 535
Respuesta: convertir de PHP a ASP

Estaría bueno que comentes qué hace ese código.
__________________
...___...
  #3 (permalink)  
Antiguo 30/06/2008, 16:36
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Respuesta: convertir de PHP a ASP

jej si que pena, se me paso por alto..

el codigo es una parte de un flash que toma fotos de una camara web.. lo que hace el php es subir la imagen tomada al servidor y escribi en un archivo de texto el resultado de esa operacion.
pero mi servidor no soporta php por tal motivo busco si es posible convertirlo a asp o a .net .
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #4 (permalink)  
Antiguo 02/07/2008, 20:01
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Respuesta: convertir de PHP a ASP

aguien tiene una idea?
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #5 (permalink)  
Antiguo 03/07/2008, 00:29
Avatar de Shiryu_Libra
Colaborador
 
Fecha de Ingreso: febrero-2007
Ubicación: Cantando "Screenager" en "Kirafa Kaput"
Mensajes: 3.614
Antigüedad: 18 años, 2 meses
Puntos: 88
Respuesta: convertir de PHP a ASP

Cita:
Iniciado por lexus Ver Mensaje
aguien tiene una idea?
lexus... mira no estoy seguro si entendi bien el codigo... pero hay te va

requiere convertir de base64_decode, hay que buscar un similar para ASP, asi que esta creo que te ayudara
Código PHP:
' Decodes a base-64 encoded string (BSTR type).
1999 2004 Antonin Follerhttp://www.motobit.com
' 1.01 - solves problem with Access And 'Compare Database' (InStr)
Function Base64Decode(ByVal base64String)
  Const Base64 = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"
  Dim dataLength, sOut, groupBegin
  
  '
remove white spaces, If any
  base64String 
Replace(base64StringvbCrLf"")
  
base64String Replace(base64StringvbTab"")
  
base64String Replace(base64String" """)
  
  
'The source must consists from groups with Len of 4 chars
  dataLength = Len(base64String)
  If dataLength Mod 4 <> 0 Then
    Err.Raise 1, "Base64Decode", "Bad Base64 string."
    Exit Function
  End If

  ' 
Now decode each group:
  For 
groupBegin 1 To dataLength Step 4
    Dim numDataBytes
CharCounterthisCharthisDatanGrouppOut
    
' Each data group encodes up To 3 actual bytes.
    numDataBytes = 3
    nGroup = 0

    For CharCounter = 0 To 3
      ' 
Convert each character into 6 bits of data, And add it To
      
' an integer For temporary storage.  If a character is a '=', there
      ' 
is one fewer data byte.  (There can only be a maximum of 2 '=' In
      
' the whole string.)

      thisChar = Mid(base64String, groupBegin + CharCounter, 1)

      If thisChar = "=" Then
        numDataBytes = numDataBytes - 1
        thisData = 0
      Else
        thisData = InStr(1, Base64, thisChar, vbBinaryCompare) - 1
      End If
      If thisData = -1 Then
        Err.Raise 2, "Base64Decode", "Bad character In Base64 string."
        Exit Function
      End If

      nGroup = 64 * nGroup + thisData
    Next
    
    '
Hex splits the long To 6 groups with 4 bits
    nGroup 
Hex(nGroup)
    
    
'Add leading zeros
    nGroup = String(6 - Len(nGroup), "0") & nGroup
    
    '
Convert the 3 byte hex integer (6 charsTo 3 characters
    pOut 
Chr(CByte("&H" Mid(nGroup12))) + _
      Chr
(CByte("&H" Mid(nGroup32))) + _
      Chr
(CByte("&H" Mid(nGroup52)))
    
    
add numDataBytes characters To out string
    sOut 
sOut Left(pOutnumDataBytes)
  
Next

  Base64Decode 
sOut
End 
Function 
despues, hay una funcion "unlink" que borra los archivo, por lo tanto nosotros en ASP, debes crear una funcion con FSO para realizar esto
Código PHP:
function Eliminar(archivo)
    
exito=false
    Dim objFSO
    Set objFSO 
Server.CreateObject("Scripting.FileSystemObject")
    
'borro file
    If (objFSO.FileExists(archivo))=true Then
'        
Response.Write("File "&deli&" exists.")
        
objFSO.DeleteFile archivo False
        exito
=true
    
Else
        
Response.Write("File "&deli&" does not exist.")
    
End If
    
response.Flush()    
    
set objFSO nothing
    eliminar 
exito
end 
function 
otra funcion que ya viene integrada en PHP "unlink" elimina cualquier etiqueta HTML, y nuestro gran amigo Tammander, proporciono su funcion en post pasados, asi que nos sera muy util esta ves ( gracias Tamm )
Código PHP:
Function SafeHTML(ByVal pStrHTML)
        
        
Dim lObjRegExp
         
If null
        
If VarType(pStrHTML) = 1 Then Exit Function
        If 
pStrHTML "" Then Exit Function
        
Set lObjRegExp = New RegExp
        lObjRegExp
.Global = True
        lObjRegExp
.IgnoreCase True
        lObjRegExp
.Pattern "<(/)?SCRIPT|META|STYLE([^>]*)>"
        
pStrHTML lObjRegExp.Replace(pStrHTML"")
         
lObjRegExp.Pattern "<(/)?(HTML|HEAD|BODY)([^>]*)>"
        
pStrHTML lObjRegExp.Replace(pStrHTML"")
        
lObjRegExp.Pattern "<(/)?(LINK|IFRAME|FRAMESET|FRAME|APPLET|OBJECT)([^>]*)>"
        
pStrHTML lObjRegExp.Replace(pStrHTML"")
         
lObjRegExp.Pattern "<(/)?(BUTTON|FORM|FIELDSET|INPUT|SELECT|OPTION)([^>]*)>"
        
pStrHTML lObjRegExp.Replace(pStrHTML"")
       
lObjRegExp.Pattern "(<A[^>]+href\s?=\s?""?javascript:)[^""]*(""[^>]+>)"
        
pStrHTML lObjRegExp.Replace(pStrHTML"")
        
lObjRegExp.Pattern "(<IMG[^>]+src\s?=\s?""?javascript:)[^""]*(""[^>]+>)"
        
pStrHTML lObjRegExp.Replace(pStrHTML"")
        
lObjRegExp.Pattern "<([^>]*) on[^=\s]+\s?=\s?([^>]*)>"
        
pStrHTML lObjRegExp.Replace(pStrHTML"")
           
Set lObjRegExp Nothing
        
        SafeHTML 
pStrHTML
        
End 
Function 
y pues el resto es interpretacion, asi que espero haberte ayudar, comente las lineas PHP, para que mas o menos se pudiera ver que linea hacia que
Código PHP:
Const ForReading 1ForWriting 2
Dim fso

'if ($_REQUEST["bindata"] === NULL) { 
if isnull(request("bindata")) then
    echo "missing parameter.";}
    response.Write "Parametros nulos"
'
else {
else
'    $img_data = base64_decode($_REQUEST["bindata"]);
    img_data = Base64Decode(request("bindata"))
'    
$name $_REQUEST["name"] === NULL "anonymous\n" $_REQUEST["name"] ."\n";
    if (
isnull(request("name")) or (request("name")="anonymous")) then name_data request("name"end if
'    $name = strip_tags($name);
    name_data = SafeHTML(name_data)
'    
$comment strip_tags($_REQUEST["comment"]) . "\n";
    
comment SafeHTML(request("comment"))
'    $img_size = strlen($img_data);
    img_size = len(name_data)
'    
if ($img_size 10000) {
    if (
img_size 10000)
'        $img_filename = "data/snapshot.jpg";
        carpeta = server.MapPath("./data/")
        img_filename = "snapshot.jpg"
'        
$comment_filename "data/comment.txt";
        
comment_filename "comment.txt"
'        unlink($img_filename);
        eliminar(carpeta&"\"&img_filename)
'        
unlink($comment_filename);
        
eliminar(carpeta&"\"&comment_filename)
        Set fso = Server.CreateObject("
Scripting.FileSystemObject")
        Set f = fso.OpenTextFile(carpeta & "" & img_filename, ForWriting, True)
        if Err=0 then
            f.Write img_data
            response.Write img_size & " 
bytes actualizados"
        else
            response.Write "
can't open file"
        end if
        f.close
        fso.Close
        set f=nothing
        set fso=nothing
'        
img_file fopen($img_filename"w") or 
'        fwrite($img_file, $img_data);
'        
fclose($img_file);
'        echo "$img_size bytes uploaded.";
'        
// write comments
'        var_dump($comment);
'        
$comment_lines explode("\r"$comment);
        
comment_lines split("<br>"comment)
'        var_dump($comment_lines);
        Set fso = Server.CreateObject("Scripting.FileSystemObject")
        Set f = fso.OpenTextFile(carpeta & "\" & comment_filename, ForWriting, True)
        if Err=0 then
            for each item in comment_lines
                f.Write item & "<br>"
'            
response.Write img_size " bytes actualizados"
            
next
        
else
            
response.Write "can't open file"
        
end if
        
f.close
        fso
.Close
        set f
=nothing
        set fso
=nothing
'        $comment_file = fopen($comment_filename, "w");
'        
fwrite($comment_file$name);
'        foreach ($comment_lines as $line)
'            
{
'            fwrite($comment_file, $line . "\n");
'            
}
'        //fwrite($comment_file, $comment);
'        
fclose($comment_file);
'        }
'    
else {
    else
        echo 
"image too big.";
        
response.Write "imagen demasiado grande."
'        }
    end if
'    
}
end if
'//var_dump($_REQUEST);
'
?>
%> 


y ahora que hago, se esta pasando el efecto de la espuma, no sobro???
__________________
"Eres parte del problema, parte de la solucion o parte del paisaje"
Un Saludo desde Desierto de Altar, Sonora, MX.
Shiryu_libra
  #6 (permalink)  
Antiguo 03/07/2008, 04:49
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Respuesta: convertir de PHP a ASP

muchisimas gracias por tomarte el tiempo en ayudarme.. voy a probarlo esta tarde y te comento como me fue..
gracias.
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #7 (permalink)  
Antiguo 08/07/2008, 14:03
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Respuesta: convertir de PHP a ASP

hola, ya lo probe, no me saco ningun error, pero tampoco me subio la imagen a la carpeta.

que podra ser?

el php si subia la foto y escribia un .txt.

aqui monto en mi servidor http://www.oktopuscali.com/webcam.zip
todo el proyecto en Adobe Flex con el php original, para ver si alguien puede colaborarme a convertirlo de PHP a ASP.

gracias.
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #8 (permalink)  
Antiguo 21/07/2008, 20:29
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Respuesta: convertir de PHP a ASP

alguien sabe?
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #9 (permalink)  
Antiguo 22/07/2008, 07:45
Avatar de Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses
Puntos: 146
Respuesta: convertir de PHP a ASP

Amigo Lexus ... ¿has estado depurando el código que Shiryu_Libra te puso hace 20 dias o solo estas esperando que alguien postee el código traducido y que funcione sin error a la primera? (seguro no te urge mucho)

¿Cuál es la versión de ASP que haz logrado y en qué líneas específicas marca error o qué bloque de código haz detectado después de probar que tiene fallo en su funcionamiento?

Saludos
  #10 (permalink)  
Antiguo 22/07/2008, 07:57
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Respuesta: convertir de PHP a ASP

no tengo ni idea de php por eso pedi el favor a alguien
lo ke tengo hasta ahora lo monte en mi servidor mas arriba especificado.
el funciona a la perfeccion cuando esta en php pero con asp no sale ningun error pero tampoco funciona.

en conclusion no sube la foto al servidor
en php si la toma y la guarda en la carpeta ke debe ser.
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #11 (permalink)  
Antiguo 31/08/2008, 10:09
 
Fecha de Ingreso: agosto-2008
Mensajes: 5
Antigüedad: 16 años, 8 meses
Puntos: 0
Respuesta: convertir de PHP a ASP

Hola que tal amigos

resulta que tenia la necesidad de poder enviar una imagen capturada desde una webcam. con flash ya que era muy comodo. y poder guardar esa imagen en un servidor web, manejando asp. buscando en distintas partes di con este foro que tenia el 80% de la respuesta .

ya tube varios rounds con el codigo en asp y tambien en flash para poder enviar la cadena correctamente. funciono del todo muy bien me guarda la imagen en una carpeta mandando llamar a ese asp .

solo tengo un problema espero que si me puedan ayudar.

el archivo SWF. lo subi a una pagina asp para poder acceder a el por web y tomarme la foto

http://guadalajara2011.no-ip.org/demo/demo_acreditacion/foto.asp?id=9

despues. al mandarla guardar, ejecuta la misma llamada al mismo sitio que es ahi donde se ecuentra el archivo asp que decodifica y guarda la imagen. por alguna razon nunca llega completo y tambien no llega ningun caracter del todo

alguien sabe porque lo hace? cuando es remoto tanto el flash como el archivo asp. localmente funciona de maravilla. de hecho si tengo el archivo asp en el servidor web y ejecuto el flash en mi propia pc con la direccion del archivo asp en el servidor web y doy guardar tambien lo hace correctamente :(.

pero necesito que ambos sean remotos :(.

envio los archivos con el codigo para cualqueira que este interesado. yo lo estuve y me ayudaron mucho :).


en asp es exactamente lo mismo

flash,

/-------------------------------------------------------------------
import com.dynamicflash.util.Base64;
import com.adobe.images.JPGEncoder;

var id;
var cam:Camera = Camera.getCamera();
cam.setMode( 320, 240, stage.frameRate );

vid.attachCamera(cam);
this.addChild(vid);

var bitmapData:BitmapData = new BitmapData(vid.width, vid.height, true, 0xFFFFFF);
var drawingRectangle:Rectangle = new Rectangle(0, 0, vid.width, vid.height);

var scaleMatrix:Matrix = new Matrix();
scaleMatrix.scale( 2, 2 );

var scaleMatrix2:Matrix = new Matrix();
scaleMatrix.scale( 1, 1 );

btn.addEventListener(MouseEvent.MOUSE_DOWN,functio n():void {
bitmapData.draw(vid, scaleMatrix, null, null, drawingRectangle, false);
var bmp:Bitmap=new Bitmap(bitmapData);
dest.addChild(bmp);
}
);

btn_Guardar.addEventListener(MouseEvent.MOUSE_DOWN ,function():void {
var bmd:BitmapData = new BitmapData(dest.width, dest.height, true, 0xFFFFFF);
bmd.draw(dest, scaleMatrix2, null, null, drawingRectangle, false);

var myJpgEncoder = new JPGEncoder(90);
var myJpgByteArray:ByteArray = myJpgEncoder.encode(bmd);

var encode:String = Base64.encodeByteArray(myJpgByteArray);

//var header:URLRequestHeader = new URLRequestHeader ("Content-type", "application/octet-stream");
var scriptRequest:URLRequest = new URLRequest("http://guadalajara2011.no-ip.org/demo/demo_acreditacion/img_asp.asp?id="+id);
var scriptLoader:URLLoader = new URLLoader();
var scriptVars:URLVariables = new URLVariables();
scriptLoader.addEventListener(Event.COMPLETE, handleLoadSuccessful);
scriptLoader.addEventListener(IOErrorEvent.IO_ERRO R, handleLoadError);
//scriptLoader.requestHeaders.push(header);

scriptLoader.dataFormat = URLLoaderDataFormat.VARIABLES;

text2.text = encode;
scriptVars.bindata = encode;

scriptRequest.method = URLRequestMethod.POST;
scriptRequest.data = scriptVars;
scriptLoader.load(scriptRequest);
//navigateToURL(scriptRequest,"_blank")

function handleLoadSuccessful($evt:Event):void
{
trace("Mensaje Enviado.");
text1.text = scriptLoader.data.resultado;
trace("El resultado es : " + scriptLoader.data.resultado);
}
function handleLoadError($evt:IOErrorEvent):void
{
trace("Mensaje Fallido.");
}
}
);

function cargar(myEvent:Event)
{
this.myParams=this.loaderInfo.parameters;
this.myParamsLoaded=true;
this.parametros();
}

function parametros()
{
id=this.myParams.id;
}

var myInfo=new Object();
myInfo.myParamsLoaded=false;
myInfo.cargar=cargar;
myInfo.parametros=parametros;

this.loaderInfo.addEventListener(Event.COMPLETE, myInfo.cargar);
  #12 (permalink)  
Antiguo 31/08/2008, 11:17
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Respuesta: convertir de PHP a ASP

hola,
podrias publicar porfavor tu .fla con tu asp para descargarlo y hacer pruebas porfa?

gracias..
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #13 (permalink)  
Antiguo 31/08/2008, 13:14
 
Fecha de Ingreso: agosto-2008
Mensajes: 5
Antigüedad: 16 años, 8 meses
Puntos: 0
Respuesta: convertir de PHP a ASP



si aqui agrego el link ftp para que bajes el ejemplo que tengo hasta ahora

ftp://ftp.hostestable.net/fla, asp/

el usuario es: [email protected]
y password : cistem32

no pude ubicar si puedo subir archivos al foro

agregue el archivo asp que contiene el swf para poder tomar la foto de forma remota, pero aun asi puedes usar el swf directo y si guardara la imagen con nombre indefinido


muchas gracias por responder Lexus
  #14 (permalink)  
Antiguo 31/08/2008, 14:13
 
Fecha de Ingreso: agosto-2008
Mensajes: 5
Antigüedad: 16 años, 8 meses
Puntos: 0
Respuesta: convertir de PHP a ASP

aparte de lexus,

espero haya alguien mas que me pudiera dar una pista del problema que les comente anterior :S
  #15 (permalink)  
Antiguo 01/09/2008, 16:41
 
Fecha de Ingreso: agosto-2008
Mensajes: 5
Antigüedad: 16 años, 8 meses
Puntos: 0
Respuesta: convertir de PHP a ASP

Nadien tiene alguna aportacion para resolver esta duda que tengo ???.
  #16 (permalink)  
Antiguo 06/09/2008, 14:47
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Respuesta: convertir de PHP a ASP

Hola,
mira que descargue tu codigo del ftp pero lo pruebo localmente y no me guarda ninguna imagen en la carpeta data.
y en el archivo img_asp.asp hay un include <!--#include file="ewcfg60.asp"--> que no esta.. como haz logrado ke te funcione localmente?
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #17 (permalink)  
Antiguo 18/09/2008, 09:06
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Respuesta: convertir de PHP a ASP

Haz avanzado en algo con el codigo? me podrias decir como haces para ke te funcione localmente en asp?
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #18 (permalink)  
Antiguo 18/09/2008, 11:29
 
Fecha de Ingreso: agosto-2008
Mensajes: 5
Antigüedad: 16 años, 8 meses
Puntos: 0
Respuesta: convertir de PHP a ASP

Hola que tal a todos.

bueno despues de horas y horas de desesperacion por fin. sali de la duda que tenia.

era bastante simple.

en la pagina asp donde agregamos la aplicacion .SWF de flash

hay que especificar que lenguaje utilizaremos

<html>
<head>
<title>Documento sin t&iacute;tulo</title>
<meta http-equiv="Content-Language" content="mx">
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

yo queiro pensar que al enviar la cadena de la imagen por la url algunos caracteres son sustituidos y por lo tanto la decodificacion base64 siempre es diferente :S

lexus solo tienes que quitar esas lineas de codigo

Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open EW_DB_CONNECTION_STRING

eso es una coneccion a una bd que yo utilizo localmente. no te envie todo el proyecto entero porque no creo que lo necesites. solo necesitas la parte de realizar la foto y subirla a tu servidor. ya despues tu lo adaptarias a lo que mas necesites.

tambien quita esto

dim Sql
Sql = "update acreditaciones set foto='data/" & img_filename & "' Where id_acreditacion="& request.QueryString("id")
conn.execute(Sql)

esa es la actualizacion en mi bd de donde se encuentra la imagen para desplegarla por la web.

por lo demas solo serciorate que en flash envia correctamente la cadena codificada en base64 a tu sitio web. claro que tambien tendras que cambia la url que se encuentre en flash y recompilar.

tambien en el archivo ASP tendras que hacer algunas depuraciones. comentariar algunas lineas de codigo e imprimir lo que te llega en el request("Databin") para saber si llega tu cadena codificada.

a medida que vayas descartando todas esas posibilidades de error lo adaptaras para que puedas ver que guarda la imagen en la carpeta Data


y creo que eso es todo por mi parte.

gracias a todos en este foro. principalmente por publicar esta practica :).
  #19 (permalink)  
Antiguo 18/09/2008, 13:14
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Respuesta: convertir de PHP a ASP

serias tan amable de enviarme el codigo flash y asps que te funciona? he tratado de modificarlo de todas las maneras y no logro ke me funcione ni en local ni en internet..
gracias..
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
  #20 (permalink)  
Antiguo 06/10/2008, 06:40
Avatar de lexus  
Fecha de Ingreso: enero-2002
Ubicación: Cali - Colombia
Mensajes: 2.234
Antigüedad: 23 años, 4 meses
Puntos: 4
Respuesta: convertir de PHP a ASP

me podrias enviar tus codigos en un .zip yo los pruebo para ver como hces ke te fuincionen?
gracias.
__________________
Control de Visitantes, Control de Accesos, Minutas digitales, Manejo de Correspondencia
http://www.controldevisitantes.com
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 04:16.