coloque essas duvidas tb no grupo [EMAIL PROTECTED]
Comando de inclusao de Nome numa string..
var
sSQL : String;
begin
sSQL := ' INSERT INTO CLIENTES(CODIGO, NOME) VALUES(' +
IntToStr(MinhaVariavelNumerica) + ', ' +
'''' + MinhaVariavelString + '''' + ')';
Connection.AppServer.ExecutaSQL( sSQL );
end;
as ordens
[]´s
Bruno Lichot
Micrologos Dream Team
Equipe Editorial ClubeDelphi DevMedia
[EMAIL PROTECTED]
[EMAIL PROTECTED]
www.micrologos.com.br - www.clubedelphi.net - www.delphirio.assespro-rj.org.br
[]´s
Bruno Lichot
Micrologos Dream Team
Equipe Editorial ClubeDelphi DevMedia
[EMAIL PROTECTED]
[EMAIL PROTECTED]
www.micrologos.com.br - www.clubedelphi.net - www.delphirio.assespro-rj.org.br
> De: "voodoorv" <[EMAIL PROTECTED]>
>Para: [EMAIL PROTECTED]
>Assunto: Re: Dúvidaaplicação DATASNAP
>
>Bruno, valeu pela dica só encontrei um problema, quando passo o
>comando sql, pode ter algum dado no meio que é string e está em
>branco, aí dá erro quando monta o sql porque fica ,, no comando, por
>iso pensei em passar por parâmetros !
>
>Alguma idéia ?
>
>Valeu
>
>Ricardo.
>
>
>--- Em delphi-br@yahoogrupos.com.br, "Bruno Lichot" <[EMAIL PROTECTED]>
>escreveu
>>
>> Salve Dr. Ricardo
>>
>> Seguinte, naum precisa usar o execsql, crie os comandos e use o
>executedirect
>> do sqlconnection.
>>
>> te sugiro fazer mais simples a sua função, vai la na typelibrary
>defina uma
>> função ExecutaSQL, q recebe um parametro Comando do tipo VARIANT*.
>>
>> e no corpo da função vc faz o seguinte
>>
>> var
>> sSQL : String;
>> begin
>> sSQL := Comando;
>> SqlConnection.ExecuteDirect( sSQL );
>> end;
>>
>>
>> e no cliente vc chama assim
>>
>> var
>> sSQL : String;
>> begin
>> sSQL := ' Insert Into QQCoisa Values QQCoisa Where QQCoisa ';
>> DconConnection.AppServer.ExecutaSQL( sSQL );
>> end
>>
>> Ainda em tempo, duas observações, evite usar a estrutura With(e
>mto ruim para
>> dpurar e as vezes causa alguns erros), não aconselho mais o uso de
>COM+ esta
>> lento e com varias imcompatibilidades e problemas de distribuição,
>use Borland
>> Socket Server.
>>
>> as ordens, qq coisa e so falar.
>>
>>
>> []´s
>> Bruno Lichot
>> Micrologos Dream Team
>> Equipe Editorial ClubeDelphi DevMedia
>>
>> [EMAIL PROTECTED]
>> [EMAIL PROTECTED]
>>
>> www.micrologos.com.br - www.clubedelphi.net -
>www.delphirio.assespro-rj.org.br
>>
>>
>>
>>
>>
>> > De: "voodoorv" <[EMAIL PROTECTED]>
>> >Para: [EMAIL PROTECTED]
>> >Assunto: Dúvida aplicação DATASNAP
>> >
>> >Olá pessoal, estou com um problema fiz uma aplicação datasnap,
>que
>> >tem uma aplição servidora com um SQLConnectio, um SQLDataSet e um
>> >DataSetProvider.
>> >Na minha aplicação cliente tenho um TDComconnection, para acessar
>a
>> >aplicação servidora.
>> >Na hora de inserir um documento, fiz uma rotina na aplicação
>> >servidora assim:
>> >
>> >with SQLDataServidor do
>> > begin
>> > Close;
>> > CommandText:='';
>> > CommandText:='INSERT INTO TBSA (CDORDEM, CDTPSA, DTENTRADA) '+
>> > ' VALUES (:CDO, :TPSA, :DT)';
>> > Params[0].AsInteger :=StrToInt(ord);
>> > Params[1].AsInteger :=StrToInt(tp);
>> > Params[2].AsDateTime :=StrToDate(dt);
>> > ExecSql;
>> > end;
>> >
>> >na minha aplicação servidora tenho metodo que chama inssa, que
>tem
>> >três parâmetros: (ord, tp, dt)
>> >
>> >Na aplicação cliente chama meu método assim :
>> >
>> >dm.Conexao.AppServer.inssa('10', '20', DateToStr
>(dtentrada.Date) );
>> >
>> >mas quando faço isso me retorna o erro: unassigned code
>> >
>> >Alguem pode me ajudar ?
>> >
>> >Grato
>> >
>> >Ricardo
>> >
>> >
>> >
>> >
>> >
>> >--
>> ><<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>> >
>> >
>> >
>> >Links do Yahoo! Grupos
>> >
>> >
>> >
>> >
>> >
>> >
>> >
>> >
>>
>
>
>
>
>
>
>--
><<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
