marcus Gemeos

Não entendi muito... :huh:

Olá amigo, Já tentei desse modo... mas não dar certo por que a vairavel <%=i%> não tem valor algum e dar o seguinte resultado lista2.asp?pagina= entendes?? o igual "=" fica vazio... :( Não tem outro jeito? Obrigado! Marcus

Olá pessoal, Eu queria que essa páginação os números em menu suspenso! Mas não consigo na parte de "action", como chamar? do jeito que está duplica o menu ou dar erro! <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1"> <tr> <td width="100%"> <%For i = 1 to rsLista.PageCount%> <form name="form2" method="POST" action="lista2.asp?pagina=<%=i%>"> <p align="center"> <select size="1" name="D1" style="font-family: Verdana; font-size: 10 px; border-style: solid; border-width: 1" OnChange="document.form2.submit()"> <option selected value="Nº de página">Nº de página</option> <option value="<%=i%>"><%=i%><% Next %> </option> </select></p> </form> </td> </tr> </table>

Ok! conforme não consiga... dou uma postada aqui! ;) Amigo... aproveitando... nas strings de SQL Server tem usuario e senha, mas como faço para colocar ou saber qual são os usuarios e senhas do SQL Server para em seguida por nas strings? Pois o mesmo já se encontra instalado em minha máquina! Obrigado!! Marcus

Olá pessoal, Eu gostaria de saber, guando eu converter o meu banco de dados Access para SQL Server, eu mudo a string de conexão e algo mais eu mudo na programação? Como acontece? E alguém sabe onde eu acho uma apostila em relação ao SQL Server? precisso! Obrigadão! Marcus

Olá amigo, Deu certo... pe por que eu estava colocando assim "&.&" e não assim &"."& ;) Valeu mesmo!!!! :D Marcus

Olá pessoal, Estou quebrando a cabeça para poder colocar um ponto "." entre o nome do arquivo e a extensão! Alguém poderia me ajudar? Abaixo segue o código: VarPonto = "." Set ObjetoFSO = Server.CreateObject("Scripting.FileSystemObject") extensao = ObjetoFSO.GetExtensionName(caminho_foto) VarRenFoto = session("usuarioVend") "&VarPonto&" extensao Obrigadão!! Marcus

Olá pessoal, Dar para desenvolver... arquivo="c:\pasta\arquivo.jpg" Set ObjetoFSO = Server.CreateObject("Scripting.FileSystemObject") extensao = ObjetoFSO.GetExtensionName(arquivo) Response.Write "tipo do arquivo: " & extensao

Olá pessoal, Eu gostaria de saber como faço para renomear arquivos para realização de uploads? Eu sei que é com FSO, mas como faço para apontá-lo? Por que realmente eu queria renomear o arquivo, e como faço para salvar esse nome no banco de dados??? E não perder a extensão do arquivo!!! Precisso! Marcus

Olá amigo, É realmente só falta a renomeção de arquivos! Quem tiver disposição... Fico feliz em ter lhe ajudado! Abração! Marcus

Olá amigo, Mas guando eu chego na decima em diante, não mostra mais os números... pois queria guando chegasse no decimo, surgia mais dez números... os restantes ocultos entendes? Obrigadão! Marcus

Olá pessoal, Como faço com o código abaixo para limitar a exibição de páginas? três páginas por exemplo? Precisso! Obrigado!! Marcus IF intpagina > 1 then %> <align="center"><font color="#FFFFFF" size="2" face="Verdana"><span style="background-color: #808080">&nbsp;<a href="paginacao.asp?pagina=<%=intpagina - 1%>"><font color="#FFFFFF"><b>Anterior</b></font></a>&nbsp;</span><% END IF %> <% For i = 1 to Rs.PageCount%> <align="center"><font color="#FFFFFF" size="2" face="Verdana"><span style="background-color: #808080">&nbsp;<a href="paginacao.asp?pagina=<%=i%>"><font color="#FFFFFF"><b><%=i%></b></font></a>&nbsp;</span> <% Next %> <% 'Se não estivermos no último registro contado, então é mostrado o link p/ a próxima página IF strcomp(intpagina,rs.PageCount) <> 0 then %> <align="center"><font color="#FFFFFF" size="2" face="Verdana"><span style="background-color: #808080">&nbsp;<a href="paginacao.asp?pagina=<%=intpagina + 1%>"><font color="#FFFFFF"><b>Próxima</b></font></a>&nbsp;</span> </font></font></font> <% END IF %>

Ola, alguém sabe como pegar uma foto de uma pessoa e colocar em desenho mesmo no photopaint? Obrigado!

Obrigado!

Olá amigo, Eu fiz uma doidice aqui e funcionou... eu chamaei outra página trabalhei com session e tudo mais! Taqui funcionando! :) Valeu!! Marcus

Olá, eu usei o request.cookies e funcionou... Marcus

Olá pessoal, Por que o comando session não esta segurando as informações guando passa em outra página antes? Para depois chegar na pagina onde vai imprimir a session? Obrigado! Marcus

WHERE = Codigo e não WHERE = Usuario entendes? Por numero e não texto! Marcus

Olá amigo, Acho que só atualiza se for where por código! :( Marcus

Olá amigo, Deu o seguinte erro: Tipo de erro: Microsoft OLE DB Provider for ODBC Drivers (0x80040E14) [Microsoft][Driver ODBC para Microsoft Access] Erro de sintaxe na instrução UPDATE. /mercado/compra_fechada.asp, line 79 Para: sqlUpdateUsuarios = "UPDATE usuarios SET" sqlUpdateUsuarios = sqlUpdateUsuarios & "Debitos = '" & VarDebitosUsuario & "', " sqlUpdateUsuarios = sqlUpdateUsuarios & "Cod_Atualizacao = " & varCodAtualizar sqlUpdateUsuarios = sqlUpdateUsuarios & " WHERE usuario = '" & VarUsuario &"'" Response.Write sqlUpdateUsuarios Obrigado! Marcus

Deu esse erro: O comando de texto não foi definido para o objeto de comando. /mercado/compra_fechada.asp, line 78 e se eu colocar as "" fica assim: Tipo de erro: Erro de compilação do Microsoft VBScript (0x800A0401) Fim da instrução esperado /mercado/compra_fechada.asp, line 62, column 37 response.write "sqlUpdateUsuarios = "UPDATE usuarios SET"" response.write "sqlUpdateUsuarios = "UPDATE usuarios SET"" response.write "sqlUpdateUsuarios = sqlUpdateUsuarios & "Debitos = '" & VarDebitosUsuario & "', "" response.write "sqlUpdateUsuarios = sqlUpdateUsuarios & "Cod_Atualizacao = " & varCodAtualizar" response.write "sqlUpdateUsuarios = sqlUpdateUsuarios & " WHERE usuario = '" & VarUsuario &"'"" Obrigado!!! Marcus

Está dando o erro na paginação 02 Tipo de erro: Erro de tempo de execução do Microsoft VBScript (0x800A0005) Chamada de procedimento ou argumento inválido: 'left' /paginacao/Default.asp, line 16 E agora? Marcus

Olá amigo, Está dando o seguinte erro: Erro de sintaxe na instrução UPDATE. /mercado/compra_fechada.asp, line 78 sqlUpdateUsuarios = "UPDATE usuarios SET" sqlUpdateUsuarios = sqlUpdateUsuarios & "Debitos = '" & VarDebitosUsuario & "', " sqlUpdateUsuarios = sqlUpdateUsuarios & "Cod_Atualizacao = " & varCodAtualizar sqlUpdateUsuarios = sqlUpdateUsuarios & " WHERE usuario = '" & VarUsuario &"'" Não sei o que faço mais! Marcus

:lol:

Olá pessoal, Como faço com o código abaixo, limite os números de paginação e o restante fique com "..." reticencias? Pois se tiver 1000 páginas, vai aparecer 1000 números na paginação! <%'Vamos verificar se não é a página 1, para podermos colocar o link “anterior”. IF intpagina > 1 then 'AND intpagina <> 2 Then %> <align="center"><font color="#FFFFFF" size="2" face="Verdana"><span style="background-color: #808080">&nbsp;<a href="dados_de_clientes.asp?pagina=<%=intpagina - 1%>"><font color="#FFFFFF"><b>Anterior</b></font></a>&nbsp;</span><% END IF %> <% For i = 1 to rs.PageCount%> <align="center"><font color="#FFFFFF" size="2" face="Verdana"><span style="background-color: #808080">&nbsp;<a href="dados_de_clientes.asp?pagina=<%=i%>"><font color="#FFFFFF"><b><%=i%></b></font></a>&nbsp;</span> <% Next %> <% 'Se não estivermos no último registro contado, então é mostrado o link p/ a próxima página IF strcomp(intpagina,rs.PageCount) <> 0 then %> <align="center"><font color="#FFFFFF" size="2" face="Verdana"><span style="background-color: #808080">&nbsp;<a href="dados_de_clientes.asp?pagina=<%=intpagina + 1%>"><font color="#FFFFFF"><b>Próxima</b></font></a>&nbsp;</span> </font></font></font> <% END IF %> </p> <p align="center"> &nbsp;</p> </body> </html> <% Set rs = Nothing end if %> Precisso! Obrigadão! Marcus