Tecnologia, programação e muito Visual FoxPro.

terça-feira, 1 de dezembro de 2009

RE: [usuarios_fox] conexion a base de datos remota sql

Hola:

Si tu puedes trabajar en forma programática usando la tecnología
passthruogh, que se basa en el comando sqlexec(), aqui te paso
el ejemplo que viene en la ayuda;

CLEAR

LOCAL lnConn

LOCAL lnPercent AS Int && Input parameters must be typed.

LOCAL lnOutput

lnPercent = 50

lnOutput = 0

* Make connection, assuming a local trusted connection.

lnConn = SQLCONNECT('local')

IF m.lnConn > 0 && Success.

* Set the active database to PUBS.

SQLEXEC(m.lnConn, 'use pubs')

* Execute SELECT statement.

SQLEXEC(m.lnConn, 'SELECT * FROM authors', 'PubAuthors')

BROWSE

* Execute INSERT statement, get value of identity field.

SQLEXEC(m.lnConn, "INSERT INTO JOBS (job_desc, min_lvl, max_lvl);

VALUES ('Developer',75,150)")

SQLEXEC(m.lnConn, "SELECT SCOPE_IDENTITY()", "job_id")

? "ID for added Job is " + LTRIM(STR(job_id.exp))

* Execute DELETE statement. Get number of records affected.

SQLEXEC(m.lnConn, "DELETE FROM JOBS WHERE job_desc ='Developer'")

SQLEXEC(m.lnConn, "SELECT @@ROWCOUNT", 'rowcount')

? rowcount.exp, "record(s) deleted"

* Call a stored procedure with no parameters.

SQLEXEC(m.lnConn, 'sp_who', 'activeusers')

BROWSE

* Execute stored procedure with an INPUT parameter.

SQLEXEC(m.lnConn, 'exec byroyalty ?lnPercent','HalfOffAuthors')

* Create temp stored procedure with OUTPUT parameter and call it.

SQLEXEC(m.lnConn, "CREATE PROCEDURE #MyProc @outparam int OUTPUT AS;

SELECT @outparam=100")

SQLEXEC(m.lnConn, "exec #myProc ?@lnOutput")

? m.lnOutput

* Create a temp stored procedure with INPUT and OUTPUT parameters

* and call it.

SQLEXEC(m.lnConn, "CREATE PROCEDURE #MyProc2 " + ;

"@inputparam INT, " + ;

"@outparam int OUTPUT " + ;

"AS SET @outparam=@inputparam*10")

SQLEXEC(m.lnConn, "exec #myProc2 ?lnPercent, ?@lnOutput")

? m.lnOutput

* Get version information.

SQLEXEC(m.lnConn, 'SELECT @@VERSION','SQLVersion1')

? STRTRAN(SQLVersion1.Exp,CHR(0))

* Disconnect.

SQLDISCONNECT(m.lnConn)

ELSE

? "Unable to connect to SQL Server"

ENDIF

RETURN

Saludos Cordiales,


José Alfonso


To: usuarios_fox@yahoogrupos.com.mx
From: horville@yahoo.com
Date: Tue, 1 Dec 2009 07:40:21 -0800
Subject: [usuarios_fox] conexion a base de datos remota sql






Hola a todos.

quiero establecer una conexion remota a una base de datos sql por medio de la IP.

La cadena que uso para conexión a servidor local es la siguiente y funciona bien con sql 2000,2005 y 2008

xconect=SQLSTRINGCONNECT('DRIVER=SQL server;SERVER=SERVIDOR;uid=sa;pwd=1234;

APP=Microsoft Visual FoxPro;WSID=xxxxx;BASEDATOS')

Si logre establcer la conexión remota, poniendo en lugar de 'SERVIDOR' la ip deseada ejem.

xconect=SQLSTRINGCONNECT('DRIVER=SQL server;SERVER='201.124.232.23';uid=sa;pwd=1234;

APP=Microsoft Visual FoxPro;WSID=xxxxx;BASEDATOS')

Solo que tuve que dar de alta el servidor en el panel de control-herramientas administrativas-obdc.

Mi pregunta es si puedo acceder a un servidor remoto, configurando vía código y no panel de control .

Gracias de antemano y saludos a todos.

Horacio






_________________________________________________________________
Una nueva experiencia de búsqueda está aquí
http://www.bing.com/?mkt=es-MX&FORM=M006IR&Publ=WLHMTAG&Crea=TEXT_M006IR_Bing_ES_SaveTimeClicks_1X1

[Se han eliminado los trozos de este mensaje que no contenían texto]

------------------------------------

Comentarios, observaciones o si deseas darte de baja avísame a: jamorquecho@hotmail.com

Enlaces a Yahoo! Grupos

<*> Para visitar tu grupo en la web, ve a:
http://mx.groups.yahoo.com/group/usuarios_fox/

<*> La configuración de tu correo:
Mensajes individuales | Tradicional

<*> Para modificar la configuración desde la Web, visita:
http://mx.groups.yahoo.com/group/usuarios_fox/join
(ID de Yahoo! obligatoria)

<*> Para modificar la configuración mediante el correo:
usuarios_fox-digest@yahoogrupos.com.mx
usuarios_fox-fullfeatured@yahoogrupos.com.mx

<*> Para cancelar tu suscripción en este grupo, envía
un mensaje en blanco a:
usuarios_fox-unsubscribe@yahoogrupos.com.mx

<*> El uso que hagas de Yahoo! Grupos está sujeto a
las Condiciones del servicio de Yahoo!:
http://mx.yahoo.com/docs/info/utos.html

Nenhum comentário:

Arquivo do blog