|
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 - UserCode
Páginas: 1 2 [3] 4 5 ... 15
51
« en: Miércoles 11 de Julio de 2007, 17:23 »
Hola! Como soy nuevo en MySQL y estoy haciendo algo con una BD de este tipo, tengo un campo de tabla que esta muy propenso a ser llenado por muchos caracteres, hasta con 200 caracteres podria quedarse algo corto y en vez de probar un VARCHAR(500) preferiria saber si hay algun campo String de MySQL que soporte o guarde mucha información en un solo campo. Es un campo de Historial Medico y a los Doctores a veces les da por ser casi unos escritores de novela en eso, de ahi todo esto. Por medio del MySQLAdministrator declaro el campo pero no despliega un listado como Access por ejemplo, me autocompleta el tipo del campo conforme lo escriba pero no me completa nada al poner memo o algun campo que sea como lo que digo.
52
« en: Miércoles 11 de Julio de 2007, 16:54 »
53
« en: Miércoles 11 de Julio de 2007, 14:45 »
Creo que eso lo hace con un control Data sea Ado o Dao, pero nunca los he usado asi ya sabes con sus botoncitos, para desplazarse entre registros 'uno a la vez', yo cuando he usado controles Data es para enlazarlo a algo y los pongo invisibles en la ventana Incluso haciendose sus propios botones de desplzamiento entre registros, yo una vez lo estaba haciendo pero desisti porque no era realmente necesario, bueno eso es este caso cierto! verlos uno por uno, en el orden que fueron ingresados, una SQL sin especificaciones de Order By. Si no es asi, sino verlos todos a la vez, pues en un grid (grilla o rejilla) y una SQL de Select * From tabla, se relacionaria entonces eso al grid con un control asi como digo.
54
« en: Miércoles 11 de Julio de 2007, 14:37 »
Viendo un codigo que no tenia mucho que ver con lo mio, extraje de internet y arme lo mio, bueno asi quedo, ya no me da error esto asi Private Sub MSHF_KeyPress(KeyAscii As Integer) If KeyAscii = 100 Then 'd If MSHF.Row > 1 Then MSHF.RemoveItem (MSHF.Row) MSHF.Refresh ElseIf MSHF.Row = 1 Then MSHF.Clear: MSHF.Rows = 1 MSHF.Col = 1: MSHF.Row = 0: MSHF.Text = "Descripción" MSHF.Col = 2: MSHF.Row = 0: MSHF.Text = "Monto" End If End If End Sub
Activo o ejecuto esto con la tecla "d" porque no logre capturar y hacerse activar el Ascii de la tecla Delete, el If Keyascii tenia el numero Ascii de la tecla Del o Supr, y por más que le daba, solo servia la validacion con las teclas de siempre del teclado para escribir, pero las que se encuentran del lado derecho del teclado como Insert, Supr, etc para la validación Keyascii era como si no hubiese pulsado nada
55
« en: Martes 10 de Julio de 2007, 23:07 »
Hola muchachada! Estoy usando un MSHFlexgrid, no es un MSFlexgrid pero igual creo que es lo mismo. La cuestión es que yo cargo una variable Recordset con una SQL que luego enlazo con este MSHF asi: Set MSFH.DataSource = RsPero los datos se cargan desde Row = 0 quitando los titulos de la grilla/rejilla Si Edito la información del MSHF no toma el primero (1era fila) por ser Row 0 ¿Cómo podría mostrar la información sin que esta comience desde Row 0? Trate colocando Filas y Columnas antes pero parece que el Set MSHF.DataSource=Rs borra u omite esto y se posiciona la información nuevamente asi como indico. Sugerencias, quejas y amenazas de muerte por aqui Rumbo al final de la Copa
56
« en: Martes 10 de Julio de 2007, 23:00 »
Bueno la diferencia entre dos fechas se puede calcular con DateDiff asi: txtResultado.Text = DateDiff("d", Text1.Text, Text2.Text) Asi como DateDiff, VB tiene tambien a DateAdd, y otro que no me acuerdo ahorita, asi con "d" determina la diferencia entre dos fechas en dias. Yo aconsejaria no usar unos TextBox, sino mejor unos controles DTPicker Componentes -> Microsoft Windows Common Controls-2.6.0 Asi en vez de escribir las dos fechas, despliege mejor un calendario e indique a puro click el dia, mejor que escribirlo Label1.Caption = DateDiff("d", DTPicker1.Value, DTPicker2.Value)
57
« en: Jueves 5 de Julio de 2007, 15:53 »
Definitivamente tengo que bajarme un manual de SQLs
58
« en: Miércoles 4 de Julio de 2007, 22:58 »
perdon por eso de hubieron, hubo es correcto eso de entradas para ambos juegos es lo que le da el sentido a lo comentado de entre juego y juego, como no he ido a ninguno porque ya no hay entradas o es muy dificil de conseguir, no conocia de que era de esa forma. Sin problemas sobre Deber y Sentir para mi van al mismo origen o destino y no voy a discutir por eso, cualquier cosa, por mensajes privados del foro en caso de diferencia de opiniones. Venezuela no creo que gane la copa, pero es un orgullo verla en cuartos de final y organizando un torneo de estas caracteristicas, contando con el apoyo de todos los venezolanos. Lastima por el problema de las entradas y por el retrazo de cnstrucción de los estadios.
Por lo que me contaron de un Partido entre Brasil y Venezuela, practicamente la gente llegó a apoyar más a Brasil que al propio equipo, pero en esta ocasión, la gente si apoya más al equipo, les falta mucho camino por andar. Esperemos que en el futuro se les pueda ver en un Mundial llegando hasta más no poder como muchos equipos de mayor trayectoria futbolistica.
59
« en: Miércoles 4 de Julio de 2007, 18:19 »
Hola iratxe Set rs1 = DB.OpenRecordset("SELECT distinct Subtema from fotos WHERE Tema like '%elementoSeleccionado%'", dbOpenDynaset)
oye, ese campo distinct Subtema son dos campos y te faltó la coma? o es un mismo campo, porque de ser un mismo campo pues creo que debes de ponerlo entre comillas simples 'distinct Subtema' o haberlo creado asi distinct_Subtema, la tabla se llama Fotos asi que no es tabla.campo Yo he hecho cosas asi pero no he usado el Like, sino que por ejemplo en la TablaPadre (TB1) tengo los campos donde el ID es (PK) PrimaryKey, correcto, entonces en la TablaHija (TB2) la que contiene los SubItems o SubTemas el ID no es (PK). Entonces tu tomas el Tema (el registro) que buscas con tu primera SQL, y para cargar (supongo en otro comboSubTemas o en un Grid MSFlexGrid, DataGrid, DBGrid) los Subtemas de la otra tabla, pues indicarias en la SQL de la Tabla de SubTemas una SQL donde indiques que se traiga todos los registros de TB2 mientras el ID sea igual al ID de TB1. Al traerte el Tema puedes ahí ya tendrias el ID de la TablaTemas, la pones un TextBox, en una variable o usas el RsTemas("codigo") para compararlo con la SQL de SubTemas Ejemplo1: Select Campo1, Campo2 From SubTemas Where codigo=" & txtcodigoTema.text & "" Ejemplo2: dim cod as integer cod=RsTema("codigo") Select Campo1, Campo2 From SubTemas Where codigo=" & cod & "" O directamente Select Campo1, Campo2 From SubTemas Where codigo=" & RsTema("codigo") & "" Yo por ejemplo tengo una tabla que tiene Items, y otra que tiene los SubItems pero no todos los Item tienen SubItem, solo algunos Entonces cuando en un Combo selecciono un Item, en otro Combo al lado, se muestran sus SubItem "solo si este tiene" sino, el 2do Combo no despliega nada. En esta imagen, se muestran dos tablas, la de la Izquierda es la tabla Padre, la de los Item, y la tabla de la Derecha es la tabla Hija, la de los SubItem, ahí se ve que solo algunos Item tienen SubItem. por ejemplo el Item Embarazo tiene varios SubItem, puesto que comparten el mismo código. Asi en la SQL de Items me traigo el registro y luego en otra SQL indico traerme todos los registros que tengan el mismo codigo. Asi muestro en un Combo los Item y en otro combo los SubItem del mismo, nunca se trae los de otro puesto que cod1=cod2 deben ser iguales para traerse todos los registros. mas o menos asi es lo tuyo verdad!
60
« en: Miércoles 4 de Julio de 2007, 00:09 »
Hmmmm... como que hay una Funcion de Access que casualmente se llama igual que la tabla En todo caso, donde indicas FROM Tabla indicala bajo un Alias: FROM Tabla As TB1 asi en vez de indicar Tabla.Campo seria TB1.Campo, ponle un alias de Info y trabajas con Info.Campo o Inf.Campo o FROM Information As Informacion para ver si ya no sale eso que dices, no sabia que eso pasaba en Access
61
« en: Miércoles 4 de Julio de 2007, 00:02 »
Sip, esta muy bien lo copiare para llegada la ocasion En mi caso porcentaje ese dato no es fijo como 0.15 no es iva, como se toma de un combobox, el codigo ignoraba el 0. yo tambien calculaba asi y ni me acordaba de las otras maneras de hacerlo que es como si le sirve en estos casos a los programas.
62
« en: Martes 3 de Julio de 2007, 23:57 »
sip mysqldump ya habia escuchado algo asi cierto, esto no es copy+paste bien presente que lo tengo, toy preguntando temprano esto pero aun no me toca hacerlo, pero queria saberlo anticipadamente y cuando me frente a esto, en caso probable, tal vez vuelva a pasar por aqui para reportar el delico en cuestion, tamos en contacto
63
« en: Martes 3 de Julio de 2007, 01:05 »
gracias compa, de verdad que recordando cosas de estadistica como que muy tontamente me fui por otro camino para este calculo tan sencillo.
64
« en: Lunes 2 de Julio de 2007, 22:11 »
bueno usercode... mira esto: QUOTE #Path to the database root datadir="C:/Archivos de programa/MySQL/MySQL Server 5.0/Data/"
este fragmento lo saque del archivo my.ini de mi motor mysql server y al parecer se le puede especificar una ruta diferente para q busque las bases de datos cada ves q arranque en otra parte... pero ojo, segun me doy cuenta, todas las bases de datos deben estar dentro de esta misma ruta y no unas x un lado y las demas x otro.
Hmmmm.... ya veo bueno intente llamar a alguien (haber si por fin atiende) cosa que si se dio, alguien que trabaja con MySQL y por todo el meollo del asunto y todo lo enredado que se dio la hablada, como que en el MySQL Administrator (que se baja de la web MySQL tambien) tiene algo para hacer los backup o otra cosa que es lo que serviria para mover la BD. Pero no moverla a la carpeta que uno indica, no, sino como siempre a C:/Archivos de programa/MySQL/MySQL Server 5.0/Data/ Pero del PC donde se instalara el programa, pero como que me sale otra llamada a terminar de entender eso para cuando me toque llevar la BD a su destino (otra pc). gracias por ese tip de ayuda
65
« en: Lunes 2 de Julio de 2007, 21:02 »
Hola por estos lares del foro Escribo esto por una duda sobre Bds MySQL, tengo un programa que esta conectado a una BD MySQL y esta Bd está en: C:\Archivos de programa\MySQL\MySQL Server 5.0\data\ En esa carpeta data estan todas las Bd, trate de ver, cortando la carpeta de mi Bd y pasandola a la carpeta del propio programa, pero al conexion no se dá, entonces he aquí donde pregunto. Al momento de distribuir el programa, bajar de su web el MySQL, bajar el ODBC, debo tomar mi Bd y ponerla en esa ruta? ¿no hay manera de que la Bd pueda estar en una subcarpeta dentro de la carpeta raiz del programa? Cuando cree la conexión por ODBC a mi Bd, solo me pide Server (IP o hostname), Login, Password, puerto, pero nada de Path de la Bd, puesto que el ODBC la busca solo, pero por lo que he probado, como que debe estar a juro en esa ruta que indico y no es posible moverla, sé que se ve que me contesto la pregunta, pero deseo que por favor me confirme alguien esto, y así saber siempre donde va y donde no puede ir una BD MySQL que se conecte a nuestro programa. Saludos
66
« en: Lunes 2 de Julio de 2007, 20:25 »
gracias tocayo PD: hoy juega en mi ciudad Argentina vs Colombia, y es más de saberse que ganara Argentina, o al menos esas son las probabilidades
67
« en: Lunes 2 de Julio de 2007, 20:07 »
Sé que es uan pregunta algo tonta, pero no pude conseguir ni aqui ni siquiera en otras webs algo tan simple como calcular Porcentaje en VB, sé que el Format se le indica con algo de Percent que lo que hace al parecer es multiplicar por 100 el dato colocando al final un simbolo de %, realmente no sé como es que se determinaria el procentaje asi.
Creo que de forma estadistica el monto se multiplicaria asi Sacar el 50% a un monto ==> monto*0.5 Sacar el 5% a un monto ==> monto*0.05 Sacar el 30% a un monto ==> monto*0.30
Cómo podría determinarse el calculo de un dato numerico en base a un porcentaje de descuento. Tengo un pequeño combobox que despliega unos valores 10, 15, 20, 30 y trataba de ver si algo como Desc = "0." & cmbDescuento.Text pero me el codigo no agarra el "0." lo desprecia u omite. Trate con Format(cmbDescuento.Text, Percent) pero tampoco, si indico 30, ese mismo valor es el que se sale, por lo que siempre, en vez de calcularse, monto*0.30 lo hace con monto*30
68
« en: Lunes 2 de Julio de 2007, 13:30 »
Si es exactamente eso, voy a guiarme por el adjunto para lograr eso en mi enredo de item padre y subitem de multiple selección para el mismo. thx man
69
« en: Lunes 2 de Julio de 2007, 02:54 »
Hola Bueno, yo preferi no hacer uso del control data Ado porque le indicaste una ruta fija, preferi usar una variable que hace lo mismo el control y App.Path para la ruta de la Bd Access para traer la ruta automaticamente siempre y cuando el programa y la Bd estén dentro de la misma carpeta del programa o carpeta raiz. No sé que tan especifica es el tipo de busqueda que debas hacer, porque si en el Text de busqueda indicas la cedula de un estudiante eso te traeria un solo registro, y si deseas una consulta en el datagrid de varios registros de X fecha o codigo de materia, eso ya te traeria varios registros. Ha! si se me olvidaba, no hay boton, esta para buscar por Alumno_Id, escribes alguno, y pulsando Enter se traeria lo buscado.
70
« en: Domingo 1 de Julio de 2007, 18:18 »
Hola Me gustaria la opinion de quien desee compartir su idea sobre como podria ser la mejor manera de manejar un problema de seleccionar un Item y varios SubItem para la descripcion del detalle de Factura. Yo tengo inicialmente hecho algo como esto, con lo que he empezado a probar: Realmente yo estaba viendo la posibilidad de que al seleccionar un Item del 1er Combobox (Descripcion) y luego varios del 2do Combobox (Subdescripcion) esos datos se colocasen de una vez en el MSFlexGrid que está al final, el ultimo. Es decir: CESAREA SEGMENTARIA, CIRUJANO PRINCIPAL, 2DO CIRUJANO Pero lo que sucede es asi: CESAREA SEGMENTARIA, CIRUJANO PRINCIPAL CESAREA SEGMENTARIA, 2DO CIRUJANO Debido a que el codigo vuelve a tomar el dato del 1erCombo y si agrego un tercer SubItem estaria asi: CESAREA SEGMENTARIA, CIRUJANO PRINCIPAL CESAREA SEGMENTARIA, 2DO CIRUJANO CESAREA SEGMENTARIA, CITOLOGIA Y no asi: CESAREA SEGMENTARIA, CIRUJANO PRINCIPAL, 2DO CIRUJANO, CITOLOGIA En una misma Fila del MSFlexGrid. Preferí colocar entonces un MSFlexGrid para el Item principal, y otro MSFlexGrid para los SubItem, lo cual es lo que se ve en la ventana. Pero no tan distinto al problema anterior, no he visto bien como pasar luego, todos estas Filas del MSF1 y el MSF2 al 3er MSFlexGrid que quede asi: CESAREA SEGMENTARIA, CIRUJANO PRINCIPAL, 2D CIRUJANO Concatenar los Row de cada MSF es el problema inicial. Cual seria la mejor forma de poderse trabajar esto, sea con mas de uno, o un solo MSFlexGrid, todo este problema es debido a la seleccion multiple de Item, principalmente de SubItems (1 Item + varios SubItems). PD: Habia visto con un ListBox pero al seleccionar un Item y deseleccionarlo, pues no sabria bien como recoger las varias selecciones de la lista, y este problema lo tengo igual en otra ventana con una lista de Diagnosticos y Subdiagnosticos.
71
« en: Domingo 1 de Julio de 2007, 16:44 »
hola El DataGrid se trae registros por una SQL sea por variable recordset o por un control Data ADO, lo importante es la SQL que podrias usar algo como: "Select * From Tabla Where campo='" & Text1.Text & "' Order by Campo" Esa SQL podrias llamarla/ejecutarla al indicar el campo en el Text y pulsar Enter En el vento keypress del Text seria algo como: If KeyAscii=13 Then 'Tecla Enter 'Aqui el codigo, procedimiento o funcion de la SQL End if Asi escribes en el Textbox el dato, se pulsa Enter y deberia del DataGrid actualizar su vista con la nueva SQL. El DataGrid se actualizaria con la nueva SQL trayendose solo el registro indicado, o varios registros en caso de que el campo se cumpla en mas de un registro Lo que si no recuerdo es si era LIKE %campo% o algo asi en la SQL para traerse todos los registros que empiecen por una letra o que en un campo string se busque todo lo que tenga X cadena Por ejemplo, yo tengo una ventanita con un DataGrid que muestra un listado de Personas que esperan consulta medica, en la tabla de la Bd se conservan todos los registros, pero en el DataGrid solo se muestran los ingresos de la fecha actual Private Sub Lista_Pacientes_Cita() 'DataGrid1: strSQL4 = "Select cedula As Cedula, nombre As Nombre, turno_num As Turno From turno_consulta " strSQL4 = strSQL4 & "Where fecha='" & Format(Date, "yyyy-mm-dd") & "' " strSQL4 = strSQL4 & "And estado<>1 Order By turno_num" Set rsTurnoConsulta = New Recordset rsTurnoConsulta.Open strSQL4, cnConexdb, adOpenStatic, adLockOptimistic Set DataGrid1.DataSource = rsTurnoConsulta DataGrid1.Columns(0).Width = 1000 DataGrid1.Columns(1).Width = 5100 DataGrid1.Columns(2).Width = 1000 End Sub
72
« en: Sábado 30 de Junio de 2007, 15:15 »
73
« en: Sábado 30 de Junio de 2007, 14:24 »
no, no es mi chica ojala lo fuese porque asi podria invitarla a jugar ajedrez por ejemplo jijijijiji...
74
« en: Sábado 30 de Junio de 2007, 02:07 »
uhmm.. me dio error al pulsar votar, bueno no importa, yo le voy a Argentina, porque los buenos de Brasil no viniero, estan en europa, y digo "no vinieron" porque la copa es aqui en mi país, Venezuela, y ya hubieron varios juegos en mi ciudad y la final tambien sera en mi ciudad, lastima que no podre asistir a ninguno, las entradas agotadas y hasta reclamos por personas que pagaron sus entradas por internet y otras vias y no recibieron sus voletos que debian llegarles a su hogares, aun asi, el cobro y envio de las mismas si les fue cargada a su cuenta hehehe, y no me atrevo ni a pasar por la empresa de envio a la que le he hecho programitas porque precisamente los problemas de los boletos que no han sido entregados es con ellos, y seguro que hay gente que los han amenazado tal vez hasta con quemarles la sucursal hehehe. Lo que me sorprende es que un juego es a las 6:30pm y otro a las 8:45pm, cómo le hacen para sacar a toda esa gente del Estadio a 15 minutos que es el tiempo entre un partido y otro. No vivo tan lejos del Estadio y cada vez que meten Gol lo sé porque se escuchan los fuegos artificiales Otra cosa buena de los juegos es que a mucha gente le dal el dia libre para no estar conjestionadas las avenidas que van al Estadio y la gente se pueda trasladar sin problemas al lugar Esas entradas se vendieron hasta como un mes antes de todo esto, y costosas, algo curioso es que habian estadios que casi no iban a estar listos, Estadios nuevos, y a los trabajadores que trabajaron dia y noche para que esos Estadios estuviesen listos, le regalaron entradas y muchos lo que hicieron con esas entradas fue revenderlas en la calle al triple de su precio Todo esto me recuerda el caso de un Sr que compro 4 entradas VIP 15 días antes del partido y no le llegaron. PD: bueno le voy al equipo de mi país tambien, hay que apoyarlos, es mi deber
75
« en: Sábado 30 de Junio de 2007, 01:44 »
uhmmm... Cool man ahora solo hay que esperar a que el moderador mueva el post a donde debe ir y listo
Páginas: 1 2 [3] 4 5 ... 15
|
|
|