26/09/2005, 14:46
| ||||
| ||||
| Otro más para subir archivos Decidí colocar esta clase porque es lejos, la mejor función que he encontrado para subir archivos. Es robusta y flexible mientras el resto de lo que encuentro son scripts que medio funcionan. http://www.aspemporium.com/codelib.aspx?pid=139&cid=4
__________________ Friedrich Nietzsche |
|
07/11/2005, 17:54
| ||||
| ||||
| Para "solucionar"* el Error 500, error interno del servidor: 1- En su Internet Explorer, vaya al menú "Herramientas -> Opciones de internet -> Opciones avanzadas" y desmarque "Mostrar mensajes descriptivos de los errores http". Luego intente acceder nuevamente a su página. 2- Mejor deje de usar esa cosa llamada Internet Explorer y beneficiese usando Firefox. *En realidad no se soluciona nada, sino que se hace posible enterarnos sobre el ERROR REAL
__________________ ...___... Última edición por AlZuwaga; 23/12/2005 a las 09:59 |
|
03/12/2005, 11:32
| |||
| |||
| Solucion A Este Error SOLUCION REAL PARA ERRORES: Microsoft OLE DB Provider for ODBC Drivers (0x80004005) [Microsoft][ODBC Microsoft Access Driver] Operation must use an updateable query. Microsoft JET Database Engine (0x80004005). Error Desconocido. Microsoft OLE DB Provider for ODBC Drivers (0x80004005) [Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x6cc Thread 0x78c DBC 0x144cfc4 Jet'. Deben darles permiso, contro total a la carpta donde tiene su sitio ejemplo c:\inetpub\wwwroot\misitio, al usuario: IUSR_Nombre_Equipo, puede ser a la carpeta como a la base de datos. generalmente todos hacen esto y siguen con el problema como a mi pero busque por ahi la solcuion y es que tambien deben darle los mismos permisos, control total a la carpeta TEMP de su equipo (esto yo no lo sabia lo hize y solucione todos mis problemas) y tambien al usuario IUSR_Nombre_Equipo si no llegase a estar lo agregan.. Saludos....a mi me paso esto, lleve dias sin resolverlo y lo hize. Saludos desde chile AlejandRO |
|
08/12/2005, 11:26
| ||||
| ||||
 sonar musica continua (tipo radio) en asp no se si lo borraran o lo moveran, pero esto yo me andube dando como loco y no encontre en ningun lugar como hacerlo. Problema: tenia que montar musica navideña par la musica, pero de una forma continua, para que la gente de mi intranet pudiera tener acceso a ella, existian un par de cosas que resolver, por ejemplo, no poner los audios en buena calidad y evitar distociones y sobre todo trafico innecesario en la intranet. solucion: Descargue una aplicacion hecha en PHP que alguien puso el codigo para asp y es del que voy a hablar en adelante. Descargar de: http://www.radioblogclub.com/ es una pequeña animación flas que reproduce canciones en formato *.rbs en la misma aplicación viene el convertidor de MP3 a RBS (facilisimo de usar), el cual baja audios de 5 megas en 900kb y con calidad buena de audio. lo copie en mi sitio web, y solo tuve que agregar en tipos MIME las extensiones rbs Directorio /radio.blog/ para esto te vas al IIS propiedades del sitio encabezados HTTP tipos de archivo nuevo estension asociada: .rbs MIME: application/octet-stream listo luego en el raiz de /radio.blog/ copie el siguiente asp default.asp Cita: <html> <head> <title>RADIO.BLOG</title> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body bgcolor="#FFFFFF" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"> <object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#3,0,0,0" width="220" height="300"> <param name="src" value="radioblog.swf?autoplay=<% = request("autoplay") %>"> <param name="quality" value="high"> <embed src="radioblog.swf?autoplay=<% = request("autoplay") %>" type="application/x-shockwave-flash" PLUGINSPAGE="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" width="220" height="300"> </object><br> </body> </html> copie los audios preparados en /radio.blog/sound y dentro de el el siguiente asp playlist.asp Cita: listo solo necesitas probarlo<% CONST FILE_EXT = ".rbs" dim path dim oXml, oNodeTrk dim oFso, oFld, oFile path = server.mappath(".") set oFso = server.createObject("Scripting.FileSystemObject") set oFld = oFso.getFolder(path) set oXml = server.createobject("MSXML2.DOMDocument") oXML.async=false set oXML.documentElement = oXML.createElement("tracks") for each oFile in oFld.files if right(oFile.name, 4) = FILE_EXT then set oNodeTrk = oXml.createElement("track") oXML.documentElement.appendChild oNodeTrk oNodeTrk.setAttribute "trackMod", dateDiff("s", cdate("1970-01-01"), oFile.DateLastModified) oNodeTrk.setAttribute "title", left(oFile.name, len(oFile.name)-4) oNodeTrk.setAttribute "path", oFld.name &"/"& oFile.name set oNodeTrk = nothing end if next 'response.contentType = "text/xml" response.write "<?xml version=""1.0"" encoding=""UTF-8""?>" response.write oXml.xml set oXml = nothing set oFso = nothing %> para auto play tendias que poner en tu navegador default.asp?autoplay=1 archivos necesarios config.xml - cambia la apariencia de colores del reproductor radioblog.swf - reproductor de audios rbcore.swf - los dos asp anteriores suerte si quieren probarlo entren a : http://juanra.cybercentro.com.sv/nav...asp?autoplay=1 jijiji esperando les sirva y que el enlace no lo haya removido para proximos años saludos editado: ojo la musica en rbs no deve de llevar caracteres extraños ni eñes ni tildes, ni otro caracter, porque eso hace errores en el barrido de el asp playlist
__________________ JuanRa Pérez San Salvador, El Salvador |
|
02/03/2006, 10:03
| ||||
| ||||
| Paginar resultados ¿Cómo muestro mis resultados por páginas? Lo que se llama "paginación de resultados"... He akí una manera de paginar tus resultados para dar un toque "pofesional" a tu web:  Este código debe ir en una página que se llame "Paginar.asp":
Código:
<HTML>
<BODY>
<%
Dim mostrar 'cantidad de registros a mostrar por página
Dim cant_paginas 'cantidad de páginas que recibimos
Dim pagina_actual 'La página que mostramos
Dim registro_mostrado 'Contador utilizado para mostrar las páginas
Dim I 'Variable Loop
dim strsql 'Consulta sql
mostrar = 20 ' Pueden modificar este número para cambiar la cantidad de registros por página
' IF para saber que página mostrar
if request("page")="" then
pagina_actual = 1
Else
pagina_actual = CInt(Request.QueryString("page"))
End If
'Conexión con la BD
dim conex,reg,sql,usuario
set conex=server.CreateObject("ADODB.Connection")
set reg=server.CreateObject("ADODB.Recordset")
conex.ConnectionString="provider=microsoft.jet.oledb.4.0; data source=" & server.MapPath("Nombre_de_tu_base.mdb")
conex.Open
sql="select * from tabla where Nombre_campo_tabla=" & nom_variable & ""
reg.Open sql,conex,3,2
' Creamos el RecordSet y definimos la cantidad de registros a mostrar
reg.PageSize = mostrar
reg.CacheSize = mostrar
'contamos las páginas que se formaron con la variable mostrar.
cant_paginas = reg.PageCount
' Si el pedido de página cae fuera del rango,
' lo modificamos para que caiga dentro
If pagina_actual > cant_paginas Then pagina_actual = cant_paginas
If pagina_actual < 1 Then pagina_actual = 1
' Si la cantidad de páginas da 0 es que no hay registros... por eso este IF
If cant_paginas = 0 Then%>
<%Response.Write("NO HAY REGISTROS")%>
<%Else
' Nos movemos a la página elegida
reg.AbsolutePage = pagina_actual
' Mostramos el dato de que página estamos...
%>
<FONT face=Arial><FONT>
<FONT SIZE="+1">Página <B><%= pagina_actual %></B> de <B><%= cant_paginas %></B></FONT>
<%
' Espacios
Response.Write "<BR><BR>" & vbCrLf
'iniciamos la tabla donde mostraremos todo
Response.Write "<TABLE BORDER=""1"" width=""300"" bordercolor=""black"">" & vbCrLf%>
<tr bgcolor=red>
<th colspan=20><FONT face=Arial size=2><STRONG><FONT color=ivory> TITULO TABLA</STRONG></FONT></FONT></th>
</tr><br>
<%' Mostramos los titulos de las columnas... (pueden sacar ese FOR para eliminar eso)
Response.Write vbTab & "<TR>" & vbCrLf
For I = 0 To reg.Fields.Count - 1
Response.Write vbTab & vbTab & "<TD><B><FONT face=Arial size=2 color=mediumblue>"
Response.Write reg.Fields(I).Name
Response.Write "<B></TD></FONT>" & vbCrLf
Next 'I
Response.Write vbTab & "</TR>" & vbCrLf
' Hacemos el bucle mostrando los datos del registro
registro_mostrado = 0
Do While registro_mostrado < mostrar And Not reg.EOF
Response.Write vbTab & "<TR>" & vbCrLf
For I = 0 To reg.Fields.Count - 1
Response.Write vbTab & vbTab & "<TD>"
Response.Write reg.Fields(I)
Response.Write "</TD>" & vbCrLf
Next 'I
Response.Write vbTab & "</TR>" & vbCrLf
' Sumamos 1 a los mostrados
registro_mostrado = registro_mostrado + 1
' Nos movemos al próximo registro...
reg.MoveNext
Loop
'listo...
Response.Write "</TABLE>" & vbCrLf
End If
' Cerramos y limpiamos...
reg.Close
Set reg = Nothing
conex.Close
Set conex = Nothing
' Ahora mostramos los enlaces a las otras páginas con el resto de los registros...
If pagina_actual > 1 Then
%>
</FONT></FONT>
<A href="./paginar.asp?eje=30&page=<%= pagina_actual - 1 %>" ><FONT
face=Arial>[<< Anterior]</FONT> </a>
<%
End If
' mostramos la paginacion por numeros de página
For I = 1 To cant_paginas
If I = pagina_actual Then
%>
<%= I %>
<%
Else
%>
<FONT face=Arial> </FONT>
<A href="./paginar.asp?eje=30&page=<%= I %>" ><%= I %></a>
<%
End If
Next 'I
If pagina_actual < cant_paginas Then
%>
<A href="./paginar.asp?eje=30&page=<%= pagina_actual + 1 %>" ><FONT
face=Arial>[Próximo >>]</FONT ></a>
<%
End If
'Fin...
%>
%>
<form action="Paginar.asp" method="post" name="form332" id="form332">
<input type="hidden" name="page" value="<%=pagina_actual%>">
<p><input type="submit" value="VOLVER" name="cmd_volver"></p>
</form>
<%
</BODY>
</HTML>
Última edición por gorka_arai; 20/04/2006 a las 00:56 |
|
07/03/2006, 15:24
| ||||
| ||||
| 3 Select Dependientes con datos de una Bd que funciona Ok
Código:
Página Index.asp:
<form name="frm1" method="post" action="guardar.asp">
<select name="lstProc" class="caja" onChange="location.href='Index.asp?IdProcedimiento=' +
frm1.lstProc.options[frm1.lstProc.selectedIndex].value">
<option value="0">Seleccione Tipo Proc.</option>
<% Sql = "SELECT codTipoProc, tipoProc FROM TblTipoProcedimientoExpress"
Rst.Open Sql, Con
Procedimiento = Request.QueryString("IdProcedimiento")
Do While Not Rst.EOF
codTipoProc = Trim(Rst("CodTipoProc"))
TipoProc = Trim(Rst("TipoProc"))
If Procedimiento <> "" Then
If (CInt(Procedimiento) = CInt(codTipoProc)) Then %>
<option value="<%=codTipoProc%>" selected><%=TipoProc%></option>
<% Else %>
<option value="<%=codTipoProc%>"><%=TipoProc%></option>
<% End If%>
<% Else %>
<option value="<%=codTipoProc%>"><%=TipoProc%></option>
<% End If
Rst.Movenext
Loop
Rst.Close %>
</select>
</td>
<td>
<select name="lstPlataforma" onChange="location.href='Index.asp?IdPlataforma=' +
frm1.lstPlataforma.options[frm1.lstPlataforma.selectedIndex].value + '&IdProcedimiento='+ frm1.lstProc.options[frm1.lstProc.selectedIndex].value">
<option value="0">Seleccione Plataforma</option>
<% If Request.QueryString("IdProcedimiento") <> "" Then %>
<% idProced = CInt(Request.QueryString("IdProcedimiento"))
idPlataforma = CInt(Request.QueryString("IdPlataforma"))
Sql = "SELECT codTipoPlataforma, NombrePlataforma FROM TblSistemaProcExpressPlataforma WHERE codTipoProc = "&idProced&";"
Rst.Open Sql, Con
Do While Not Rst.EOF
codTipoPlataforma = Trim(Rst("codTipoPlataforma"))
NombrePlataforma = Trim(Rst("NombrePlataforma"))
If idPlataforma <> "" Then
If (CInt(idPlataforma) = CInt(codTipoPlataforma)) Then %>
<option value="<%=codTipoPlataforma%>" selected><%=NombrePlataforma%></option>
<% Else %>
<option value="<%=codTipoPlataforma%>"><%=NombrePlataforma%></option>
<% End If%>
<% Else %>
<option value="<%=codTipoPlataforma%>"><%=NombrePlataforma%></option>
<% End If %>
<% Rst.Movenext
Loop
Rst.Close
End If %>
</select>
</td>
</tr>
<tr>
<td>Momento</td>
<td>
<select name="lstMomento">
<option value="0">Seleccione momento</option>
<% If Request.QueryString("IdPlataforma") <> "" Then %>
<% idPlataforma = CInt(Request.QueryString("IdPlataforma"))
Sql = "SELECT CodigoMomento, NombreMomento FROM TblSistemaProcExpressMomento WHERE codTipoPlataforma = "&idPlataforma&";"
Rst.Open Sql, Con
Do While Not Rst.EOF
codigoMomento = Trim(Rst("CodigoMomento"))
NombreMomento = Trim(Rst("NombreMomento")) %>
<option value="<%=codigoMomento%>"><%=NombreMomento%></option>
<% Rst.Movenext
Loop
Rst.Close
End If %>
</select>
</form>
__________________ <nick>Dorita</nick>...si lo sé, soy una ñoña ;) |
|
24/03/2006, 12:22
| ||||
| ||||
| Contar Registros En Mysql No se si ya este pero no lo encontre, para poder contar los registros en ACCESS pues usamos algo asi:
Código:
En MySQL esto no funciona, siempre dara como resultado -1, pero si agregamos esta linea:SQL="Select * From TABLA" RS.Open SQL, oConn,1,1 cuantos=RS.RecordCount RS.CursorLocation = 3 antes del RS.Open... WALAA 
__________________ CreandoWebs.com www.creandowebs.com PLANTILLAS TEMPLATEMONSTER CON 10% DE DESCUENTO |
|
04/09/2006, 18:15
| ||||
| ||||
| html y sql injection - no insertar hay varias funciones en las faq para limpiar cadenas y evitar html y sql injection... una mas que encontre fuera del foro y que creo que les servira (si ya esta publicada aqui no la vi) funcion Cita: uso<% Function Caracteres_Ilegales(stringEntrada) Dim stringCaracteresMalos, iCounter Caracteres_Ilegales = False stringCaracteresMalos = array("http://", "<h1>", "url", "link=", "[h1]", "[a]", "[href]") For iCounter = 0 to uBound(stringCaracteresMalos) If Instr(stringEntrada,stringCaracteresMalos(iCounter ))>0 Then Caracteres_Ilegales = True End If Next End function %> Cita: fuente If Caracteres_Ilegales(comentario) = True OR Caracteres_Ilegales(email) = True Then response.redirect("enegado_publicacion.asp") End If http://www.thescripts.com/forum/thread513587.html espero le sirva a alguien como a mi... en mi caso en lugar de response.redirect puse publciar = "pendiente" asi mando un mail al administrador del sitio con ese post para un libro de visitas que requeire de su aprobacion o eliminacion si fuese publicidad. suerte
__________________ JuanRa Pérez San Salvador, El Salvador |
|
11/10/2006, 09:17
| ||||
| ||||
| Saludos, les dejo este vinculo que describe la forma de subir imagenes al servidor y al mismo tiempo agregarlas (path de la imagen) a una db MySQL. http://www.forosdelweb.com/f15/subir-imagenes-servidor-baja-todo-codigo-completo-coemntado-431929/ Espero sea de ayuda para aquellos compañeros que deseen tener una idea mas amplia de como hacerlo, y para los que ya saben y deseen aporta mas soluciones e ideas con gusto recibire sus comentarios.
__________________ México no es México sin su gente, y la democracia no es de algunas personas, es de todos. Hagamos valer nuestros derechos. |
|
27/12/2006, 13:01
| ||||
| ||||
| 25 Tips para mejorrar el rendimiento de las páginas ASP |
|
11/05/2007, 18:15
| ||||
| ||||
| Re: FAQ's del foro de ASP Compañeros, ultimamente hemos tenido muchas preguntas sobre CDOSYS, asi que encontre este enlace que espero les sea de mucha ayuda. Utilizar SMTP para los mensajes salientes explica:
__________________ "Eres parte del problema, parte de la solucion o parte del paisaje" Un Saludo desde Desierto de Altar, Sonora, MX. Shiryu_libra |
|
08/11/2007, 21:11
| |||
| |||
| Re: FAQ's del foro de ASP No se si sera un gran aporte.....pero comparto con todos ustedes un BUSCADOR MULTIPLE con distintos criterios de busqueda: Cita: espero que les sirva <HTML> <HEAD> <META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0"> <FORM ACTION='Validar.asp' METHOD='GET' id=form1 name=form1> </HEAD> <body bgcolor="#FFCC66" background="2.jpg" text="BLACK" link="BLACK" vlink="BLACK" alink="BLACK"> <% dim dbConn 'aca recibo los campos que voy a realizar la busqueda 'si quieren agregar mas.....simplemente los agregan aca y despues en las variables csr = Request.form("csr") distribuidor = Request.form("distribuidor") estado = Request.form("estado") On Error Resume next 'declaro las variables a utilizar incluyendo la se_encuentra Dim Rs, Cnn, SQL, se_encuentra set Cnn=Server.CreateObject("ADODB.Connection") set rs=Server.CreateObject("ADODB.Recordset") Cnn.Open Session("cnx") 'ejecuto la consulta strSQL="SELECT * FROM tblcliente" se_encuentra = False if csr <> "" then strSQL=strSQL & " WHERE csr LIKE '%"&csr&"%'" se_encuentra=True end if 'la variable se_encuentra se inicializa en falso y se cambia a verdadero si el campo trae un valor ingresado if distribuidor <> "" then if se_encuentra then strSQL=strSQL & " AND distribuidor LIKE '%"&distribuidor&"%'" else strSQL=strSQL & " WHERE distribuidor LIKE '%"&distribuidor&"%'" se_encuentra=True end if end if if estado <> "" then if se_encuentra then strSQL=strSQL & " AND estado LIKE '%"&estado&"%'" else strSQL=strSQL & " WHERE estado LIKE '%"&estado&"%'" se_encuentra=True end if end if 'abrimos la tabla para llamar los registros set rs = Cnn.Execute(strSQL) cnn.Execute(strSQL) if rs.EOF then Response.Write("No existe el campo ingresado, verifique los datos") else %> 'si encuentra los datos, mostramos los resultados <CENTER> <TABLE WIDTH=2000 BORDER=1 align="center" CELLSPACING="0"> <tr> <td width=80 bordercolor="#F0F0F0"bgcolor="ORANGE"><center><b>C sr</b></center> <td width=100 bordercolor="#FFFFFF" bgcolor="ORANGE"><center><b>Local</b></center> <td width=99 bordercolor="#FFFFFF" bgcolor="ORANGE"><center><b>Guia De Despacho</b></center> <td width=134 bordercolor="#FFFFFF" bgcolor="ORANGE"><center><b>Distribuidor</b></center> <td width=102 bordercolor="#FFFFFF" bgcolor="ORANGE"><center><b>Fecha Ingreso</b></center> <td width=160 bordercolor="#FFFFFF" bgcolor="ORANGE"><center><b>Artefacto</b></center> <td width=100 bordercolor="#FFFFFF" bgcolor="ORANGE"><center><b>Serie</b></center> <td width=80 bordercolor="#FFFFFF" bgcolor="ORANGE"><center><b>Estado</b></center> </tr> </table> </CENTER> <%do while not rs.EOF%> <center> <TABLE BORDER=1 CELLSPACING="0" WIDTH=2000> <tr> <%Response.Write "<td WIDTH=80 align='center' >"&rs("csr")&"<td WIDTH=100 align='center'>"&rs("loc")&"<td WIDTH=99 align='center'>"&rs("guia_d")&"<td WIDTH=134 align='center'>"&rs("distribuidor")&"<td WIDTH=102 align='center'>"&rs("fecha_in")&"<td WIDTH=160 align='center' >"&rs("artefacto")&"<td WIDTH=100 align='center' >"&rs("serie")&"<td WIDTH=80 align='center' >"&rs("estado")%> <br> </tr> <%rs.Movenext%> </table></center> <%loop end if rs.Close set rs = nothing Cnn.Close set oCnn = nothing %> <br> <br> <font face="Verdana"> <h3> <center> <a href="../menu.asp">Volver</a> </center> </h3> </font> </body> </html> |
|
03/02/2008, 11:39
| ||||
| ||||
| Re: FAQ's del foro de ASP Version ilustrada Pregunta: Como otorgo permisos de escritura??? Cual es el procedimiento?? Primero que nada, debemos entrar a las opciones de carpeta dentro del menu Herramientas, para activar nuestra pestaña de seguridad  el siguiente paso sera desmarcar donde dice "Utilizar uso compartido simple de archivos" eso de recomendado como que no.....   una ves realizado este segundo paso, damos aceptar, y regresamos a la carpeta que nos interesa  ya una ves que demos click sobre las propiedades de la carpeta, aparecera ahora si nuestra pestaña de seguridad, donde estableceremos a que usuario y que privilegios tendran dentro de esta carpeta.... las ilustraciones a continuacion estaran numeradas para realizar el procedimiento sencillo..       una ves establecidos los privilegios que tendra cada uno de nuestros usuarios en esa carpeta especifica, podran o no, escribir o leer el contenido nota aclaratoria:..a pesar que esta actividad es para que nuestras paginas ASP funcionen correctamente, tambien dentro del uso normal de nuestro sistema, podran mantener en privado o sin acceso a ella, a otros usuarios tambien deben recordar que cualquier administrador podra quitar esos atributos 
__________________ "Eres parte del problema, parte de la solucion o parte del paisaje" Un Saludo desde Desierto de Altar, Sonora, MX. Shiryu_libra Última edición por Shiryu_Libra; 26/04/2009 a las 23:59 Razón: cambio de URL en imagenes |
|
21/04/2008, 11:04
| ||||
| ||||
| Microsoft OLE DB Provider for ODBC Drivers error '80004005' Error de disco o de red. Bueno, dejo esto aquí porque me ha dado líos encontrar la respuesta y quizás a alguien le sirva mas adelante. error es: Cita: Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][Controlador ODBC Microsoft Access] Error de disco o de red. /demos/07102/include/ConectorBaseDatos.asp, línea 5 El escenario es: + Windows Vista + IIS 7 + ASP 3.0 + Conexión a base de datos access funcionando perfectamente en otra pc. Solución: Buscar en la siguiente ruta C:\Windows\System32\inetsrv\config archivo llamado: ApplicationHost.Config Cambiar las siguientes lineas Cita: por<applicationPoolDefaults> <processModel identityType="NetworkService" /> </applicationPoolDefaults> Cita: ni idea de porque pero ya funciona<applicationPoolDefaults> <processModel identityType="NetworkService" loadUserProfile="false" /> </applicationPoolDefaults> suerte
__________________ JuanRa Pérez San Salvador, El Salvador |
|
30/05/2008, 13:41
| ||||
| ||||
| Respuesta: FAQ's del foro de ASP Version Ilustrada Pregunta: Como puedo mostrar errores descriptivos desde la consola de IIS7 en Windows Vista (referencias de imagenes desde un Vista Ultimate) Los tipicos 3 pasos de rigor (solo para usuarios que apenas incursionan en esto), que debemos hacer Otro atajo, es dar Click derecho sobre EQUIPO, Administrar NOTA: si ya sabes llegar, omite estos 3 pasos, y brinca directamente al paso 4 Paso1   Paso 2 buscaremos dentro del PANEL DE CONTROL HERRAMIENTAS ADMINISTRATIVAS   Paso 3 Seleccionaremos "Administrador de INTERNET INFORMATION SERVICES (IIS)"   Paso 4 Desplegaremos hasta seleccionar "Default Web Site", o en su caso respectivo el sitio web que deseen   Paso 5 Daremos doble click sobre "Paginas de Errores"   Paso 6 En el panel derecho se encontrara una leyenda que dice "MODIFICAR CONFIGURACION DE CARACTERISTICA..."   Paso 7 por default, tiene activada "Errores detallados para solicitudes locales y paginas de errores personalizados para solicitudes remotas" sean cautelozos en este sentido   NOTA: significa que si ejecutamos en el entorno 127.0.0.1 o si estamos haciendo pruebas dentro del mismo pc, nos mostrara completamente el error, dando el numero de linea.. etc pero si lo hacemos utilizando un segundo equipo dentro de nuestra red, no dara ningun detalle sean concientes que si esto es para una web interna, no habra tanto problema, pero si activan esta caracteristica para un web de consulta externa(internet), podria ser un riesgo de seguridad ya que estariamos dando armas para romper el codigo
__________________ "Eres parte del problema, parte de la solucion o parte del paisaje" Un Saludo desde Desierto de Altar, Sonora, MX. Shiryu_libra Última edición por Shiryu_Libra; 07/07/2010 a las 16:58 |
|
12/11/2008, 08:03
| ||||
| ||||
| Respuesta: Obtener la id del registro recien creado Aquí lo tenemos para Sql Server y Acess
__________________ Los formularios se envían/validan con un botón Submit <input type="submit" value="Enviar" style="background-color:#0B5795; font:bold 10px verdana; color:#FFF;" /> |
|
13/11/2008, 13:07
| |||
| |||
 FAQ's del foro de ASP http://cheeso.members.winisp.net/IIRF.aspx Que conste que ni conozco a los creadores y que esto no es Spam de ningún tipo. Hace algún tiempo ya escribi sobre otra aplicación similar: http://www.forosdelweb.com/f91/duda-sobre-urls-amigables-615181/ Que conseguía que urls de este estilo http://misitio.com/catologo.asp?seccion=seccion1&busqueda=palabra_a_b uscar&otravariabe=pedocacapis Se parecieran a esta: http://misitio.com/catologo.asp/seccion=1/catalogo=catalogo2/otravariabe=pedocacapis/ Pero utilizando el IIRPF y configurándolo se puede gastar como si del module Rewrite del apache se tratara. Y en lugar de gastar un .htacces es editando el IsapiRewrite4.ini El metodo de instalacion es sencillo: Servicios de Internet Information Server -> Servicios Web -> Propiedades -> Filtros ISAPI -> Agregar -> Examinar .. > Elegir el IsapiRewrite4.dll En el mismo directorio de IsapiRewrite4.dll colocar el IsapiRewrite4.dll Ejemplo:   Url imagen en grande:http://img220.imageshack.us/my.php?image=iisqw8.jpg Aqui teneis un ejemplo de configuracion (Archivo IsapiRewrite4.ini): Código PHP: http://misitio.com/catologo/lavadora-siemens-WM12S740EE.htm http://misitio.com/catologo/lavadora/siemens/WM12S740EE/ http://misitio.com/agemda/2008/11/14/ http://misitio.com/agemda/2008-11-14.htm http://misitio.com/agemda/2008-noviembre-14.htm Y así cuantos ejemplos queráis . Cuando os lo descarguéis el IIRPF veréis que hay muchos archivos de configuración de ejemplo. Ya no hay excusas para no tener URL's Amigables  Saludos! |
|
02/12/2008, 12:44
| |||
| |||
| FAQ's del foro de ASP Saludos! Hoy ando por aquí listo para una aportación . . .Seguramente alguna vez has necesitado una diferencia de horas, minutos ó simples segundos, lo malo es que si lo hicieramos de la forma tradicional nos saldría algo mas ó menos así: 1 hora 0 minutos 4933 segundos Lo cuál no es el resultado esperado no es verdad? Con el siguiente código pueden por fin hacer su pequeño contador hehehe . . . espero les sirva . . .
Código:
Lo cuál nos daría algo como: fini = "FECHA INICIAL"
fact = Now()
segundosonline = DateDiff("s", fini, fact)
minutosonline = Int(segundosonline/60)
horasonline = Int(minutosonline/60)
minutosmod = minutosonline Mod 60
segundosmod = segundosonline Mod 60 Mod 60 Mod 60
If(minutosmod<10) Then minutosmod ="0"&minutosmod End If
If(segundosmod<10) Then segundosmod ="0"&segundosmod End If
If segundosonline < 60 Then
tiempo = segundosonline&" segundos"
ElseIf segundosonline > 60 And segundosonline < 3600 Then
tiempo = minutosmod&":"&segundosmod&" minutos"
Else
tiempo = horasonline&":"&minutosmod&":"&segundosmod&" horas"
End If 1:24:03 horas Fácil y rápido . . . Hasta la proxima ! ! ! |
|
29/12/2008, 15:30
| ||||
| ||||
| Respuesta: FAQ's del foro de ASP Valorar el trabajo de un usuario (haciendo algunos cambios podemos valorar un solo tema, video, etc..) + Campos de la tabla con los que trabajamos - Usuario --> Texto / Nombre del usuario cuyo articulo ha sido puntuado - Reconocimiento --> Numerico / Cantidad de puntos que tiene el usuario que intenta puntuar el articulo - Kien_Reconoce --> Texto / Nombre de los usuarios que han puntuado el articulo mostrartemas.asp Código HTML: <a id="<%=autonumerico_del_articulo%>" onclick="return false" href="./mostrartemas.asp">Reconocimiento</a> <script type="text/javascript"> Evento(document.getElementById('<%=autonumerico_del_articulo%>'),'click',function() { PuntarArticulo('<%=autor_articulo%>', '<%=nombre_usuario_da_puntos%>'); }) </script>
Código asp:
Ver original reconocimiento.js
Código javascript:
Ver original
__________________ Los formularios se envían/validan con un botón Submit <input type="submit" value="Enviar" style="background-color:#0B5795; font:bold 10px verdana; color:#FFF;" /> Última edición por Adler; 01/01/2009 a las 06:16 |
|
27/10/2009, 14:21
| |||
| |||
| Respuesta: FAQ's del foro de ASP Obtener Fecha Límite [sólo días hábiles] Pequeña función que sirve para cualquier objeto que tenga un máximo de días, claro . . . días hábiles . . .
Código ASP:
Ver original Sé que habrá algún método mas complejo por ahí, pero hasta ahorita no lo han compartido  . . .Nos seguimos leyendo . . . |
|
09/01/2010, 08:06
| ||||
| ||||
| Respuesta: FAQ's del foro de ASP He estado revisando y parece que este no está Saber cuantos años, meses y días hay de diferecia entre dos fechas
Código ASP:
Ver original
__________________ Los formularios se envían/validan con un botón Submit <input type="submit" value="Enviar" style="background-color:#0B5795; font:bold 10px verdana; color:#FFF;" /> |
|
25/01/2010, 11:35
| ||||
| ||||
| Respuesta: FAQ's del foro de ASP Eliminar el contenido total de una carpeta dentro del servidor
Código ASP:
Ver original |
|
18/02/2010, 07:05
| ||||
| ||||
| Respuesta: FAQ's del foro de ASP Resaltar las porciones de código que están entre etiquetas Parecido a lo que hace este foro cuando usamos los highlight
Código ASP:
Ver original Uso Cita: Código montado por [Adler] [cod e="javascript"]funcion funcion() { document.write ("hola"); }[/cod e] Las etiquetas de código pueden contener el lenguaje usado o no [cod e="php"]<?php $arr = Array(1,2,3,"a"); echo $arr[0]; ?> [/cod e] [cod e]<% Dim bienvenida bienvenida = "mundo" response.write "hola" & bienvenida %> [/cod e] También podemos hacer que no se ejecuten las entidades HTML [cod e="php"] <?php $cadena = str_replace("<", "<", $cadena); $cadena = str_replace(">", ">", $cadena); $cadena = str_replace("{", "& #123;", $cadena); $cadena = str_replace("}", "& #125;", $cadena); $cadena = str_replace("$", "& #36;", $cadena); $cadena = str_replace("%", "& #37;", $cadena); $cadena = str_replace("(", "& #40;", $cadena); $cadena = str_replace(")", "& #41;", $cadena); $cadena = str_replace("\\", "& #92;", $cadena); $cadena = str_replace("|", "& #124;", $cadena); $cadena = str_replace(":", "& #58;", $cadena); $cadena = str_replace("?", "& #63;", $cadena); $cadena = str_replace("¿", "¿", $cadena); $cadena = str_replace("!", "& #33;", $cadena); $cadena = str_replace("+", "& #43;", $cadena); $cadena = str_replace("*", "& #42;", $cadena); $cadena = str_replace(",", "& #44;", $cadena); $cadena = str_replace("-", "& #45;", $cadena); $cadena = str_replace("_", "& #95;", $cadena); $cadena = str_replace("=", "& #61;", $cadena); $cadena = str_replace("'", "& #39;", $cadena); $cadena = str_replace(".", "& #46;", $cadena); $cadena = str_replace("^", "& #94;", $cadena); $cadena = str_replace("¡","¡", $cadena); $cadena = str_replace("ñ","ñ", $cadena); $cadena = str_replace("Ñ","Ñ", $cadena); $cadena = str_replace("á","á", $cadena); $cadena = str_replace("Á","Á", $cadena); $cadena = str_replace("é","é", $cadena); $cadena = str_replace("É","É", $cadena); $cadena = str_replace("í","í", $cadena); $cadena = str_replace("Í","Í", $cadena); $cadena = str_replace("ó","ó", $cadena); $cadena = str_replace("Ó","Ó", $cadena); $cadena = str_replace("ú","ú", $cadena); $cadena = str_replace("Ú","Ú", $cadena); ?> [/cod e] Suerte
__________________ Los formularios se envían/validan con un botón Submit <input type="submit" value="Enviar" style="background-color:#0B5795; font:bold 10px verdana; color:#FFF;" /> Última edición por Adler; 06/03/2010 a las 06:32 Razón: Las etiquetas de code y algunas entidades html están separas para este foro no las ejecute |
| Etiquetas: |
Este tema le ha gustado a 28 personas (incluyéndote) 
