darkspectro

Edw. N. respondió: Agrégame a tu msn, no entiendo bien tu código, o mejor dicho lo que tratas de hacer quizá ahí me expliques un poco más, las disculpas de caso Mi corre es : [email protected]

achafio respondió: lb_1.reset() String ls_ver ls_ver = sle_7.text+'%' declare busq cursor for select prod_descripcion from productos where prod_descripcion like :ls_ver using sqlca; open busq; fetch busq into :ls_ver; do while sqlca.sqlcode <> 100 lb_1.additem(ls_ver)...

Edw. N. respondió: insert into DOCUMENTO_VENTA (doc_vent_numero,doc_vent_total,doc_vent_estado,cli_codigo,doc_vent_fecha) values(:sle_8.text, :tot, "P", :sle_9.text, :fec) using sqlca; If sql.sqlcode <> 0 then messagebox("Error", SQLCA.SQLErrText) Else commit; End If...

Edw. N. respondió: Run("C:\Program Files\Microsoft Office\OFFICE11\winword.exe") Entre las comillas copia la ruta del ejecutable del word, si tienes el xp en español, lo encontrar en archivos de programa.