|
|
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - KidD
Páginas: [1]
1
« en: Viernes 7 de Mayo de 2004, 03:49 »
que tal muchachos queria saber si existe algnua forma de verificar la existencia de una tabla con ADO porque encontre un ejemplo de como hacerlo con DAO pero no se como se usa DAO y no tengo idea de como isntalarlo ni se si lo tengo ni nada  o sea necesito saber si una tabla existe porque si no existe la tengo que crear, y tmb si se recorrer de alguna forma las tablas o sea por ejemplo basededats[1].nombnre y que me tire el nombre de esa tabla Gracias por todo. SAludos.Pablo
2
« en: Viernes 30 de Abril de 2004, 03:53 »
Muchas gracias, igualemten ya me habia dado cuetna lo que pasa que no habi postaeado la solucion porque no tuve tiempo. mi problme era en ese momento era como pasr de registro y lo solucione con el seek lo que pasa es que tengo un quiombo de funciones y lenguajes en la cabeza y bu e pascal no lo tocaba hacia tres años se me mezclaron un poco las ideas hasta que me acorde eso que dijiste que existian los archivos text Gracias de todos modos Saludo. pablo
3
« en: Miércoles 28 de Abril de 2004, 14:31 »
si no sabes nada de asp y queres hacer un proyecto te recomendaria que empieces con php y mysql (porqu es gratis), ya quev as a aprender algo, aprende lo que corresponde en asp si queres gestionar sesiones de usuario deberias saber usar - una base de datos : acces, oracle, MS SQL - Lenguage de consultas a la base de datos : SQL - usar objetos de tipo recordset : en ASP - e investigar sobre el fichero glbal.asa que es donde se cargan todos losd atos de la aplicacion y las sesiones SAludos Pablo.
4
« en: Martes 27 de Abril de 2004, 13:14 »
Bueno la idea es hacer una estadisticias sobre que páginas son mas visitaas en el sitio. dentro de las que nos interesan que son de productos etc. el tema que esas paginas son muchas distintas en formato html y no me da para ir cmabiando cada una de ellas para que valla sumando en algun contador me interesaria saber si exite algun evento que pueda hacer general para cualquier usuario en el cual cada vez que entre en alguna pagina detro de x directorio pueda hacer lo que necesito. se entiende mas o menos?... El problema es que no se bien como encararlo quizas si me tiran una punta puedo empezar a investigar por ese lado. o sea basicamente "estoy en bolas"  Gracias a todos. Pablo
5
« en: Domingo 25 de Abril de 2004, 00:22 »
el tema del read lo arregle me habia olvidado de poner reset(db_socios);
pero el tema del writeln, no lo logre sacar
6
« en: Domingo 25 de Abril de 2004, 00:12 »
Bueno mi problema es que me tira: error 100: Disk read Error en la linea read(db_socios,socio); que está casi al final. y otra cosa, como hago para que me guarde los registros en forma de renglones? porque haciendo wirteln(db_socios,socio) me tira "invalid filetype" Gracias por todo y espero que me puedan ayudar Saludos Pablo program prueba; uses crt,strings,dos; type socios = record id_socio : word; nombre : string[50]; apellido : string[50]; direccion : string [50]; telefono : string [14]; pedidos : word; estado : boolean; end; type libros = record id_libro : word; nombre : string[80]; autor_nom : string[50]; autor_ape : string[50]; peticiones : word; catidad : byte; disponibles : byte; end; type prestamos = record id_prestamo : word; id_libro : word; id_socio : word; fecha_ret : datetime; fecha_dev : datetime; end; var db_socios : file of socios; socio,socio2 : socios; begin clrscr; assign(db_socios,'c:\db_socios.txt'); rewrite(db_socios); socio.id_socio := 1; socio.nombre := 'Pedro'; socio.apellido := 'Caracciolo'; socio.direccion := 'Amenabar 881'; socio.telefono := '(011) 4784-0236'; socio.pedidos := 100; socio.estado := FALSE; write(db_socios,socio); writeln; socio.id_socio := 2; socio.nombre := 'PePona'; socio.apellido := 'Caracciolo'; socio.direccion := 'Amenabar 881'; socio.telefono := '(011) 4784-0236'; socio.pedidos := 100; socio.estado := FALSE; write(db_socios,socio); {writeln(db_socios,socio);} read(db_socios,socio2); writeln(socio2.id_socio); writeln(socio2.nombre); writeln(socio2.apellido); writeln(socio2.direccion); writeln(socio2.telefono); writeln(socio2.pedidos); writeln(socio2.estado); close(db_socios); end.
7
« en: Miércoles 21 de Abril de 2004, 02:07 »
Que tal ?, bueno mi intriga es saber cual es la mejor forma de hacer un sistema de altas bajas y modificiaciones. lo mejr que yo conozco para Turbo Pascal 5.5 es archivos RAndom, Pero bue qzuias haya cosas mejores, aunque dudo que se pueda usar SQL y cualqueir base de datos SQL server o ACces (seria un seño hecho realidad ) Saludos y gracias a todos
8
« en: Sábado 17 de Abril de 2004, 01:19 »
si me pasaras la funcion que decis, veo que puedo hacr. porque toy con fiaca y no me dan ganas de ponerme a crear una funcion dese cero para ver si funciona .
el tema es que no se para que quieres generar varios radio
seria bueno que me epliques un poco el objetvio etc..
Saludos
`pablo
9
« en: Viernes 16 de Abril de 2004, 00:29 »
Bueno creo haber encontrado la respuesta a mi pregunta si no me equivoco el evento onsubmit es del objeto form no de los botones... bueno espero que esto le pued servir a alguien ademas de a mi (o sere el unico tarado que comete este tipo de error?) para mas info http://msdn.microsoft.com/library/default....ts/onsubmit.asp
10
« en: Viernes 16 de Abril de 2004, 00:20 »
Yo no tengo probelma en ayduarte si es que puedo. no reo saber muucho pero pregutname de ultima.. me generaras una duda a mi tmb
11
« en: Viernes 16 de Abril de 2004, 00:05 »
Bueno cree un funcion en javascript que valida que no haya induts vacios y que devuelva una boolean alguien me peude explicar porque no funcina esto uso un input del tipo sumbit onsubmit ="return ValidaForm(this);" onclick ="return ValidaForm(this);" yo vi ejemplos en la web que usan el onsubmit y niguno con onclick pero a mi me funciona el onclick y no el onsumit es como que en el onsubmit se saltea todo el script y va directamente al action del form seguramente es porue toy haciendo algo mal algun fallo de conceptos etc. GRacias a todos y saludos
12
« en: Jueves 13 de Noviembre de 2003, 01:53 »
Buen ya me explico un amigo como se hace esto lo ue tenia que hacer es ir a la carpeta donde se ecneuntra la abse de datos. herramientas>opciones de carp ver>y destildar la opcion de utilizar uso compartido simple de archivos (WinXP).
Luego ir a las propiedades de la base de datos y en la solpa de seguridad poner los permisos de ejecucion escritura y modificacion o los que se necesiten al usuario que sea necesario.
Saludos y espero que les sea util. Hoy he aprendido una csa nueva:P
13
« en: Miércoles 12 de Noviembre de 2003, 21:04 »
Mensaje original de KidD
Mi probelma es que me tira error cuando quiero ejecutar la sentencia SQL en la pagina de borrar
Me tira este error
Tipo de error:
Microsoft JET Database Engine (0x80004005)
No se pudo eliminar nada en las tablas especificadas.
/borrar.asp, línea 20
Lei por ahi que podia ser algo de permisos de escritura pero busque cambie varios permisos(quizas hice alguna cagada)
y sigue sin funcionar
ALguien me peude ayudar?
Esta es la pagina que lista
<% @Language=VBScript%> <% Option Explicit %> <% Dim ObjConn Dim ObjRS Dim SQL %> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> <meta name="GENERATOR" content="Microsoft FrontPage 4.0"> <meta name="ProgId" content="FrontPage.Editor.Document"> <title>Pagina nueva 1</title> </head> <body> <% SQL = "SELECT * FROM prueba" Set ObjConn = Server.CreateObject("ADODB.Connection") Set ObjRS = Server.CreateObject("ADODB.RecordSet") ObjConn.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" + Server.MapPath("prueba.mdb")) ObjRS.Open SQL, ObjConn, 3, 3%> <form method="POST" action="borrar.asp"> <table border="1" cellpadding="0" cellspacing="0" width="100%" bordercolor="#464646" style="font-family: Verdana; font-size: 8 pt"> <TR> <td width="6%" bgcolor="#CCCCCC" style="font-weight: bold" align="center"> </TD> <td width="3%" bgcolor="#CCCCCC" style="font-weight: bold" align="center">ID</TD> <td width="11%" bgcolor="#CCCCCC" style="font-weight: bold" align="center">Nombre</TD> <td width="11%" bgcolor="#CCCCCC" style="font-weight: bold" align="center">Apellido</TD> <td width="11%" bgcolor="#CCCCCC" style="font-weight: bold" align="center">DNI</TD> <td width="11%" bgcolor="#CCCCCC" style="font-weight: bold" align="center">E-Mail</TD> <td width="11%" bgcolor="#CCCCCC" style="font-weight: bold" align="center">Usuario</TD> <td width="11%" bgcolor="#CCCCCC" style="font-weight: bold" align="center">Contraseña</TD> </TR> <%Do While NOT ObjRS.EOF%> <TR> <td width="69%" bgcolor="#EEEEEE" colspan="8"></TD> </TR> <TR> <TD width="6%" bgcolor="#EEEEEE" align="center"> <p><input type="checkbox" name="<%=ObjRS("id")%>" value="ON"></p> </TD> <td width="3%" bgcolor="#EEEEEE" style="font-weight: bold" align="center"><%=ObjRS("id")%></TD> <td width="10%" bgcolor="#EEEEEE" align="center"><%=ObjRS("nombre")%></TD> <td width="10%" bgcolor="#EEEEEE" align="center"><%=ObjRS("apellido")%></TD> <td width="10%" bgcolor="#EEEEEE" align="center"><%=ObjRS("dni")%></TD> <td width="10%" bgcolor="#EEEEEE" align="center"><%=ObjRS("email")%></TD> <td width="10%" bgcolor="#EEEEEE" align="center"><%=ObjRS("usuario")%></TD> <td width="10%" bgcolor="#EEEEEE" align="center"><%=ObjRS("contraseña")%></TD> </TR> <%ObjRS.MoveNext%> <% Loop ObjRS.Close ObjConn.Close Set ObjRS = Nothing Set ObjConn = Nothing %> <TR> <td width="69%" bgcolor="#EEEEEE" colspan="8"></TD> </TR> <TR> <td width="69%" bgcolor="#EEEEEE" colspan="8" align="center"><input type="submit" value="Borrar"></TD> </td> </TR> </TB> </table> </form> </body>
Este es la pagina que borra
<%@ Language = VBScript%> <%OPTION EXPLICIT%> <% Dim ObjConn Dim ObjRS Dim SQLSentence Dim elementos SQLSentence = "DELETE * FROM prueba WHERE " SET ObjConn = Server.CreateObject("ADODB.Connection") SET ObjRS = Server.CreateObject("ADODB.RecordSet") ObjConn.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" + Server.MapPath("prueba.mdb")) for elementos = 1 to Request.Form.Count if Request.Form(elementos) = "ON" then SQLSentence = SQLSentence & "id=" & elementos & " OR " end if next SQLSentence = left(SQLSentence,Len(SQLsentence)-3) ObjConn.Execute SQLSentence Response.Redirect ("lista.asp") %>
Muchas gracias. KidD </b> el campo id en la base de datos (acces) es autonumérico
14
« en: Sábado 8 de Noviembre de 2003, 01:02 »
No se se me ocurrio ir tipo, no se, 50 personas que queira un libro bajado de inet y vamos a una mini imprenta e imprimimos
quizas no sale mas barato, quizas estoy diciendo cualquiera no se:D
a alguien le interesarìa?
o es un simple suño que nunca voy a cumpli (el de pder leer comdamente en mi cama)
15
« en: Lunes 27 de Octubre de 2003, 00:56 »
Estoy en windows asiq eu no pueod usar lo de fork. per por ootro lado me dijeron algo de API.. (¿?que es esto:P)
16
« en: Viernes 24 de Octubre de 2003, 18:27 »
Nadie tiene ni siquiera un idea de como puedo buscar? porque bucsque con multitask +C++ y esas cosas y no encontre nada:(
17
« en: Jueves 23 de Octubre de 2003, 18:52 »
una forma mas facil que andar despejando es hacerlo pr el metodo de gauss o triangulacion mirate esta pagina http://www.educa.rcanaria.es/matematica ... index.html y fijate bien como saca la inversa triangulando la matriz en realidad es como dijo HurryCrack pero con este tema te va as er mas facil que andar despejando variables
18
« en: Jueves 23 de Octubre de 2003, 18:35 »
Para ver si una recta es paralela a otra lo unico que tenes que hacer es ver si sus direcciones son paralelas. Esto se comprueba por ejemplo viendo si una es multiplo de la otra
suponiendo que partimos de dos rectas que salen del eje de cordenadas (0,0) tenes la recta (1,4) y la recta (3.4) como veras la segunda no son multiplos por lo tanto no son paralelas.. veamos la demostracion
si son paralelas deberia cumplirse (1,4) se podria escribir de la siguiente forma: (1,4) = x(3,4)
1= 3X -> X = 1/3
4 = 4X - > X = 1
por lo tanto no son multiplos ya que se encesitan dos x distintas.
Lo que podrias hacer vos teniendo la recta (x,y)(x2,y2) seria llevarlas al origen (restar los puntos) (x2,y2)-(x,y)
(x2-x, y2-y) y luego hacer lo que dije ante para ver si son paralelas.
Espero que te sirva.. cualquier duda.. avisame o consulta un libro de algebra I:D
pero re leyendo u mensaje me di cuenta que lo unicoq ue tenes que ahcer es si tenes la recta (x,y)(x2,y2) para crear una recta paralela es sumarle un numero a las x y uno a las y:(es decir hacer un line dos veces con las cordenadas + un numero que es igual a la istancia que quere qque este separada la flehca
me re contra complique al pedo:D
19
« en: Jueves 23 de Octubre de 2003, 17:46 »
Bueno queria decir que Soy nuevo en este Foro ya hace varios dias que entro pero nucna habia posteado hasta ahora una cosa de c http://foros.solocodigo.com/viewthread.php?tid=5463Bueno ahora queria reportar un bug va mas que bug una sugerencia la priemra vez que quice hacer el post de recien el de c. me habia confundid el password entonces quice aprentar en el boton volver del explorer y resulta que no me llevo al mensaje que estab aescribiendo sino al foro de c. (o sea se salteo la pgina de mi mensaje que habi estado escribiendo) quizas esto se solucione ahciendo un update del DevBB. Saludos y epero que est foro crezca y se convierta en algo bueno para todos..(ahora empiezo a hacer propaganda). Saludos a todos y Denme una buena bienevenida:P
20
« en: Jueves 23 de Octubre de 2003, 17:40 »
Mi intencion es hacer un scanner de puertos que scanee por ejemplo un rangode IPs y que vaya scanenado de mmm lo que el usuario decida no se, 100 ips por vez..
o sea yo le pongo from IP to IP que scanee el puerto X y que vaya probando de por ej 100 IPs a la vez.. pense en recursividad. pero la recursividad hace de a una funcion por vez o sea una vez que llegue a la clausula de finalizacion va a ir cerrando las funciones de a una es lo mismo que hacerlo de forma iterativa. asi que no se espero que algun alma caritativa me ayude en mi duda..
GRacias a todos y Saludos
KidD
Esto vendira a ser como un reto porque vi que la mayoria de los scanners de puertos o scanners de seguridad hacen eso y nunca se me ocurrio una forma de hacerlo
Páginas: [1]
|
|
|
Mostrar Mensajes
