Ultradev - propuesta decente

 
Vista:

propuesta decente

Publicado por ramonchu (12 intervenciones) el 11/05/2001 19:02:08
a ver quien le saca el fallo a esta página:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../Connections/base_datos.asp" -->
<%
' *** Edit Operations: declare variables

MM_editAction = CStr(Request("URL"))
If (Request.QueryString <> "") Then
MM_editAction = MM_editAction & "?" & Request.QueryString
End If

' boolean to abort record edit
MM_abortEdit = false

' query string to execute
MM_editQuery = ""
%>
<%
' *** Insert Record: set variables

If (CStr(Request("MM_insert")) <> "") Then

MM_editConnection = MM_base_datos_STRING
MM_editTable = "meta10.CLIENTES"
MM_editRedirectUrl = "InsertOk.htm"
MM_fieldsStr = "EMPRESA|value|NUMERO_CLIENTE|value|NOMBRE|value|RAZON_SOCIAL|value|DIRECCION1|value|CODIGO_POSTAL|value|POBLACION|value|PROVINCIA|value|NIF|value|TELEFONO1|value|TELEFONO2|value|FAX|value|PERSONA_CONTACTO|value"
MM_columnsStr = "EMPRESA|none,none,NULL|NUMERO_CLIENTE|none,none,NULL|NOMBRE|',none,''|RAZON_SOCIAL|',none,''|DIRECCION1|',none,''|CODIGO_POSTAL|',none,''|POBLACION|',none,''|PROVINCIA|',none,''|NIF|',none,''|TELEFONO1|',none,''|TELEFONO2|',none,''|FAX|',none,''|PERSONA_CONTACTO|',none,''"

' create the MM_fields and MM_columns arrays
MM_fields = Split(MM_fieldsStr, "|")
MM_columns = Split(MM_columnsStr, "|")

' set the form values
For i = LBound(MM_
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder