---------- Mensaje reenviado ----------
Asunto: Interés contratar personal experto Linux
Fecha: Martes, 18 de Mayo de 2010
De: "Francisco Javier" <javi(a)kmfvigo.com>
Para: info(a)galpon.org
Buenas tardes;
Somos una empresa residente en Vigo con necesidades de contratación de
personal experto en Linux, por favor si disponéis de perfiles de este tipo
hacérnoslos llegar ya que tenemos urgencia en su contratación. Muchas
gracias de antemano y un saludo.
Javier.
-------------------------------------------------------
--
-----------------------------------------
Carlos Rodriguez <capri99(a)gmail.com>
GALPon.org - "Abrindo as portas do Sofware Libre"
Pois xa estou cansado das practicas xd. Non me gusta nada esforzarme moito
nunha aplicación que en realidade sei que terá moitos problemas; o
derradeiro problema que teño agora é documentar o texto, expresome sempre
moi mal e para explicar este codigo estoume volvendo tolo (creo que algunhas
funcións as entendo porque as fixen eu que senon...)
¿como poderia documentar esta funcion? (non sei se alguen entende algo de
aqui :( xd)
Private Sub recreatexto()
Dim direccion As String
Dim i, j, z, s, n As Integer
direccion = txtresultado.Text
direccion = Replace(direccion, "CAMIÑO ", "CAMINO ")
direccion = Replace(direccion, "RUA ", "CALLE ")
direccion = Replace(direccion, "ESTADA ", "CARRETERA ")
direccion = Replace(direccion, "PRAZA ", "PLAZA ")
direccion = Replace(direccion, "PLAÇA ", "PLAZA ")
direccion = Replace(direccion, "CAMI ", "CAMINO ")
direccion = Replace(direccion, "CARRER ", "CALLE ")
direccion = Replace(direccion, "AVINGUDA ", "AVENIDA ")
direccion = Replace(direccion, "PASSEIG ", "PASEO ")
i = 1
Do While i
i = InStr(i, direccion, "KM")
If i = 1 Then
If Not (Asc(Mid(direccion, i + 2, 1)) > 64 And
Asc(Mid(direccion, i + 2, 1)) < 91) Then
direccion = Mid(direccion, 3)
End If
Else
If i = Len(direccion) - 2 Then
If Not (Asc(Mid(direccion, i - 1, 1)) > 64 And
Asc(Mid(direccion, i - 1, 1)) < 91) Then
direccion = Left(direccion, i - 1) & Mid(direccion, i +
2)
End If
Else
If i > 1 Then
If Not ((Asc(Mid(direccion, i - 1, 1)) > 64 And
Asc(Mid(direccion, i - 1, 1)) < 91) And (Asc(Mid(direccion, i + 2, 1)) > 64
And Asc(Mid(direccion, i + 2, 1)) < 91)) Then
direccion = Left(direccion, i - 1) & Mid(direccion,
i + 2)
End If
End If
End If
End If
Loop
i = 0
Do While i < Len(direccion)
i = i + 1
While Not (Asc(Mid(direccion, i, 1)) > 64 And Asc(Mid(direccion, i,
1)) < 91 Or Asc(Mid(direccion, i, 1)) = 199 Or Asc(Mid(direccion, i, 1)) =
209)
i = i + 1
If i >= Len(direccion) Then Exit Do
Wend
lstaux.Clear
For j = 0 To lsttiposcalle.ListCount - 1
If Mid(direccion, i, 1) = Mid(lsttiposcalle.List(j), 1, 1) Then
lstaux.AddItem lsttiposcalle.List(j)
End If
Next j
If lstaux.ListCount > 0 Then
z = i
For j = 0 To lstaux.ListCount - 1
i = z
s = 1
If i = Len(direccion) Then
Exit Do
End If
Do While Asc(Mid(direccion, i, 1)) > 64 And
Asc(Mid(direccion, i, 1)) < 91 Or Asc(Mid(direccion, i, 1)) = 199 Or
Asc(Mid(direccion, i, 1)) = 209
If i = Len(direccion) Then
Exit Do
End If
s = InStr(s, lstaux.List(j), Mid(direccion, i, 1))
If s Then
i = i + 1
Else
Exit Do
End If
Loop
If i - z = 1 Then
n = i
Do While Not (Asc(Mid(direccion, i, 1)) > 64 And
Asc(Mid(direccion, i, 1)) < 91 Or Asc(Mid(direccion, i, 1)) = 199 Or
Asc(Mid(direccion, i, 1)) = 209)
If IsNumeric(Mid(direccion, i, 1)) Or Len(direccion)
<= i + 1 Then
s = 0
Exit Do
End If
i = i + 1
Loop
i = n
End If
If s Then
formflex.sql = "select Datos from abre where Datos = '"
& Mid(direccion, z, i - z) & "'"
Set formflex.rs = Nothing
Set formflex.rs =
formflex.db.OpenRecordset(formflex.sql)
If formflex.rs.RecordCount = 0 Then
If z > 1 Then
If Not IsNumeric(Mid(direccion, z - 1, 1)) Then
If Mid(direccion, i, 1) <> " " And
Mid(direccion, i, 1) <> "'" Then
i = i + 1
End If
If z = 1 Then
direccion = lstaux.List(j) & " " &
Mid(direccion, i)
Else
direccion = Mid(direccion, 1, z - 1) &
lstaux.List(j) & " " & Mid(direccion, i)
End If
While InStr(1, direccion, " ")
direccion = Replace(direccion, " ", "
")
Wend
txtresultado.Text = direccion
End If
Else
If Mid(direccion, i, 1) <> " " Then
i = i + 1
End If
If z = 1 Then
direccion = lstaux.List(j) & " " &
Mid(direccion, i)
Else
direccion = Mid(direccion, 1, z - 1) &
lstaux.List(j) & " " & Mid(direccion, i)
End If
direccion = Replace(direccion, " ", " ")
txtresultado.Text = direccion
End If
End If
End If
Next j
End If
If i >= Len(direccion) Then Exit Do
While Asc(Mid(direccion, i, 1)) > 64 And Asc(Mid(direccion, i, 1)) <
91 Or Asc(Mid(direccion, i, 1)) = 199 Or Asc(Mid(direccion, i, 1)) = 209
i = i + 1
If i >= Len(direccion) Then Exit Do
Wend
Loop
End Sub
(o obxetivo desta función é localizar abreviaturas e sustituilas polo nome
completo)
--
----------Analogia del software libre, por Richard Stallman----------
Hay muchos puntos en común entre un programa y una receta. Con una lista de
etapas que hay que seguir y reglas que determinan en que momento se ha
terminado o como dar marcha atrás y al final se obtiene un cierto resultado.
Si a usted le gusta cocinar, sin duda intercambia sus recetas con sus
amigos, y tal vez tenga tendencia a modificarlas. Si ha modificado usted la
receta, si el resultado le gusta y a sus amigo también, existe la
posibilidad de que usted les pase la nueva versión de la receta.
Y ahora imagine un mundo en el que no podrían cambiar su receta porque
alguien ha decidido que es imposible modificarla, e imagine que si comparte
esa receta con sus amigos le tratarán de pirata y harán todo lo posible por
mandarle a la cárcel durante unos cuantos años.
efectivamente uso visual basic 6 (unha merda de liguaxe, pero é o que me
pediron xd) e é 100% pensado e feito por min.
a función colle unha cadea de caracteres dun textbox e vai analizandoo
caracter a caracter o contido xd (por iso escolin usar do while e non for),
nun listbox teño as palabras que teño que buscar (son tipos de vias ex:
calle, avenida, carretera, plaza,...); na cadea de caracteres busco palabras
a primeira letra de palabras e a partir de ahí analizo se a palabra pode ser
unha abreviatura duha das palabras que teño no listbox. Xa sei que a función
non é moi eficiente (para conseguir chegar a isto tiven que engadir e borrar
moitas lineas) pero funciona que é o importante, o principal problema é que
para chegar a ter esta solución acabei medio tolo e polo tanto documentala
vaime costar algo mais xd
--
----------Analogia del software libre, por Richard Stallman----------
Hay muchos puntos en común entre un programa y una receta. Con una lista de
etapas que hay que seguir y reglas que determinan en que momento se ha
terminado o como dar marcha atrás y al final se obtiene un cierto resultado.
Si a usted le gusta cocinar, sin duda intercambia sus recetas con sus
amigos, y tal vez tenga tendencia a modificarlas. Si ha modificado usted la
receta, si el resultado le gusta y a sus amigo también, existe la
posibilidad de que usted les pase la nueva versión de la receta.
Y ahora imagine un mundo en el que no podrían cambiar su receta porque
alguien ha decidido que es imposible modificarla, e imagine que si comparte
esa receta con sus amigos le tratarán de pirata y harán todo lo posible por
mandarle a la cárcel durante unos cuantos años.
Estimados socios y socias:
Como cada último sábado de cada mes, nos reuniremos el próximo día 29 de
Mayo para charlar y "resolver el mundo", además de tener la periódica
reunión de Junta Directiva.
El lugar, ya conocido por vosotros, es la Cafetería Medalla de Oro en la calle
López de Neira, 5 (muy cerca de la calle del Príncipe).
En esta ocasión SE NECESITA QUE TODA LA JUNTA DIRECTIVA ESTÉ PRESENTE PARA
FIRMAR ESTATUTOS o en su defecto pase por la oficina de TEGNIX a firmar la
modificación que hicimos.
El horario es el siguiente:
Reunión de socios: a partir de las 19:00h
Reunión de Junta Directiva: a partir de las 21:00h
Cena y fiesta... a partir de las 22:00h (o cuando acabe la de Junta)
Un cordial saludo,
--
-----------------------------------------
Carlos Rodriguez <capri99(a)gmail.com>
GALPon.org - "Abrindo as portas do Sofware Libre"
VoIP SIP <capri99(a)ekiga.net>
--
-----------------------------------------
Carlos Rodriguez <capri99(a)gmail.com>
GALPon.org - "Abrindo as portas do Sofware Libre"
VoIP SIP <capri99(a)ekiga.net>
Coincido co compañeiro Isaac. Todos estes movementos "pro internet" non
deixan de ser perversos no fondo. É a mesma reflexión que facía Richard
Stallman sobor do Partido Pirata. É totalmente contrario ás ideas do
software libre e o compartir.
Ademais..... QUEN VAI IR A UN EVENTO PATROCINADO POR
MICROSOFT?????????????????????????? -> http://www.diadeinternet.org
Microsoft, HP, Telefonica......polo amor de Deus!!!!
Saudiños!!
PD: Penso que o día 17 temos cousas mais importantes que facer, aiquí na
nosa terra. Compartir e defender algo tan absolutamente noso como é a
nosa língua, a nosa cultura. (Quero vervos a todos traballando na
localización de software ao Galego !!!! ). Podédelo facer a traves de
mancomún (a forxa). Ou tamén en Launchpad.
Por desgracia no tengo forma de desplazarme a Madrid xd.
¿Alguien me puede resumir quienes son los responsables del evento?,
sinceramente estoy en contra de la mayoría de los "defensores" de Internet.
Muy pocas personas son las que realmente están concienciadas en el tema de
la libertad del conocimiento (la gran mayoría son unos carroñeros que
simplemente descargan porque es gratis).
Espero que fomenten el software y música libre ya que les ofrecen lo que
piden (seria el colmo que usen windows y se escuchasen al Bisbal o a uno de
esos cantar xd); y si existe cine libre también (por desgracia aun no leí
nada sobre cine libre xd)
--
----------Analogia del software libre, por Richard Stallman----------
Hay muchos puntos en común entre un programa y una receta. Con una lista de
etapas que hay que seguir y reglas que determinan en que momento se ha
terminado o como dar marcha atrás y al final se obtiene un cierto resultado.
Si a usted le gusta cocinar, sin duda intercambia sus recetas con sus
amigos, y tal vez tenga tendencia a modificarlas. Si ha modificado usted la
receta, si el resultado le gusta y a sus amigo también, existe la
posibilidad de que usted les pase la nueva versión de la receta.
Y ahora imagine un mundo en el que no podrían cambiar su receta porque
alguien ha decidido que es imposible modificarla, e imagine que si comparte
esa receta con sus amigos le tratarán de pirata y harán todo lo posible por
mandarle a la cárcel durante unos cuantos años.
---------- Mensaje reenviado ----------
Asunto: Ven a la Fiesta de Internet, el domingo 16 en la Plaza de Chamberi
Fecha: Miércoles, 12 de Mayo de 2010
De: "diadeinternet" <boletin(a)diadeinternet.org>
Para: "Carlos Rodríguez García" <info(a)galpon.org>
Estimad@
Con motivo de la celebración del día mundial de Internet el Comité de Impulso
del diadeinternet compuesto por 42 organizaciones sociales hemos preparado una
Fiesta en la Plaza de Chamberí el domingo 16 de Mayo desde las 18:00 horas de
la tarde cuyo programa puedes consultar en: http://diadeinternet.org/fiesta
Queremos invitar a las familias y amigos de GALPON - GRUPO DE AMIGOS DE LINUX
DE PONTEVEDRA a que, si estan en Madrid, se vengan a pasar la tarde del
domingo con nosotros. A disfrutar de la música, actividades (Muro, Búsqueda
del Tesoro, Redes Sociales), sorteos, regalos (globos, camisetas) con un
montón de actividades para los más pequeños.
Si te animas te invitamos a que te construyas este gorro pirata y te lo
traigas puesto para decirle a todos que NO SOMOS PIRATAS que somos ciudadanos:
http://diadeinternet.org/fiesta/gorro_pirata.pdf
Vamos a crear un muro de los deseos en el que iremos pegando las respuestas a
estas dos cuestiones:
¿Qué es Internet para ti? ¿Qué cambiarías para hacer mejor Internet?
Las respuestas las puedes traer impresas o responderlas directamente en la
plaza, a las 600 primeras respuestas les regalaremos una camiseta.
Haremos dos sorteos de material infomático, para participar en ellos hay que
depositar tu boleto en las urnas, que habra en la plaza, y para ello debes de
imprimir previamente tu boleto desde:
http://diadeinternet.org/fiesta/registro
Os pedimos ayuda para trasladar esta convocatoria a vuestra gente a través del
correo y/o colocando un cartel de la fiesta en vuestro tablón de anuncios.
Un saludo y gracias por vuestro tiempo
Atentamente,
Oficina Técnica
17 de Mayo, día mundial de Internet, ¡¡ Vívelo !!
Nuestro regalo para tí: www.diadeinternet.org/regalo
- Información sobre la fiesta de Chamberí
http://diadeinternet.org/fiesta
- Para participar en los sorteos:
http://diadeinternet.org/fiesta/registro
- Cartel de la Fiesta
http://diadeinternet.org/pdfs/ddi2010_cartel_fiesta_chamberi.pdf
-------------------------------------------------------
--
-----------------------------------------
Carlos Rodriguez <capri99(a)gmail.com>
GALPon.org - "Abrindo as portas do Sofware Libre"
VoIP SIP <capri99(a)ekiga.net>
Creo que es más o menos conocida por todos la promoción del software
libre por parte de la Junta de Extremadura, a través de la distribución
Linex de GNU/Linux. Sin embargo, la realidad es muy distinta como
muestra el hecho de que un servicio electrónico prestado por esta
administración sólo sea accesible desde equipos con Windows. Tal es el
caso del portal IDE-Extremadura [1], desde el que se ofrece la
Infraestructura de Datos Espaciales de Extremadura. Por eso os animo a
que entréis en dicho portal y manifestéis vuestra queja (Enlace "Buzón
de sugerencias y consultas" en la parte derecha de la página). A
continuación pego un texto modelo para quien lo quiera utilizar:
Recientemente he intentado acceder al portal IDE-Extremadura
(http://www.ideextremadura.es/) desde mi ordenador personal con sistema
operativo GNU/Linux, viendo con sorpresa que dicho servicio no es
accesible con este sistema operativo, ya que requiere la instalación del
controlador MSXML6.0, un software privativo de Microsoft para uso
exclusivo en sistemas Windows.
Como conocerá, la /Ley 11/2007, de 22 de junio, de acceso electrónico de
los ciudadanos a los Servicio Públicos/, en el apartado i) de su
artículo 4, establece que "Las Administraciones Públicas usarán
estándares abiertos, así como, en su caso y de forma complementaria,
estándares que sean de uso generalizado por los ciudadanos. Más
explicito aún es el /Real Decreto 4/2010, de 8 de enero, por el que se
regula el Esquema Nacional de Interoperatibilidad en el ámbito de la
Administración Electrónica/, en el punto 1) de su artículo 11, que al
texto anterior añade lo siguiente:
b) Los documentos, servicios electrónicos y aplicaciones puestos por las
Administraciones públicas a disposición de los ciudadanos o de otras
Administraciones públicas serán, según corresponda, visualizables,
accesibles y funcionalmente operables en condiciones que permitan
satisfacer el principio de neutralidad tecnológica y eviten la
discriminación a los ciudadanos por razón de su elección tecnológica.
El uso de software privativo y la discriminación que ello supone hacia
los usuarios de sistemas abiertos como GNU/Linux por parte de la Junta
de Extremadura me parece especialmente grave, ya que desde la propia
Junta de Extremadura se promueve el uso del software libre, como es el
caso del sistema operativo Linex. Esta actitud supone una doble moral
por parte de esta Administración, ya que de cara a la galería hace
alarde de promover el software libre, pero en la práctica no facilita su
uso por parte de los ciudadanos.
Por todo lo anteriormente expuesto exijo que tanto en el portal
IDE-Extremadura como en cualquier otro servicio puesto por parte de la
Junta de Extremadura a disposición de los ciudadanos se utilicen
estándares abiertos, dando así cumplimiento a la normativa vigente.
[1] http://www.ideextremadura.es/