
Enlace: Epson
Enlace: Epson
Eyeborg Phase II desde eyeborg sobre Vimeo.
Sus opiniones vale oro, agradecer o comentar no cuesta nada.....
Para bloquear la página de inicio de Intenet Explorer y que no sea modificada por cualquier persona o programa (o desbloquearla en caso de que algún programa nos lo haya bloqueado), haremos lo siguiente:
Hacemos click sobre el botón Inicio y seleccionamos Ejecutar, a continuación accedemos al editor del registro de Windosws, escribiendo Regedit y pulsaremos Aceptar. Una vez estemos en el registro buscaremos la siguiente cadena:
HKEY_CURRENT_USER –> Software –> Policies –> Microsoft
Con la carpeta Microsoft seleccionada creamos una nueva CLAVE (Botón derecho) y le daremos el nombre de Internet Explorer.
Estando sobre ésta última, creamos una nueva CLAVE de nombre Control Panel
Dentro de Control Panel, creamos un nuevo VALOR DWORD de nombre Homepage y a éste le damos el valor 1 para tener la Página de Inicio bloqueada (para poder modificar la página de inicio tendremos que entra aquí y cambiar el valor a 0).
El siguiente script copia todas las filas de un datawindow a un archivo de excel existente. Con esto usted puede aprender la manera de enviar datos desde una aplicación de Power Builder a celdas especificas de un archivo de excel.
El ejemplo copia la fila 1 columna 1 del datawindow a la fila1 columna1 de una hoja existente de excel, y asi con todas las celdas. Usted puede modificar este script para enviar solamente las celdas que usted necesite.
En este ejemplo se abre un archivo localizado en c:ejemplo.xls pero usted debe modificar el directorio y el nombre del archivo para que abra un archivo existente de excel en su disco duro. En la parte final del código esta la posibilidad de descomentar las funciones para guardar el archivo, o guardarlo con otro nombre.
El código es el siguiente:
long ll_numcols , ll_numrows , ll_c, ll_r
OLEObject xlapp , xlsub
int li_ret
// Coloca el número de columnas y filas a copiar
// Este script copia todo el DW pero ud puede solo copiar las celdas que desee
ll_numcols = long(dw_1.Object.DataWindow.Column.Count)
ll_numrows = dw_1.RowCount()
// Crea el oleobject en la variable xlapp
xlApp = Create OLEObject
// Se conecta a Excel y verifica el código de retorno
li_ret = xlApp.ConnectToNewObject( "Excel.Sheet" )
if li_ret < 0 then
MessageBox("Error Conectandose a Excel !",string(li_ret))
return
end if
// Abre un archivo especifico de Excel
xlApp.Application.Workbooks.Open("c:ejemplo.xls") //,false,true
// Hace Excel visible
xlApp.Application.Visible = true
xlsub = xlapp.Application.ActiveWorkbook.Worksheets[1]
// El for/next loop copia todas las filas de cada columna
For ll_c = 1 to ll_numcols
For ll_r = 1 to ll_numrows
xlsub.cells[ll_r,ll_c] = dw_1.object.data[ll_r,ll_c]
Next
Next
// Guarda el archivo abierto
//xlApp.Application.Activeworkbook.Save()
// Guarda el arvhivo con diferente nombre
//xlApp.Application.Activeworkbook.SaveAs("c:ejemplo2.xls")
// se desconecta de excel
xlApp.DisConnectObject()
Destroy xlapp
Me encantan los comics, recién y gracias a Kabytes encuentro a stackoverflow, una galería de comics destinados a todos los programadores.
Cada comic esta clasificado por su rating, el mismo se elabora en base a nuestros votos, una galería que es imperdible con la que cualquier programador se divertirá por un buen rato.
En este sitio de seguro que encontraran viejos comics ya conocidos por todos, no obstante hay tantos que lo más probable es que descubras unos cuantos. Por aquí también tenemos otras tiras cómicas muy divertidas, si no las conoces te recomiendo que te des una vuelta por la tira de Bit & Byte y por Geek in Love.
Fuente: stackoverflow
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim V1, S1, S2 As Integer
SemanaInicial = DatePart(DateInterval.WeekOfYear, _
New Date(Now.Year, ComboBox1.SelectedIndex, 1), _
FirstDayOfWeek.Monday, FirstWeekOfYear.Jan1)
If ComboBox1.SelectedIndex < style="color: rgb(51, 51, 255);">Then
SemanaFinal = DatePart(DateInterval.WeekOfYear, New Date(Now.Year,_
ComboBox1.SelectedIndex + 1, 1).AddDays(-1), FirstDayOfWeek.Monday,_
FirstWeekOfYear.Jan1)
Else
SemanaFinal = DatePart(DateInterval.WeekOfYear,New Date(Now.Year + 1, 1, 1).AddDays(-1), _FirstDayOfWeek.Monday, FirstWeekOfYear.Jan1)
End If
Select ComboBox1.SelectedIndex
Case 1
S1 = SemanaInicial S2 = SemanaFinal
Case 2
S1 = SemanaInicial + 1 S2 = SemanaFinal
Case 3
S1 = SemanaInicial + 1 S2 = SemanaFinal - 1
Case 4
S1 = SemanaInicial S2 = SemanaFinal
Case 5
S1 = SemanaInicial + 1 S2 = SemanaFinal
Case 6
S1 = SemanaInicial S2 = SemanaFinal - 1
Case 7
S1 = SemanaInicial S2 = SemanaFinal
Case 8
S1 = SemanaInicial + 1 S2 = SemanaFinal - 1
Case 9
S1 = SemanaInicial S2 = SemanaFinal - 1
Case 10 S1 = SemanaInicial S2 = SemanaFinal
Case 11 S1 = SemanaInicial + 1 S2 = SemanaFinal - 1
Case 12 S1 = SemanaInicial S2 = SemanaFinal
Case Else S1 = SemanaInicial S2 = SemanaFinal
End Select
MsgBox(S1 & " al " & S2)
ListBox1.Items.Clear()
For V1 = S1 To S2
ListBox1.Items.Add("Semana Nº : " + CType(V1, String))
Next
End Sub
Nota: no vayan a modificar otro archivo o contenido del regedit porque seria perjudicial para sus equipo y pueda dañar el S.O (Sistema Operativo) en este caso Windows.
Esta vostro posee muchas características similares a la Dell Inspiron Mini 9, posee un procesador Intel Atom a 1.6 GHz, chipset Intel 945GSE, 512 MB de RAM, disco de 8 GB SSD. Posee conectividad WiFi, Bluetooth e incluye Windows XP Home Edition. Disponible desde $349 dólares.
Donde más sino en Japón podrías encontrar un robot escarabajo gigante! Los japoneses no ponen límites a su imaginación, como el creador de este gigante robot que estuvo 11 años fabricándolo, todavía no estamos seguros qué fué lo que lo llevó a diseñar semejante robot durante tantos años y con qué utilidad final, pero que lo logró es un hecho! Nada mejor que el vídeo para verlo en acción:
El exterior nos muestra controles para manejar la música, su pantalla de 2.4″ es monocromática y además de mostrar las canciones en reproducción también nos brinda la fecha y hora. Los desarrolladores también han agregado soporte para dual-SIM.
Si bien no hay mucha más información, podemos deducir que los chinos no tuvieron mucha imaginación, de seguro esto no será muy exitoso. Ahora sólo queda esperar a ver el iPhone Nano real por parte de Apple, si es que lo realiza en un futuro cercano, el tiempo dirá, pero lo que es seguro es que será mucho mejor que este dispositivo que carece de mucha producción.
¿Qué te parece?
No hay muchos más detalles pero la imágen y noticia nos pareció bastante interesante. También interesante es el precio, $500 dólares! . Pero para aquellos amantes al juego no creo que les paresca mucho
¿Qué te parece?
SupremeFX X-Fi por ejemplo ofrece increíble realidad de efectos en sonidos, permitiéndo disfrutar a los jugadores de una total inmersión en los juegos soportados.
¿Qué te parece?
Puedes conseguirla desde $12 dólares aquí
Además de grabar vídeo, puede tomar imágenes a 640 x 480 píxeles y guardarlas en memorias MicroSD con soporte hasta para 8 GB. Aún no hay menciones sobre precios o disponibilidad.
¿Qué te parece?
Especificaciones técnicas:
* Procesador Intel Core 2 Duo
* Hasta 4GB RAM
* Disco máximo de 500GB hard drive
* Tarjeta gráfica NVIDIA GeForce GT 130M
* Unidad óptica de Blu-ray
* Cámara de 1.3 megapíxeles
* Lector de tarjetas multimedia
* Windows Vista Home Premium
Al momento no hay datos sobre precios o disponibilidad.
Se trata de un disco duro diminuto en comparación a la gran capacidad de almacenamiento que puede albergar en su interior. Y es que en el dispositivo diseñado por Neil Poulton para LaCie podrás guardar hasta un terabyte (TB) de datos y acceder a ellos a gran velocidad.
Por su reducido tamaño (ocupa el mismo espacio que un teléfono inalámbrico) y su peso (650 gramos), esta unidad resulta tremendamente ultraportátil. Y gracias también a su sistema de alimentación a través del bus FireWire, que permite prescindir del cable de corriente.
Cuenta con cuatro interfaces diferentes para lograr una conectividad universal con ordenadores de sobremesa y portátiles, Mac y Windows. Tiene un puerto Hi-Speed USB 2.0, dos conexiones FireWire 800 (compatibles con FireWire 400) y un puerto eSATA de 3 Gbits. Alcanza una velocidad de rotación de 5.400 rpm y presume de una carcasa de aluminio con disipador del calor para un trabajo intensivo ultrasilencioso. Ahora lo que escuece: su valor ronda los 549 €. Tendrás que decidir pues si te conviene.