Login

Esqueci minha senha

Buscar
 
 

Resultados por:
 


Rechercher Busca avançada

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

Nenhum

[ Ver toda a lista ]


O recorde de usuários online foi de 337 em 27/12/2010, 08:00
Brasília
Estamos no Twitter
Nossa Comunidade
Nosso Grupo
Últimos assuntos
Ajuda com Imagens no MySQL

25/1/2012, 08:53 por megasoft

Olá vou resumir aqui como estou fazendo.
Código:
xFoto_Prod = …


Comentários: 7

Registrar OCX Windows Seven

29/7/2011, 11:48 por Julio

Bom Dia Pessoal do Forum

Alguem ja teve que registrar alguma OCX no windows seven?
Tentei …

Comentários: 15

Criar Variáveis em sequencia

18/1/2012, 08:19 por BrunoMesquita

Olá pessoal como faço para gerar variáveis em sequencia, tipo: Se tenho 6 registros cria-se 6 …

Comentários: 6

No final a Impressora não Ejecta cem corta o papel

19/1/2012, 06:46 por clima238

bom dia
o seguinte código imprime correctamente, só no fim não ejecta nem corta o papel,
alguem …

Comentários: 1

Dirf

4/2/2012, 19:25 por mauro victoria

Boa noite estou com dificuldade de entender o layout da dirf , alguem tem um arquivo txt para que …

Comentários: 1

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

Os nossos membros postaram um total de 13981 mensagens em 1959 assuntos

Dias da Semana - <

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

Resolvido Dias da Semana - <

Mensagem por m@r<3|o em 31/7/2010, 14:27

Pessoal como saber os dias da semana

segunda
terça
quarta
quinta
sexta
sabado
domingo

para colocar no reporter

Abs
Obrigado
Marcelo Fazan

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


Voltar ao Topo Ir em baixo

Resolvido Re: Dias da Semana - <

Mensagem por Marcos Guedes em 31/7/2010, 14:53

Veja se lhe ajuda:
Código:
CLEAR

?diasemanaingles(DATE())
?diasemanaportugues(DATE())

FUNCTION diasemanaingles AS STRING
   LPARAMETERS dt AS DATE
   RETURN CDOW(DATE())
ENDFUNC

FUNCTION diasemanaportugues AS STRING
   LPARAMETERS dt AS DATE
   LOCAL ndia AS INTEGER
   LOCAL cdia AS STRING
   m.dia = DOW(dt)
   DO CASE
      CASE (m.dia==1)
         m.cdia= "Domingo"
      CASE (m.dia==2)
         m.cdia= "Segunda-feira"
      CASE (m.dia==3)
         m.cdia= "Terça-feira"
      CASE (m.dia==4)
         m.cdia= "Quarta-feira"
      CASE (m.dia==5)
         m.cdia= "Quinta-feira"
      CASE (m.dia==6)
         m.cdia= "Sexta-feira"
      CASE (m.dia==7)
         m.cdia= "Sábado"
      OTHERWISE
         m.cdia=""
   ENDCASE
   RETURN m.cdia
ENDFUNC

_________________
Marcos Guedes - Programador e desenvolvedor Web.

Convidado, seja nosso seguidor no Twitter:
twitter.com/programacaobras

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Resolvido Re: Dias da Semana - <

Mensagem por m@r<3|o em 31/7/2010, 15:23

Obrigado Marcos

Obrigado Abs
Marcelo Fazan

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


Voltar ao Topo Ir em baixo

Resolvido Re: Dias da Semana - <

Mensagem por lardecristo em 31/7/2010, 16:20

Mais um exemplo.

Código:
MESSAGEBOX(TrazDiaSemanaExtenso(DATE()))

FUNCTION TrazDiaSemanaExtenso(ldData as Date)
   LOCAL lsExtenso as String, lnDia as Integer
   LOCAL lsAux as String
   lnDia = DOW(ldData)
   lsAux = "            Domingo      Segunda-FeiraTerça-Feira  Quarta-Feira Quinta-Feira Sexta-Feira  Sábado "
   lsExtenso = ALLTRIM(SUBSTR(lsAux,(13*m.lnDia)+1,13))
RETURN m.lsExtenso

lardecristo
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Dias da Semana - <

Mensagem por Marcos Guedes em 31/7/2010, 16:58

lardecristo, teu exemplo me inspirou a criar outro:
Código:
CLEAR
?diasemanaportugues2(DATE())

FUNCTION diasemanaportugues2 AS STRING
   LPARAMETERS dt AS DATE
   LOCAL dias AS STRING
   m.dias = "Domingo Segunda-Feira Terça-Feira Quarta-Feira Quinta-Feira Sexta-Feira Sábado"
   RETURN GETWORDNUM(m.dias,DOW(m.dt))
ENDFUNC

Very Happy

_________________
Marcos Guedes - Programador e desenvolvedor Web.

Convidado, seja nosso seguidor no Twitter:
twitter.com/programacaobras

Marcos Guedes
Webmaster
Webmaster


Voltar ao Topo Ir em baixo

Resolvido Re: Dias da Semana - <

Mensagem por lardecristo em 31/7/2010, 17:18

Legal, este GETWORDNUM, eu nunca tinha usado, mais uma para a minha lista.

lardecristo
Participa Bastante
Participa Bastante


Voltar ao Topo Ir em baixo

Resolvido Re: Dias da Semana - <

Mensagem por hugo em 31/7/2010, 18:41

parabens

reputados

a proposito, adivinharam a pergunta que ia postar aqui

hauahauahauahauahau

_________________
"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: Dias da Semana - <

Mensagem por hugo em 31/7/2010, 18:42

A PROPOSITO

quem faz perguntas tao boas assim, que trazem pro forum
respostas tao uteis, tambem merece reputacao!


pensem nisto!

_________________
"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

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