semana 21 (por cami)

lunes 8 de septiembre 2008

Noticia 1: Large Helical Device

El Large Helical Device es un dispositivo que se está construyendo en Japón, básicamente diseñado para hacer pruebas relacionas con el plasma de fusión. El LHD es capaz de confinar el plasma para poder realizar experimentos y conocer a fondo como se comporta cuando se encuentra en un estado estacionario.



para mas información

Noticia 2:Microsoft copiará la estrategia “Genios de Apple”

De acuerdo al gerente general de comunicaciones corporativas de Microsoft, Tom Pilla, la compañía, la campaña de marketing de Microsoft de 300 millones de dólares ahora implicará tener representantes en las tiendas para promover la marca. Efectivamente imitando a "los genios de Apple", así como a su planta de especialistas, Microsoft llevará a cabo una prueba a finales de este año en que 155





para mas información



Noticia 3: La NASA elige tecnología Hitachi

En respuesta a la necesidad de mayor escalabilidad y acceso a datos archivados, Hitachi Data Systems Corporation, único proveedor de Soluciones de Almacenamiento Orientadas a los Servicios, anunció que los investigadores de la NASA (National Aeronautics and Space Administration) utilizan la Content Archive Platform para buscar y recuperar con mayor rapidez, datos científicos archivados relacionados con la atmósfera.

para mas información

visual basic 2 (por cami)

Private Sub canalmas_Click()
If tvcatv.Caption = "tv" Then
If nrocanal.Caption < 13 Then
nrocanal.Caption = nrocanal.Caption + 1
Else
nrocanal.Caption = 0
nrocanal.Caption = nrocanal.Caption + 1
End If
Else
nrocanal.Caption = 0
End If
End Sub

Private Sub CATVTV_Click()
If tvcatv.Caption = "TV" Then
tvcatv.Caption = "CATV"
Else
tvcatv.Caption = "TV"
End If
End Sub

Private Sub cero_Click()
nrocanal.Caption = "0"
End Sub

Private Sub cinco_Click()
Auxiliar.Caption = Auxiliar.Caption + "5"
End Sub

Private Sub cuatro_Click()
Auxiliar.Caption = Auxiliar.Caption + "4"
End Sub

Private Sub dos_Click()
Auxiliar.Caption = Auxiliar.Caption + "2"
End Sub

Private Sub enter_Click()
If Auxiliar.Caption < 129 Then
nrocanal.Caption = Auxiliar.Caption
Auxiliar.Caption = ""
Else
Auxiliar.Caption = ""
End If
End Sub

Private Sub mas_Click(Index As Integer)
pantalla.Left = pantalla.Left + 100
nrocanal.Left = nrocanal.Left + 100
onoff.Left = onoff.Left + 100
tvcatv.Left = tvcatv.Left + 100
pantalla2.Left = pantalla2.Left + 100
Auxiliar.Left = Auxiliar.Left + 100
End Sub

Private Sub masbrillo_Click()
pantalla.Top = pantalla.Top + 100
nrocanal.Top = nrocanal.Top + 100
onoff.Top = onoff.Top + 100
tvcatv.Top = tvcatv.Top + 100
pantalla2.Top = pantalla2.Top + 100
Auxiliar.Top = Auxiliar.Top + 100
End Sub

Private Sub menos_Click()
pantalla.Left = pantalla.Left - 100
nrocanal.Left = nrocanal.Left - 100
onoff.Left = onoff.Left - 100
tvcatv.Left = tvcatv.Left - 100
pantalla2.Left = pantalla2.Left - 100
Auxiliar.Left = Auxiliar.Left - 100
End Sub

Private Sub menosbrillo_Click()
pantalla.Top = pantalla.Top - 100
nrocanal.Top = nrocanal.Top - 100
onoff.Top = onoff.Top - 100
tvcatv.Top = tvcatv.Top - 100
pantalla2.Top = pantalla2.Top - 100
Auxiliar.Top = Auxiliar.Top - 100
End Sub

Private Sub nueve_Click()
Auxiliar.Caption = Auxiliar.Caption + "9"
End Sub

Private Sub ocho_Click()
Auxiliar.Caption = Auxiliar.Caption + "8"
End Sub

Private Sub OFF_Click()
nrocanal.Caption = ""
tvcatv.Caption = ""
onoff.BackColor = vbBlack
uno.Enabled = False
dos.Enabled = False
tres.Enabled = False
cuatro.Enabled = False
cinco.Enabled = False
seis.Enabled = False
siete.Enabled = False
ocho.Enabled = False
nueve.Enabled = False
cero.Enabled = False
End Sub

Private Sub offon_Click()
If onoff.BackColor = vbRed Then
onoff.BackColor = vbBlack
uno.Enabled = False
dos.Enabled = False
tres.Enabled = False
cuatro.Enabled = False
cinco.Enabled = False
seis.Enabled = False
siete.Enabled = False
ocho.Enabled = False
nueve.Enabled = False
Else
onoff.BackColor = vbRed
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
cinco.Enabled = True
seis.Enabled = True
siete.Enabled = True
ocho.Enabled = True
nueve.Enabled = True
End If
End Sub

Private Sub ON_Click()
nrocanal.Caption = "0"
tvcatv.Caption = "TV"
onoff.BackColor = vbRed
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
cinco.Enabled = True
seis.Enabled = True
siete.Enabled = True
ocho.Enabled = True
nueve.Enabled = True
cero.Enabled = True
End Sub

Private Sub seis_Click()
Auxiliar.Caption = Auxiliar.Caption + "6"
End Sub

Private Sub siete_Click()
Auxiliar.Caption = Auxiliar.Caption + "7"
End Sub

Private Sub tres_Click()
Auxiliar.Caption = Auxiliar.Caption + "3"
End Sub

Private Sub uno_Click()
Auxiliar.Caption = Auxiliar.Caption + "1"
End Sub

Visual Basic (por cami)

Private Sub arriba_Click()
If nrocanal.Caption > 0 Then
nrocanal.Caption = nrocanal.Caption + 1
Else
nrocanal.Caption = 129
End If

End Sub

Private Sub cero_Click()
nrocanal.Caption = "0"
End Sub

Private Sub cinco_Click()
Auxiliar.Caption = Auxiliar.Caption + "5"
End Sub

Private Sub Command1_Click()
If nrocanal.Caption > 0 Then
nrocanal.Caption = nrocanal.Caption - 1
Else
nrocanal.Caption = 129
End If

End Sub

Private Sub cuatro_Click()
Auxiliar.Caption = Auxiliar.Caption + "4"
End Sub

Private Sub dos_Click()
Auxiliar.Caption = Auxiliar.Caption + "2"
End Sub

Private Sub enter_Click()
nrocanal.Caption = Auxiliar.Caption
Auxiliar.Caption = ""
End Sub

Private Sub mas_Click(Index As Integer)
pantalla.Left = pantalla.Left + 100
nrocanal.Left = nrocanal.Left + 100
onoff.Left = onoff.Left + 100
tvcatv.Left = tvcatv.Left + 100
pantalla2.Left = pantalla2.Left + 100
Auxiliar.Left = Auxiliar.Left + 100
End Sub

Private Sub masbrillo_Click()
pantalla.Top = pantalla.Top + 100
nrocanal.Top = nrocanal.Top + 100
onoff.Top = onoff.Top + 100
tvcatv.Top = tvcatv.Top + 100
pantalla2.Top = pantalla2.Top + 100
Auxiliar.Top = Auxiliar.Top + 100
End Sub

Private Sub menos_Click()
pantalla.Left = pantalla.Left - 100
nrocanal.Left = nrocanal.Left - 100
onoff.Left = onoff.Left - 100
tvcatv.Left = tvcatv.Left - 100
pantalla2.Left = pantalla2.Left - 100
Auxiliar.Left = Auxiliar.Left - 100
End Sub

Private Sub menosbrillo_Click()
pantalla.Top = pantalla.Top - 100
nrocanal.Top = nrocanal.Top - 100
onoff.Top = onoff.Top - 100
tvcatv.Top = tvcatv.Top - 100
pantalla2.Top = pantalla2.Top - 100
Auxiliar.Top = Auxiliar.Top - 100
End Sub

Private Sub nueve_Click()
Auxiliar.Caption = Auxiliar.Caption + "9"
End Sub

Private Sub ocho_Click()
Auxiliar.Caption = Auxiliar.Caption + "8"
End Sub

Private Sub OFF_Click()
nrocanal.Caption = ""
tvcatv.Caption = ""
onoff.BackColor = vbBlack
uno.Enabled = False
dos.Enabled = False
tres.Enabled = False
cuatro.Enabled = False
cinco.Enabled = False
seis.Enabled = False
siete.Enabled = False
ocho.Enabled = False
nueve.Enabled = False
cero.Enabled = False
End Sub

Private Sub ON_Click()
nrocanal.Caption = "0"
tvcatv.Caption = "TV"
onoff.BackColor = vbRed
uno.Enabled = True
dos.Enabled = True
tres.Enabled = True
cuatro.Enabled = True
cinco.Enabled = True
seis.Enabled = True
siete.Enabled = True
ocho.Enabled = True
nueve.Enabled = True
cero.Enabled = True
End Sub

Private Sub seis_Click()
Auxiliar.Caption = Auxiliar.Caption + "6"
End Sub

Private Sub siete_Click()
Auxiliar.Caption = Auxiliar.Caption + "7"
End Sub

Private Sub tres_Click()
Auxiliar.Caption = Auxiliar.Caption + "3"
End Sub

Private Sub uno_Click()
Auxiliar.Caption = Auxiliar.Caption + "1"
End Sub

semana 20 (por cami)

29de agosto del 2008

Noticia 1: Comenzó la feria regional de ciencia y tecnología juvenil

El secretario de Estado de Ciencia, Tecnología e Innovación, David Asteggiano, participó del acto de apertura de la Feria Regional de Ciencia y Tecnología Juvenil de Santa Fe, en la escuela de Educación Técnica N°447 "Dr. Nicolás Avellaneda" –Pasaje Calcena 955– de la capital provincial.Organizadas conjuntamente por la Secretaría de Estado de Ciencia, Tecnología e Innovación y el Ministerio de Educación, a través de sus regionales, las ferias son un espacio en donde los alumnos de las escuelas de la provincia –niños, jóvenes y adultos–, asesorados por docentes, exponen al público sus proyectos y trabajos científicos y tecnológicos inéditos, con aportes originales.

para mas información





Noticia 2: iPhone: Hack permite tomar fotos macro

A muchos usuarios de gadgets de última tecnología no les tiembla el pulso a la hora de desarmarlos y analizar de qué manera pueden mejorar sus prestaciones. El hack que te comentamos en este artículo permite, de una forma sencilla y rápida, modificar un teléfono iPhone para permitirle tomar fotos macro. ¿Algún valiente lector se anima a intentarlo?
Ya hemos comentado algunos hacks verdaderamente sorprendentes, como aquel que permitía instalar una pantalla táctil en un eeePC 701. Pero la inventiva de los usuarios no descansa y alguien se animó a desarmar su nuevo (y caro) iPhone para trastear con su cámara para que sea capaz de sacar fotos macro. Luego, como corresponde publicó una guía fotografias, , para que aquellos que estén lo suficientemente interesados en este tipo de y lo suficientemente locos como para desarmar un iPhone, puedan seguir sus pasos.






para mas información

Noticia 3 : Google introduce tienda de Aplicaciones para el Android
Google ha dado a conocer sus planes para una tienda donde los usuarios móviles pueden encontrar aplicaciones para el Android, un concepto similar a la tienda de Apps para el iPhone.



para mas información

Mis vacaciones, mapa (cami)

Ver mapa más grande

semana 19(por cami)

viernes 22 de agosto del 2008

Noticia 1: IBM invierte 300 millones de dólares para la continuidad de sus centros de negocios

IBM anunció que está invirtiendo 300 millones de dólares para ampliar su continuidad del negocio y recuperación ante desastres de negocio, añadiendo 13 instalaciones en todo el mundo para hacer frente a lo que describió como un aumento de la demanda de las empresas y los gobiernos.


Para mas información




Noticia 2: Como aprovechar el agua de Marte

La confirmación de la existencia de agua en Marte por parte de la sonda Phoenix significa que el planeta resulta, al menos en teoría, apto para sostener una colonia humana. Sin embargo, queda por resolver el problema de transformar el hielo del permafrost marciano en agua lista para el consumo. Pero la NASA ya está trabajando en ello.




Para mas información

Ntocia 3: Cibermix llega el día 29 de agosto a Guadalupe para acercar a los ciudadanos las nuevas tecnologías

La feria tecnológica Cibermix se abre del 29 al 31 de agosto a la población de la localidad cacereña de Guadalupe para acerarle, de una forma entretenida, la utilidad de las herramientas tecnológicas y la banda ancha en la vida cotidiana.

Para mas información

Mis vacaciones (por cami)

Martes 29 vino una amiga a mi casa

Miércoles 30 vieneieron unos amigos a mi casa para hacer el trabajo de sociales.

Jueves 31 hoy fui al abasto

Viernes 1 vino una amiga de Italia a mi casa y fuimos al cine del abasto a ver la momia.

Lunes 4 vino anita a mi casa

Martes 5 fui al gran rex a ver casi Ángeles

Miércoles 6 fui al dentista

Jueves 7 me quede en mi casa

Viernes 8 fui a comprarme ropa y a la casa de mi tia