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

Carrito de compra cibertienda ayuda!!!!!!!!!

Estas en el tema de Carrito de compra cibertienda ayuda!!!!!!!!! en el foro de ASP Clásico en Foros del Web. pues eso resulta que no tengo ni idea de como configurar el server ya que en php me dice que no esta disponible y quisiera ...
  #1 (permalink)  
Antiguo 29/11/2003, 20:21
 
Fecha de Ingreso: noviembre-2003
Mensajes: 27
Antigüedad: 20 años, 6 meses
Puntos: 0
Carrito de compra cibertienda ayuda!!!!!!!!!

pues eso resulta que no tengo ni idea de como configurar el server ya que en php me dice que no esta disponible y quisiera hacerlo en asp pero no tengo ni idea de asp asi que cuando pongo que cibertienda me genere el archivo en asp configurado sin tocar nada en cdonts pero me da error .
esto es lo que me genera:
<%
Dim Producto, Cantidad, ProductoTotal, Total, Mail, index

Set Mail = Server.CreateObject("Persits.MailSender")

Mail.Host = ""
Mail.From = "[email protected]"
Mail.FromName = "Cibertienda"
Mail.AddAddress "[email protected]", "Cibertienda"
Mail.Subject = "Cibertienda - Orden de Compra"
Mail.Body = "Cibertienda v1.0 - Orden de Compra" & VbCrLf & VbCrLf

For index = 1 to Request.Form.Count

Producto = Request.Form("Producto" & index)
Cantidad = Request.Form("Cantidad" & index)
ProductoTotal = Request.Form("ProductoTotal" & index)

Mail.Body = Mail.Body & "Producto" & index & ": " & Producto & VbCrLf
Mail.Body = Mail.Body & "Cantidad" & index & ": " & Cantidad & VbCrLf
Mail.Body = Mail.Body & "ProductoTotal" & index & ": " & ProductoTotal & VbCrLf & VbCrLf

next

Total = Request.Form("Total")
Mail.Body = Mail.Body & "Total: " & Total & VbCrLf & VbCrLf
Mail.Body = Mail.Body & "Datos Personales:" & VbCrLf
Mail.Body = Mail.Body & "Nombre " & Request.Form("nombre") & VbCrLf
Mail.Body = Mail.Body & "Apellido " & Request.Form("apellido") & VbCrLf
Mail.Body = Mail.Body & "Domicilio " & Request.Form("domicilio") & VbCrLf
Mail.Body = Mail.Body & "Ciudad " & Request.Form("ciudad") & VbCrLf
Mail.Body = Mail.Body & "Provincia " & Request.Form("provincia") & VbCrLf
Mail.Body = Mail.Body & "Código Postal " & Request.Form("cp") & VbCrLf
Mail.Body = Mail.Body & "País " & Request.Form("pais") & VbCrLf
Mail.Body = Mail.Body & "E-mail " & Request.Form("email") & VbCrLf
Mail.Body = Mail.Body & "Teléfono " & Request.Form("telefono") & VbCrLf
Mail.Body = Mail.Body & "Fax " & Request.Form("fax") & VbCrLf


Mail.Send

If Err <> 0 Then
Response.Write Err.Description
End If
%>
y cuando lo subo a un servidor asp y relleno el formulario y lo envio me sale el siguiente error:
Objeto Server error 'ASP 0177 : 800401f3'

Error en Server.CreateObject

/webs5/access/enviar.asp, line 4

ProgID no válido. Para recibir información adicional referente a este mensaje, visite el sitio Web de soporte técnico de Microsoft que se encuentra en: http://www.microsoft.com/contentredirect.asp.

por favor decidme que hay que rectificar para que funcione gracias

Última edición por kaneda560; 29/11/2003 a las 20:34
  #2 (permalink)  
Antiguo 30/11/2003, 01:24
Avatar de Gurrutello  
Fecha de Ingreso: enero-2002
Ubicación: Ontario,Toronto [Canada]
Mensajes: 2.017
Antigüedad: 22 años, 4 meses
Puntos: 6
hola
segun el error es que tu servidor no soporta Cdonts!!
SALUDOS
__________________
Un Saludo
www.tutores.org
Asp | Php | Javascript | Perl | Coldfusion | Flash | +- 2000 codigos
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 00:24.