Mais uma thread para esse assunto :(
Que tal usar apenas uma? Desta forma vc está pulverizando e empobrecendo a discussão. Sem falar na poluição que está gerando no fórum.
Que tal tentar utilizar o fórum da forma como ele foi concebido para ser usado?
Os usuários do fórum agradecem.
>Criei um CursorAdapter no DataEnvironment do meu Form com VFP 8...
>
>teste de conexão, OK...
>
>quando vou no TextBox do código, vou no ControlSource para referenciar o campo do cursor, o nome do cursor está lá corretamente, porém quando executo meu Form dá mensagem de erro:
>
>Alias 'CURSORTESTE' is not found. Unbinding object txtcodigo
>
>se seto o controle BINDCONTROLS como False, o Form funciona sem erros,
>porém não mostra nada
>
>se seto o controle BINDCONTROLS como True, dá a mensagem de erro acima citada...
>
>o Código está descrito abaixo...
>
>Grato por qualquer informação....
>
>*****************************
>
>local llReturn
>do case
> case not pemstatus(This, '__VFPSetup', 5)
> This.AddProperty('__VFPSetup', 0)
> case This.__VFPSetup = 2
> This.__VFPSetup = 0
> return
>endcase
>llReturn = dodefault()
>
>text to This.SelectCmd noshow
> select CLIENTES.* from CLIENTES
>endtext
>
>text to This.UpdateNameList noshow
>CODIGO CLIENTES.CODIGO, NOME CLIENTES.NOME, ENDERECO CLIENTES.ENDERECO, BAIRRO CLIENTES.BAIRRO, CIDADE CLIENTES.CIDADE, UF CLIENTES.UF, CPF CLIENTES.CPF, DATA CLIENTES.DATA
>endtext
>
>text to This.UpdatableFieldList noshow
>CODIGO, NOME, ENDERECO, BAIRRO, CIDADE, UF, CPF, DATA
>endtext
>
>local loConnDataSource
>set multilocks on
>loConnDataSource = createobject('ADODB.Connection')
>
>loConnDataSource.ConnectionString = [dsn=empresa;uid=sysdba;pwd=masterkey;trusted_connection=no;]
>
>loConnDataSource.Open()
>This.DataSource = createobject('ADODB.RecordSet')
>This.DataSource.CursorLocation = 3 && adUseClient
>This.DataSource.LockType = 3 && adLockOptimistic
>This.DataSource.ActiveConnection = loConnDataSource
>This.CursorFill(.t.)
>
>if This.__VFPSetup = 1
> This.__VFPSetup = 2
>endif
>return llReturn
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only