PREGUNTAS CONTESTADAS - Power Builder

 Hay un total de 432 Preguntas.<<  >> 

    Pregunta:  62086 - OBTENER LA MAC ADDRESS DE MI EQUIPO
Autor:  Helbert Jimenez
Hola.

Quisiera poder saber como obtengo la Mac Address de un Equipo, utilizando Power Builder.

Alquien me puede ayudar.
Gracias

[email protected]
  Respuesta:  Eduardo Fernandez
1. Solicita la información fisica mediante ARP (cmd)

c:\ARP -a *TU IP*

Interfaz: 132.1.2.111 --- 0x10003
Dirección IP Dirección física Tipo
132.1.1.2 00-10-5a-e3-e4-f1 dinámico

2. Guardalo en un archivo que powerpueda leer

c:\ARP -a 132.1.1.2 > c:\MyFile.Txt


A traves de power abre el archivo y lee la MAC

132.1.1.1 = 00-10-5a-e3-e4-f1

    Pregunta:  62089 - CORRER UNA APLICACION PB SIN INTALAR CLIENTE DE BD
Autor:  Walther Rodriguez
Quisiera saber si es posible correr una aplicacion PB desde una estacion pero sin tener que instalarle el cliente.

Tengo el exe en un servidor , el cual ejecutan las estaciones y la aplicacion corre pero previamente tengo q instalar el cliente de Bd.....SE PUEDE CAMBIAR LA APLICACION para que no sea necesario tener el cliente instalado?
  Respuesta:  Adolfo Chairez
La única forma de hacer eso de 2 formas mediante una aplicación web donde en el servidor reside todas las paginas y rutinas o mediate una sesión de terminal server donde el cliente se conecta al servidor.

    Pregunta:  62171 - CONEXIÓN A PB CON EL USUARIO DE WINDOWS
Autor:  Abad Puerta
Hola
Cómo hago desde Powerbuilder una validación autenticando con usuario y clave de windows. Es decir neceito validar que para ingresar a mi sistema, el usuaio de windows sea igual al registtrado en una tabla.
Gracias
  Respuesta:  Moises Orellana
remitete a la pagina de fponte busca en google, para hacer lo que andas buscando tendras que usar las api de windows.
atte
Moises Orellana O.

    Pregunta:  62444 - LEER CONTROL OLE EXCEL
Autor:  Luis Zanini
Saludos amigos listeros.
Tengo un control ole excel de nombre ctrl_ole_excel, que quisiera leer los datos que tiene para pasarlos a un datawindow (quiero darle la facilidad al usuario que modifique en el propio ole los datos necesarios), pero no se como acceder a cada una de las celdas.

O de lo contrario como asocio el Control Ole con un Objeto Ole, porque desde ahí si podría acceder
(obj_ole_excel.Application.ActiveWorkbook.Worksheets[1].cells[1,1].value)

Hago lo siguiente:

ctrl_ole_excel.insertfile("c:prueba.xls")
obj_ole_excel = CREATE OLEObject
obj_ole_excel.ConnectToObject("", "Excel.Application")
obj_ole_excel.object = ctrl_ole_excel.object

//pero me da "Error accessing external object property object":

Espero me puedan ayudar. Gracias.
  Respuesta:  David Ayala
A mi me funciona así copiando las filas que quiero de la excel al portapapeles y pegandolas en la datawindows:

// IMPORTAR EXCEL A DATAWINDOWS EXTERNA
oleobject excel
excel = create OLEObject
ll_rtn = excel.ConnectToNewObject("excel.application")
IF ll_rtn <> 0 THEN
MessageBox('Excel error','No puede conectarse a Excel')
DESTROY excel
RETURN 0
END IF

excel.WorkBooks.Open("c:prueba.xls")
excel.Application.Visible = false
excel.windowstate = 2 // 1 : Normal, 2 : Minimize, 3 : Maximize

lb_sheet_rtn = excel.worksheets(1).Activate

excel.Worksheets(1).Range("A4:AX60").Copy // copiar al clipboard

// Importar desde clipboard
ll_cnt = dw_excel.importclipboard()
IF ll_cnt <= 1 THEN
Messagebox("Info", "No se encontró")
END IF

excel.Worksheets(1).Range("A10000:A10000").Copy //reset clipboard
excel.Application.Quit
excel.DisConnectObject()
DESTROY excel

Espero que te sirva.
Saludos.

    Pregunta:  62541 - CAPTURAR IMAGENES CON WEBCAM
Autor:  Juan PEREZ
Quisiera saber como puedo hacer para capturar una imagen a travez de la webcam al hacer click en un boton. Powerbuilder 9 en adelante.
  Respuesta:  Alejandro Gomez
Como estas Juan, yo estoy tratando de hacer lo mismo y por lo que he averiguado existe una funcion api para hacer esto..pero no he logrado que funcione bien.. este es el codigo:

//Local external function
function ulong capCreateCaptureWindowA(string lpszWindowName,ulong dwStyle,long li_x ,long li_y ,long nWidth ,long nHeight ,ulong ParentWin ,long nId ) LIBRARY 'AVICAP32.DLL'

//Instance Variables
Uint lhand
Constant long GET_FRAME = 1084
Constant long COPY = 1054
Constant long WM_USER = 1024
Constant long WM_CAP_START = WM_USER
Constant long WM_CAP_STOP = WM_CAP_START + 68
Constant long WM_CAP_DRIVER_CONNECT = WM_CAP_START + 10
Constant long WM_CAP_DRIVER_DISCONNECT = WM_CAP_START + 11
Constant long WM_CAP_SAVEDIB = WM_CAP_START + 25
Constant long WM_CAP_GRAB_FRAME = WM_CAP_START + 60
Constant long WM_CAP_SEQUENCE = WM_CAP_START + 62
Constant long WM_CAP_FILE_SET_CAPTURE_FILEA = WM_CAP_START + 20
Constant long WM_CAP_SEQUENCE_NOFILE =WM_CAP_START+ 63
Constant long WM_CAP_SET_OVERLAY =WM_CAP_START+ 51
Constant long WM_CAP_SET_PREVIEW =WM_CAP_START+ 50
Constant long WM_CAP_SET_CALLBACK_VIDEOSTREAM = WM_CAP_START +6
Constant long WM_CAP_SET_CALLBACK_ERROR=WM_CAP_START +2
Constant long WM_CAP_SET_CALLBACK_STATUSA= WM_CAP_START +3
Constant long WM_CAP_SET_CALLBACK_FRAME= WM_CAP_START +5
Constant long WM_CAP_SET_SCALE=WM_CAP_START+ 53
Constant long WM_CAP_SET_PREVIEWRATE=WM_CAP_START+ 52

Long wm_cap_savedatdib = 1049
Long wm_cap_dlg_videoformat = 1065
Long wm_cap_dlg_videosource = 1066
Long wm_cap_dlg_videodisplay = 1067
Long wm_cap_get_videoformat = 1068
Long wm_cap_set_videoformat = 1069
Long wm_cap_dlg_videocompression = 1070
Long cf_bitmap = 2
Long wm_close = 16
Ulong scrcopy = 32
string gs_pic_path
string gs_cd_path
string gs_path
string gs_ds_pic
string gs_ds_cd
string gs_cd_rq
long gl_pic_sj = 0

//Boton inicia camara

string lpszName
ulong l1
l1=handle(parent)

lpszName='webcam.'
lhand=capCreateCaptureWindowA(lpszName,262144+12582912+1073741824 + 268435456 ,10,10,200,200,l1,0)
if lhand <> 0 then
send(lhand, WM_CAP_SET_CALLBACK_VIDEOSTREAM, 0, 0)
send(lhand, WM_CAP_SET_CALLBACK_ERROR, 0, 0)
send(lhand, WM_CAP_SET_CALLBACK_STATUSA, 0, 0)

send(lhand, WM_CAP_DRIVER_CONNECT, 0, 0)
send(lhand, WM_CAP_SET_SCALE, 1, 0)
send(lhand,WM_CAP_GRAB_FRAME, 0, 0)
Send(lhand, WM_CAP_SAVEDIB, 0, 0)
send(lhand, WM_CAP_SET_PREVIEWRATE, 66, 0)
send(lhand, WM_CAP_SET_OVERLAY, 1, 0)
send(lhand, WM_CAP_SET_PREVIEW, 1, 0)
end if

//boton grabar imagen
string s_map
s_map='c:save.bmp'
if FileExists(s_map) then FileDelete(s_map)
if lhand <> 0 then

Send(lhand,WM_CAP_FILE_SET_CAPTURE_FILEA,0,s_map);
p_2.visible = true
st_1.visible = false
p_1.picturename = s_map
SendMessage(lhand, WM_CAP_DRIVER_DISCONNECT, 0, 0)
lhand =0
this.enabled = false
cb_1.enabled = true
end if

//Boton captura video
string s
s='c:save.avi'
if lhand <>0 then
Send(lhand,WM_CAP_FILE_SET_CAPTURE_FILEA,0, s);
Send(lhand,WM_CAP_SEQUENCE, 0, 0)
end if

Ojala te sirva de algo..si tu lo lograste hacer funcionar..te agradeceria que me indcaras como hacerlo..mi correo es [email protected]

saludos.

    Pregunta:  62687 - COMPATIBILIDAD ENTRE PB 6.5 Y WINDOWS VISTA
Autor:  Luz Soto
Hola!
Necesito saber si los programas desarrollados en Power builder 6.5 son compatibles con WIndows Vista.
  Respuesta:  Misael
Segun yo si actualmente tengo aplicaciones en 6.5 y 9 y funciones a la perfeccion incluso en windows 7, solo deberias tener tus dll de power.

    Pregunta:  62724 - CERRAR APLICACIÒN AUTOMATICAMETE
Autor:  lilian
Buenas,
tengo una aplicaciòn e en PB 9.0, y se implantò un control de tiempo de inactividad de sesiones, cada hora se cierra la sesiòn en la base de datos, pero el sistema sigue abierto y no hay manera de saber si sigue contacdo o no.. solo hasta que muestra varios mensajes de desconecciòn, lo que genera un poco de malestar.
Me gustarìa saber si hay alguna manera de cerrar automaticamente toda la aplicaciòn cada vez que se cierre la sesiòn con la Base de datos.
  Respuesta:  Misael
en le master de tu server tienes una tabla que se llama sysproceses en esta se alojan las sesiones en tu BD. si ya no encuentras tu user le das un halt.

Espero te sirva...

    Pregunta:  63002 - CAMBIAR ICONO A EJECUTABLE ECHO POR POWER BUILDER
Autor:  Nilton ibañez
hola, tengo un problema para colocar una imagen como icono del ejecutable creadi por power builder, necesito cambiarlo de icono para poderlo realizar el instalador del sistema y q a la hora q se instale aparesca icono q le puese al ejecutable en escritorio donde se instalo...ayuda xfa
  Respuesta:  Mamen Lorente
Tienes que ir a: 1º tu aplicacion y editarla 2º Abajo del todo se encuentra el boton "Additiona Propeties". Pulsalo 3ª Te apareceran varias solapas, una de ellas la de" icon". Ves a ella y ahi puedes cambiar el path por el del icono que tu desees.
Espero haberte solucionado el problema

    Pregunta:  63052 - PARENT = NULL?
Autor:  ruben medina
Buen día, necesito ayuda en algo, tengo un botón de impresión, en el cual después de imprimir, la impresora me tira una 2da copia(no establecida) reducida al 20% de la página original, lo raro es que no me tira ningún error en ese momento, tampoco existe código que redusca el objeto scale a 20% y luego mande de vuelta una orden de impresión.

En algunos casos me sale el sgte error:
Error message: null object reference at line 15 in clicked event of object cb_2 of w_print_parametros
window/menu: w_print_parametros
object: cb_2
event: clicked
line number: 15
...
Revise la linea 15 y el código solo dice:
close(parent)
por lo tanto supuse que parent llega null y lo cambie por el nombre del objeto directamente a w_print_parametros.
..
porque parent puede ponerse en null?
eso puede afectar en el momento de la impresion (2 copias , una normal y la otra reducida)?
cual podría ser la razón del problema?
cual podría ser la solución?
De antemano les agradesco y sinceramente estoy recurriendo a uds porque no he encontrado ningún indicio de cual podría se el problema real.
  Respuesta:  lan lan
Quizas colocando
Close(ParentWindow)

talvez asi funcione

;)

    Pregunta:  63086 - @@IDENTITY EN MYSQL
Autor:  Pitu Seculi
Hola buenas tardes!! De primeras deciros que muchas gracias por leerme aunque no podais ayudarme ;)

Estoy migrando un programa hecho en PB + Sybase a PB + MySQL. He conseguido solucionar todos los problemas que me ha dado, pero ahora me encuentro un poco estancado.

Resulta que en muchos sitios (versión Sybase) hace la siguiente consulta:
SELECT @@identity INTO :variable FROM dummy;

Ahora quiero simular esto con MySQL.

Según he visto, esto lo que hace es recuperar el ultimo ID insertado en un registro. He leido que equivale al LAST_INSERT_ID() de MySQL, pero PB se queja al usar esta instrucción ya que me dice que no lo reconoce (que no está declarada).

En otro sitio he leido que yendo a la datawindow y especificando la columna "Identity Column" ya funcionaría, pero no es lo que me interesa. El código que tengo que pasar a MySQL es:
-->
(...)
INSERT INTO poblacion (pob) VALUES (:sPob);
if SQLCA.SQLCode = 0 then
SELECT @@identity INTO :lCodPob FROM dummy;
if SQLCA.SQLCode = 0 then
INSERT INTO codigo_postal (codpos, codpob) VALUES (:sCodPos, :lCodPob);
if SQLCA.SQLCode = 0 then
SELECT @@identity INTO :lCodIde FROM dummy;
if SQLCA.SQLCode = 0 then
dsCodPos.Retrieve()
SetItem(lFila, "codideper", lCodIde)
end if
end if
end if
end if
(...)
<--

Alguien sabe como puedo hacer esto mismo en MySQL y PB 5.0?? ya sé que es una versión antigua, pero es la que usan aquí...

Muchísimas gracias!! :)
  Respuesta:  Daniel Rodas
Hola

Por si aun te sirve, te sugiero que utilices Stored Procedures y allí en la base de datos hagas todo tu proceso y en power solo llames a un SP principal que contenga los demas.

Tendrias que poner parametros de retorno en tus SP para que al final en la llamada hagas un fetch y captures el valor que deseas y hagas el retrieve y luego el setitem (por cierto te conviene mejor cambiar el setitem por: dsCodPos.object.codideper[lFila] = lCodIde)

Saludos

|<  <<  34 35 36 37 38 39 40 41 42 43 44  >>  >|