Clique abaixo para nos ajudar
Login

Esqueci minha senha

Estamos no Facebook
Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

Quem está conectado
5 usuários online :: Nenhum usuário registrado, Nenhum Invisível e 5 Visitantes :: 2 Motores de busca

Nenhum

[ Ver toda a lista ]


O recorde de usuários online foi de 468 em 1/3/2012, 10:43
Últimos assuntos
USAR REPORT FORM

30/12/2016, 09:06 por AJC

Pessoal bom dia,
Estou com um grande problema, já pesquisei muita coisa sobre report form, mas o …

Comentários: 3

Impressora Ticket

15/11/2016, 09:20 por clima238

Bom dia,
Por favor alguém me explique porque o código abaixo imprime no ecrã em vez do printer: …

Comentários: 2

Visite meu canal no Youtube

20/1/2017, 00:45 por ImRicoh

VFP Unlimited


Comentários: 0

Bloquear edição do ListBox

17/6/2010, 15:13 por Julio

Pessoal

Boa Tarde!

Tnho uma listbox apenas para exibir o resultado.
Preciso bloquear a listbox …

Comentários: 17

automação do mozilla e chrome

15/1/2017, 12:16 por Handerson Mildroz

Boa tarde a todos!

Sou iniciante no VFP. Preciso de ajuda, pois tenho um código que usa o …

Comentários: 0

Estatísticas
Temos 6991 usuários registrados
O último usuário registrado atende pelo nome de cpmacedo

Os nossos membros postaram um total de 9 mensagens em 3 assuntos

aspas no select

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Resolvido aspas no select

Mensagem por m@r<3|o em 2/6/2010, 17:36

Pessoal ia fazer a pergunta e ja to com o rascunho
acho que o Marcos vai saber essa
marcos esta me dando erro esse strtran

Código:
SELECT strtran(cadrecmov.rec_cliec,";","",""), strtran(cadrecmov.rec_venc,";","","") ; 
FROM cadrecmov;
where cadrecmov.rec_venc > this.Parent.txtmens_dtem.value ;
INTO CURSOR vencimentos ;
ORDER BY rec_cliec
Copy to mensalidade.txt SDF
use in vencimentos

e preciso gerar com " " " mais ai é comando interno sql fox essa " ai .... tem que fazer como string ou mesmo acho que o strtran resolve

"12453","maria","
"124587","Alex Santos","
"123456","Anderson Dantas","

queria deixar desse jeito

Abs
Marcelo Fazan

m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: aspas no select

Mensagem por hugo em 2/6/2010, 18:09

se voce quer usar aspas duplas dentro, use aspas simples fora

eh vice-versa

teste e nos fale ( no for DOS funfava assim tranquilo )

valeu, aguardamos retorno!

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: aspas no select

Mensagem por m@r<3|o em 2/6/2010, 18:46

percebi isso logo depois de postar

Código:
SELECT '"',cadrecmov.rec_cliec,'","', STRTRAN(DTOC(cadrecmov.rec_venc),"/","/"),'","' ;

m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: aspas no select

Mensagem por m@r<3|o em 2/6/2010, 20:02

cara, se nao foose o VB pra me salvar com o Acess tava ferrado
mais esta sendo uma experiencia boa

consegui .... importar o txt pro MDB pensei que nao ia conseguir esta com o saquinho cheio Basketball

"00001","30/06/10","
"00002","15/06/10","
"00003","22/06/10","
"00004","18/06/10","
"00005","21/06/10","
"00006","22/06/10","


Código:
Dim strFileName    As String
   
    If Right(txtArquivo.Text, 4) <> ".txt" Then
        MsgBox "Nome de arquivo inválido." & vbLf _
        & "Favor digitar o nome do aquivo com extensão .txt", vbCritical, "Sistema de Trenferência"
        Exit Sub
    End If
   
    strFileName = App.Path & "\" & txtArquivo.Text
   
    Open strFileName For Input As #1
    Dim intCod, strData, linha, linha2, linha3 As String
    Dim p_virgula, u_aspas, s_virgula As Integer
   
    Do Until EOF(1)
        linha = strFileName
       
        Line Input #1, linha
        p_virgula = InStr(linha, ",")
        linha2 = Mid(linha, p_virgula + 1)
        s_virgula = InStr(linha2, ",")
       
        intCod = LTrim(Mid(linha, 2, p_virgula - 3))
        strData = LTrim(Mid(linha2, 2, s_virgula - 3))
       
      Sql = "UPDATE buscar SET data = '" & strData & "'"
      Sql = Sql & " Where cod_fox = '" & intCod & "'"
      cn.Execute Sql
       
       
    Loop
    Close #1
    cn.Close
   
    MsgBox "Transferência concluida com sucesso", vbExclamation
    txtArquivo.Text = ""

m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: aspas no select

Mensagem por Marcos Guedes em 2/6/2010, 21:02

Marcelo, ainda estais com dificuldade?

Você disse que conseguiu importar o TXT para MDB.
Isto que dizer que o tópico do seguinte link está resolvido?
- [Você precisa estar registrado e conectado para ver este link.]

scratch

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Resolvido Re: aspas no select

Mensagem por m@r<3|o em 2/6/2010, 21:14

esse esta resolvido no caso

m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: aspas no select

Mensagem por hugo em 3/6/2010, 10:09

poxa marcos

eu matei a onca primeiro e voce ficou com o merito da facada

lol!

_________________
"A tristeza é a falta de alegria, mais sem ela eu não poderia entender a alegria do fato de que a felicidade existe!"
Helio Leites - [Você precisa estar registrado e conectado para ver este link.]

hugo
Usuário 5 Estrelas
Usuário 5 Estrelas


Voltar ao Topo Ir em baixo

Resolvido Re: aspas no select

Mensagem por m@r<3|o em 3/6/2010, 10:45

capitão general coronel
vo te dar um ponto pq vc chorou !


afro cherry farao

m@r<3|o
Participante Assíduo
Participante Assíduo


Voltar ao Topo Ir em baixo

Resolvido Re: aspas no select

Mensagem por Marcos Guedes em 3/6/2010, 10:59

[Você precisa estar registrado e conectado para ver este link.] escreveu:poxa marcos

eu matei a onca primeiro e voce ficou com o merito da facada

lol!
hahahahaha
Irei te dar mais um ponto por causa disso!
Chora mais não!
hahahahahaha

Laughing lol!

_________________
Marcos Guedes - Programador e desenvolvedor Web.


Visite o nosso portal:
[Você precisa estar registrado e conectado para ver este link.]

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum