kuroi

você tb não precisa por seu nome no titulo do tópico...

sim: DateDiff ("yyyy", rsNiver("dob"), Now)

faca assim: <% do while not rsNiver.EOF %> <tr> <td><font face="arial,helvetica" size="1"><%=rsNiver("username")%></font></td> <td><font face="arial,helvetica" size="1"><%=rsNiver("dob")%></font></td> </tr> <% rsNiver.MoveNext Loop %> 01/01/1999 deve ser a data de aniversario dele. não é isso q você quer? porque você selecionou todos q fazem aniversario nesse mes e não somente os q fazem aniversario hoje...

o certo é CreateObject.

veja aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=70997 http://scriptbrasil.com.br/forum/index.php?showtopic=28873

so pra saber...

Jony, seu codigo ta errado. e tb da pra simplificar e deixar só uma linha. faca isso: sqlNiver = " SELECT * FROM tabela WHERE Month(dataaniversario) = " & month(now) Mateus, pode estar tudo junto, faca assim q vai dar certo. o unico problema é o caso de sua data estar como campo string e não como data. nesse caso faca: sqlNiver = " SELECT * FROM tabela WHERE Month(CDate(dataaniversario)) = " & month(now)

não entendi. você quer q, quando eu selecione um item do combobox, o preço apareca num label, por exemplo? então faca isso no evento click do combobox. veja a propriedade listindex do combo. por exemplo, se no combo eu tiver, nessa ordem: o listindex é 0 para VECTRA, 1 para FIAT e 2 para GOL.

isso funciona em asp: Function Soma(x As Integer, y As Integer) As Integer ? o certo não seria apenas: Function Soma(x, y)?

desvio2 é mesmo uma variavel? não é um controle, uma checkbox? tente isso: If desvio2 Then Exit Sub End If

poste o codigo da sub, o codigo de quando c chama e a linah q da o erro (22) pra gente ver se consegue te ajudar. ou tenta tirar o call, deixe so o nome da sub na hora de chamar. e tb se cadastra ae no forum...

sim. me passe seu e-mail q tenho alguns relatorios com relacionamento q eu fiz, alguns bem simples e outros meio complicados. so não garanto q eu tenha tempo pra mandar hoje...

veja: http://scriptbrasil.com.br/forum/index.php...=0entry324565

você fez o seguinte: clique com o botao direito na pasta onde esta o banco, abra propriedades e ponha na aba Compartilhamento. selecione a opcao Compartilhar Pasta e configure as permissoes (permita tudo). ? não tenho certeza se é isso mesmo porque no pc aqui do trampo não tenho IIS. se não me engano o cyberalexxx ou o dark0 postou com mais detalhes esse procedimento mas não consegui achar o post. se o q eu fiz não funcionar procure por esse post. se não der, não sei mais o q fazer... aproveita tb pra se cadastrar no forum...

da uma olhada aqui: http://scriptbrasil.com.br/forum/index.php...=0entry148642 da proxima vez posta no forum asp e so uma vez.

no arquivo .rpt as duas tabelas devem estar adicionadas. uma delas deve ter um campo chave e você deve linkar um dos campos da outra tabela com a chave. no seu caso a chave deve ser esse campo NumeroAvaliacao. caso não seja possivel adicionar essa chave em nenhuma das duas tabelas (no caso de existirem registros com valores repetidos no campo), você deve fazer uma consulta SQL juntando estas duas tabelas com INNER JOIN (ou OUTER JOIN) e usar essa consulta como database no .rpt. tb tem um jeito d passar um select direto de um recordset do visual basic para o relatorio mas é meio complicado, recomendo usar mesmo a consulta, mas se quiser fala ae q eu te explico como faz...

em q parte do codigo esta localizado este if?

é verdade... então se assim não funcionou, em vez de Exit Do tente Exit While. se tb não funcionar troque: while not rsHoje.eof por Do while not rsHoje.eof e wend por Loop e ponha o Exit Do.

depois do primeiro movenext, ponha na linah de baixo: If rsHoje.EOF Then Exit Do ve se é isso...

tenta ver no evento Change ou KeyDown do text box, depende de como você qeur exatamente. If Len(Text1.Text) = Text1.MaxLength And Len(Text1.Text) = Text1.SelStart Then SendKeys "{TAB}"

ta. mas faca assim: <% rsHoje.Movenext wend %></table><% else %> e tire o </table> de cima. não da certo? .. ... olhando agora, onde você abre essa tabela? se você abre antes do primeiro if, o certo é você fechá-la depois do último end if, pois se not rsHoje.eof (olha a primeira linha) ele não vai fechar a tabela.

você tem q declarar: Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long e na hora de chamar (no clique do botao), faca: Call sndPlaySound("arquivo.wav", 0) da uma olhada aqui tb: http://www.macoratti.net/showzeca.htm

você esta pondo o </table> dentro do while, quando ele deveria estar depois. pois a tabela so vai acabar depois de por todos os registros e sair do while. do jeito q esta ele vai passar pelo </table> já no primeiro e vai fechar a tabela.

não, nesse caso não precisa de end if (acho).

ou você faz assim: <% if rsHoje("hora") < 10 then response.write "0" & rsHoje("hora") else response.write rsHoje("hora") end if%>:00</td> ou você faz assim: <% if rsHoje("hora") < 10 then response.write "0" & rsHoje("hora") else response.write rsHoje("hora") %>:00</td> se todo o codigo do if estiver na mesma linha, todo o codigo do else tb deve esta e viceversa.