Programación General > Power Builder
Obtener datos de servidor
darksito:
bueno esa consulta se ve simple , dime aun no lo e probado pero solo escribo en power builder la sentencia de arriba y almaceno en una variable para mostrar el nombre de mi servidor :huh:
F_Tanori:
Hay una forma facil de ejecutar SQL como una cadena en lugar de incrustado (ademas de SQLSA)
Yo prefiero este metodo, crear una funcion, que utilice el metodo CREATE del DW, pasandole como referencia la consulta sql, y el dw control
--- Código: Visual Basic ---public subroutine wf_query (string as_sql, ref datawindow dw_query);Long ll_row,cString error_syntaxfromSQL, error_create, new_syntaxnew_syntax = SQLCA.SyntaxFromSQL(as_SQL,'Style(Type=Grid)', error_syntaxfromSQL)QueryError="" if Len(error_syntaxfromSQL) > 0 THEN QueryError =error_syntaxfromSQL returnelse dw_query.Create(new_syntax, error_create) if Len(error_create) > 0 THEN QueryError = error_create return end ifend if dw_query.SetTrans(SQLCA)dw_query.Retrieve() end subroutine
--- Código: Visual Basic ---wf_query ("SELECT @@servername 'Servidor' ",dw_1) if dw_1.RowCount()>0 then ls_Server =dw_1.getItemString(1,'Servidor') else ls_Server ='Desconocido' end if MessageBox ('Servidor', ls_Server )
Navegación
[*] Página Anterior
Ir a la versión completa