Ir para conteúdo
Fórum Script Brasil

rafaeltejeda

Membros
  • Total de itens

    88
  • Registro em

  • Última visita

Tudo que rafaeltejeda postou

  1. Pessoal estou precisando de uma ajuda estou implementando uma busca em um site e gostaria de usar o like a sintaxe é essa select * from view_produtos where produto_titulo like 'roupa' and produto_habilitado = true order by produto_cadastro desc; não retorna nada só se eu digito a frase inteira que seria Roupas Infantis, o like não seria para quando digitar uma palavra ele busque por toda a palavra no meu caso não precisaria digitar roupas infantis e só roupas, alguém pode me ajudar ?
  2. Ola pessoal estou criando uma consulta em mysql que retorne um valor que estou digitando em um textbox, o problema é eu tenho uma tabela funcionarios com vários clientes cadastrados e tenho um funcionario la com o nome teste e quando eu procuro por ele na minha textbox ele me retorna todos os clientes cadastrados a string que estou usando é essa: "SELECT funcionario_funcionario.funcionario_id, funcionario_funcionario.funcionario_nome, funcionario_funcionario.funcionario_telefone, funcionario_funcionario.funcionario_id, funcionario_cargo.funcionario_cargo_nome, funcionario_cargo.funcionario_cargo_id FROM funcionario_funcionario INNER JOIN funcionario_cargo on funcionario_cargo.funcionario_cargo_id = funcionario_funcionario.funcionario_cargo_id where funcionario_funcionario.funcionario_id = '" & txt_funcionarioLIST.Text & "'" Alguém pode me dar uma ajudinha, já tentei varias coisas mas não ta indo. Grato Rafael Tejeda
  3. eu criei um datalist aonde eu listo umas imagens vindas do banco de dados mysql mySelectQuery = "select id_imagem, imagem_nome from imagens_imagens;" daMySQl = New MySqlDataAdapter(mySelectQuery, myConnString) dsDataset = New DataSet daMySQl.Fill(dsDataset, "imagens_imagens") dl_imagens.DataSource = dsDataset dl_imagens.DataBind() myConnString.Close() até ai tudo bem, agora eu gostaria de excuir essas imagens pelo datalist eu coloquei um linkbuttom e um img de dp ItemTemplate do datalist mas pelo que pesquisei um comportamento click não funciona dentro do datalist alguém poderia me ajudar como excluir um item do banco ou no meu caso uma foto pelo datalist. <asp:DataList ID="dl_imagens" runat="server" RepeatDirection="Horizontal" RepeatColumns="4" ShowFooter="False" ShowHeader="False" CssClass="dl_imagem"> <ItemTemplate> <div class="listaimagem"> <div class="removeImagem"> <asp:LinkButton ID="deleteImagem" runat="server" Text="X" CommandArgument="DELETE FROM [imagens_imagens WHERE ID = ?"></asp:LinkButton> </div> <ul> <li><img src="../Resources/images/up_imagens/<%# Container.DataItem("imagem_nome")%>" alt="" width="100px" /></li> <li><%# Container.DataItem("imagem_nome") %></li> </ul> </div> </ItemTemplate> </asp:DataList>
  4. Estou montanto um Cascading Dropdown em asp.net com vb mais estou tendo problema estou montando assim: criei uma função: Private Sub CarregaGrupo() Dim myConnString As MySqlConnection Dim daMySQl As MySqlDataAdapter Dim dsDataset As DataSet Dim mySelectQuery, erro As String Try 'myConnString = New MySqlConnection("server=localhost; user id=root; password=root; database=banco_sistema") myConnString = New MySqlConnection("server=mysql03.redehost.com.br; user id=mr2digital; password=mr@digit@l1; database=banco_sistemas") mySelectQuery = "select id_grupo, grupo_titulo from noticias_grupo where grupo_habilitado = true;" daMySQl = New MySqlDataAdapter(mySelectQuery, myConnString) dsDataset = New DataSet daMySQl.Fill(dsDataset, "noticias_grupo") Me.DDGrupo.DataSource = dsDataset Me.DDGrupo.DataMember = "noticias_grupo" Me.DDGrupo.DataTextField = "grupo_Titulo" Me.DDGrupo.DataValueField = "id_grupo" Me.DDGrupo.DataBind() myConnString.Close() Catch ex As Exception erro_message.Text = ex.Message.ToString End Try End Sub que puxa os grupos de uma categoria e estou tentando puxar o subgrupo dessa categoria ai no evento SelectedIndexChanged eu coloquei Protected Sub DDGrupo_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs) Handles DDGrupo.SelectedIndexChanged Dim myConnString As MySqlConnection Dim daMySQl As MySqlDataAdapter Dim dsDataset As DataSet Dim mySelectQuery, erro As String Try Dim id_grupo As String = DDGrupo.SelectedValue 'myConnString = New MySqlConnection("server=localhost; user id=root; password=root; database=banco_sistema") myConnString = New MySqlConnection("server=mysql03.redehost.com.br; user id=mr2digital; password=mr@digit@l1; database=banco_sistemas") mySelectQuery = "select id_sgrupo, sgrupo_titulo from noticias_sgrupo where id_grupo = " & id_grupo & ";" daMySQl = New MySqlDataAdapter(mySelectQuery, myConnString) dsDataset = New DataSet daMySQl.Fill(dsDataset, "noticias_sgrupo") Me.DDSubGrupo.DataSource = dsDataset Me.DDSubGrupo.DataMember = "noticias_sgrupo" Me.DDSubGrupo.DataTextField = "sgrupo_Titulo" Me.DDSubGrupo.DataValueField = "id_sgrupo" Me.DDSubGrupo.DataBind() Me.DDSubGrupo.Enabled = True myConnString.Close() Catch ex As Exception erro_message.Text = ex.Message.ToString End Try End Sub o problema é que quando seleciono o grupo na caixa 1 na caixa 2 ele sempre mostra o primeiro registro e não ta pegando o valor do grupo na caixa 1 para fazer select correspondente na caixa 2 alguém pode me ajudar estou recuperando o valor do id_grupo assim Dim id_grupo As String = DDGrupo.SelectedValue e o sql ta assim: select id_sgrupo, sgrupo_titulo from noticias_sgrupo where id_grupo = " & id_grupo & "; alguém pode me ajudar plisss. ah e os Dropdown estão dentro de um updatepanel att Rafael
  5. bom dia galera, estou com um problema estou criando um site e nele coloquei um updatepanel com um updateProgress para que ele me mostre a mensagem de carregando quando faço uma requisição na pagina, e coloquei dentro do updatePanel um modalpopupExternder para quando eu clico em um linkbuton ele abra o meu modal, até ai tudo bem, ele tá funcionando certinho, quando eu executo o projeto ele me mostra o modal , só que quando eu fecho ele e clico denovo no linkbutton ele não aparece mais, já pesquisei na web e aqui no forum e não consegui achar uma solução alguém poderia me dar uma ajudinha plisss. Grato Rafael
  6. Estou com um problema o meu servidor faz pouco mudou para o framework 4.0 e estou tendo problemas com eles pois eu criei um site no visual studio 2010 e mandei para o servidor e agora o servidor me retorna a seguinte mensagem de erro: System.UnauthorizedAccessException: Access to the path 'C:\Program Files\Reference Assemblies\Microsoft\Framework\' is denied. no meu visual studio local quando eu compilo o site ele mostra no navegador normal esse comportamento ele só tem no meu servidor de hospedagem e isso aconteceu quando mandei os arquivios do VS 2010, será que você poderia me dar uma ajuda isso eria alguma configuração minha ou no por parte do servidor, já tentei procurar em alguns foruns até tem pessoas que tenham o mesmo problema mas não tenho como mexer no servidor se for la o problema e na versão 3.5 funciona direitinho alguém já teve esse problema. o meu dominio é http://www.sosseg.com.br Atenciosamente Rafael Tejeda
  7. estou criando em flash um mapa do brasil que quando paro o mouse em cimas dos estados ele mostre as cidades que tem as lojas, tipo quando paro em cima do rio grande do sul ele mostra as cidades santa maria, porto alegre e pelotas até ai tudo bem o meu probplema é que eu queria que quando eu clicasse em cima de pelotas por exemplo ele abrisse uma pagina externa indo para essa cidade, eu coloquei o codigo no botão pelotas mas ele não funcio, e ele ta dentro de outro botão que é o do estado sera que alguém poderia me ajudar.
  8. Oi galera estou iniciando no Java e estou com um problema com o recaptcha do google eu coloquei ele dentro do meu formulário ele ta exibindo certinho mas quando eu submito o formulário ele faz a verificação do captcha com o código if (reCaptchaResponse.isValid()) { mas ele retorna sempre a mensagem de erro, esse é o código completo if ( reCaptchaResponse.isValid()) { out.print("Answer was entered correctly!"); } else { out.print("Answer is wrong"); } e ele sempre volta a mensagem Answer is wrong eu fiz os testes e e os valores estão passando certinho mas sempre da esse erro. alguém pode me ajudar. att. Rafael
  9. galera tenho uma tabela como o nome de pontos com um campo chamado pontos estou exibindo os pontos na minha pagina direitinho para cada produto só que no final da página gostaria de mostrar somado o total de pontos que o usuario tem já tentei com o select sum mas não consegui ele não me retornava o valor vinha em branco. alguém pode me ajudar na pagina o laioute esta assim: produto postos produto1 5 produto2 2 produto3 3 produto4 5 total de pontos: 15 (esse total eu gostaria criar) atenciosamente rafael
  10. galera eu preciso de outra ajuda, tem como eu importar informações ou fazer um sistema que eu pegue valores de uma tabela excel e mostre ele em minha pagina asp e essas mesmas informações salvar ela em um banco access tem como será que fui claro att. rafael tejeda
  11. valeu galera pela ajuda, problema resolvido fechar tópico
  12. desculpe mas não soube em que area postar, mas eu peguei pra desenvolver e queria saber mais ou menos quanto cobrariam se pegassem para desenvolver um site com essa configuração. att. rafael
  13. Galera um cliente meu me pediu pra desenvolver um portal de serviços quanto vocês cobrariam para desenvolver um site assim com administração de conteudo. ESTRUTURA DO PORTAL DA SPI 01 - LOGOMARCA DA SPI COM ANIMAÇÃO 02 - CHAT PERSONALIZADO PARA CLIENTES (SALA DE REUNIÕES VIRTUAL) 03 - CAMPO PARA QUE NOVOS PROFISSIONAIS SE CADASTREM NA SPI (BANCO DE CURRICULUM) 04 - CAMPO PARA SOLICITAÇÃO DE ATENDIMENTOS (ABERTURA DE CHAMADOS ONLINE PARA CLIENTES NOVOS COM No DO CHAMADO) 05 - CAMPO PERSONALIZADO PARA OS CLEINTES DE CONTRATOS (RECLAMAÇÕES/ABERTURA DE CHAMADOS COM No DO ATENDIMENTO) 06 - TREINAMENTO ONLINE COM OPÇÃO DOS ALUNOS ACOMPANHAREM O TREINAMENTO COM APRESENTAÇÃO DE SLIDES EM TEMPO REAL E QUE POSSAM ESCUTAR A VOZ DO INSTRUTOR, E LOGO APÓS O TREINAMENTO HAJA UM PERÍODO DE DEBATE ENTRE ALUNOS E INSTRUTOR) 07 - OPÇÃO DE DOWNLOADS DE APLICATIVOS (BAIXAR DIRETAMENTE DO PORTAL DA SPI OU QUE TENHA UM LINK DIRECIONANDO PARA DOWNLOAD EM OUTRO LOCAL) 08 - INFORMAÇÕES DE TODOS OS SERVIÇOS OFERECIDOS PELA SPI 09 - INFORMAÇÕES ADICIONAIS (CLIMA, TX DE CÃMBIO, ETC.) NO RODAPÉ DO PORTAL 10 - CAMPO COM DICAS PRÁTICAS ATUALIZADAS DIARIAMENTE (ex: você SABIA...) 11 - HOTLINKS (SITE DA HP, EPSON, PCCHIPS, SUPERDOWNLOADS, ETC.) att. rafael
  14. ai ele ta me mostrando o registro em coluna ex 1: registro registro registro registro registro registro registro e eu queria mostrar assim ex 2: registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro registro e eu tinha visto um script que adapitaram esse código para mostrar igual ao exemplo 2 mostrando os registros lado a lado
  15. ola galera uma vez mechendo aqui no forum eu achei um script de visualização de registro em linhas ou seja igual a de uma loja virtual eu tenho o script para ver os registro em uma coluna o código é esse: <% On Error Resume Next Set Conn = Server.CreateObject("Adodb.Connection") Conn.ConnectionString = "DBQ=" & Server.MapPath("bancoDADOS") & ";" Conn.ConnectionString = Conn.ConnectionString & "Driver={Microsoft Access Driver (*.mdb)};" Conn.Open 'objeto recordset Set RS = Server.CreateObject("Adodb.RecordSet") RS.PageSize = 4 sql = "SELECT * from REGISTRO" RS.Open sql, Conn,3,3 If RS.EOF then Response.Write "<p align=""center""><font size=""2"" face=""Tahoma""><br><br><br>Sistema ainda em desenvolvimento!!!</font></p>" Else If Request.QueryString("pagina")="" then intpagina=1 Else If Cint(Request.QueryString("pagina"))<1 then intpagina=1 Else If Cint(Request.QueryString("pagina"))>RS.PageCount then intpagina=RS.PageCount Else intpagina=Request.QueryString("pagina") End If End if End if End if RS.AbsolutePage=intpagina intrec=0 %> <% While intrec<RS.PageSize and not RS.EOF %> <table border="0" cellpadding="0" cellspacing="0" width="100%" height="41"> <tr> <td width="12">&nbsp;</td> <td> <font size="2" face="Tahoma" color="#000000"><%=rs("titulo")%></font> </td> <td> &nbsp;</td> <td width="9">&nbsp;</td> </tr> </table> <% RS.MoveNext intrec=intrec+1 Wend %> e eu vi esse mesmo código modificado para mostras os registros em linhas, já revirei o forum e não estou achando esse script sera que alguém poderia me dar uma ajuda obrigado att.. rafael
  16. eu gostaria de saber como eu poderia fazer uma rotina pra quando eu colocar um foco em um campo ele mudar de cor e quando perder o foco ele voltar na cor original, eu achei esse código na net em vb etentei refazelo no .net mas me da um erro esse é o código em vb: Private Sub Foco(ByRef txt As TextBox, Optional ByVal Cor As OLE_COLOR = vbYellow) With txt .SelStart = 0 .SelLength = Len(.Text) .BackColor = Cor End With End Sub Private Sub Text1_GotFocus(Index As Integer) Call Foco(Text1(Index), vbYellow) End Sub Private Sub Text1_LostFocus(Index As Integer) Call Foco(Text1(Index), vbWhite) End Sub esse é o que eu tentei refazer em .net Private Sub Foco(ByRef txt As TextBox, Optional ByVal Cor As ConsoleColor = ConsoleColor.Yellow) With txt .SelectionStart = 0 .SelectionLength = Len(.Text) .BackColor = Color.Yellow End With End Sub Private Sub Textbox1_GotFocus(ByVal Index As Integer) Call Foco(Text(Index), ConsoleColor.Yellow) End Sub Private Sub Text_LostFocus(ByVal Index As Integer) Call Foco(Text(Index), ConsoleColor.White) End Sub e ele da erro nessa trecho do código: Text(Index) fala que Erro 1 Valor do tipo 'Char' não pode ser convertido em 'System.Windows.Forms.TextBox'. alguém pode me ajudar grato
  17. galera como faço pra pedir uma confirmação quando fecho a minha aplicação no vb.net atenciosamente.
  18. ok florzinha, é isso mesmo já adapitei as minhas necessidades obrigado. tópico fechado
  19. então tirando o novo todos vão requisitar os dados do form é nisso q to na duvida atenciosamente
  20. salve galera bom vamos lá sera que teria como eu colocar em um formulario de cadastro varios botoes por exemplo (fig 1) em um mesmo form fig 1 igual ao dos programas de vb ou até mesmo quando criados no access atenciosamente
  21. caro amigo a parada é a seguinte, so c for agora pow a galera aqui sempre me deu a maior força não é agora q vou dar de mané o código ta i amigo <% '----------------------------------------------------- 'Funcao: getCodigoBarras(ByVal Numeros) 'Sinopse: Rotina para gerar códigos de barra padrão 2of5 ou 25. 'Parametro: ' Numeros: Números para a geração do código de barras 'Retorno: String (HTML com o código gerado) '----------------------------------------------------- Function getCodigoBarras(ByVal Numeros) Dim F, F1, F2, i, Texto Dim arrCodigoBarra(99) Dim htmlCodigoBarra htmlCodigoBarra = "" Const Fino = 1 Const Largo = 3 Const Altura = 50 if isempty(arrCodigoBarra(0)) Then arrCodigoBarra(0) = "00110" arrCodigoBarra(1) = "10001" arrCodigoBarra(2) = "01001" arrCodigoBarra(3) = "11000" arrCodigoBarra(4) = "00101" arrCodigoBarra(5) = "10100" arrCodigoBarra(6) = "01100" arrCodigoBarra(7) = "00011" arrCodigoBarra(8) = "10010" arrCodigoBarra(9) = "01010" For F1 = 9 To 0 Step -1 For F2 = 9 To 0 Step -1 F = F1 * 10 + F2 Texto = "" For i = 1 To 5 Texto = Texto & Mid(arrCodigoBarra(F1), i, 1) + Mid(arrCodigoBarra(F2), i, 1) Next arrCodigoBarra(f) = Texto Next Next End if 'Construindo o código HTML do código de barras 'Guarda inicial htmlCodigoBarra = htmlCodigoBarra & "<img src=p.jpg width=" & Fino & " height=" & Altura & " border=0>" htmlCodigoBarra = htmlCodigoBarra & "<img src=b.jpg width=" & Fino & " height=" & Altura & " border=0>" htmlCodigoBarra = htmlCodigoBarra & "<img src=p.jpg width=" & Fino & " height=" & Altura & " border=0>" htmlCodigoBarra = htmlCodigoBarra & "<img src=b.jpg width=" & Fino & " height=" & Altura & " border=0>" htmlCodigoBarra = htmlCodigoBarra & "<img" 'Response.Write htmlCodigoBarra Texto = Numeros if Len(Texto) Mod 2 <> 0 Then Texto = "0" & Texto End if 'HTML dos dados Do While Len(Texto) > 0 i = Cint(Left(Texto,2)) Texto = Right(Texto, Len(Texto)- 2) F = arrCodigoBarra(i) For i = 1 To 10 Step 2 If Mid(F, i, 1) = "0" Then F1 = Fino Else F1 = Largo End If htmlCodigoBarra = htmlCodigoBarra & " src=p.jpg width=" & F1 & " height=" & Altura & " border=0><img" If mid(F, i + 1, 1) = "0" Then F2 = Fino Else F2 = Largo End If htmlCodigoBarra = htmlCodigoBarra & " src=b.jpg width=" & F2 & " height=" & Altura & " border=0><img" Next Loop 'Guarda final htmlCodigoBarra = htmlCodigoBarra & " src=p.jpg width=" & Largo & " height=" & Altura & " border=0>" htmlCodigoBarra = htmlCodigoBarra & "<img src=b.jpg width=" & Fino & " height=" & Altura & " border=0>" htmlCodigoBarra = htmlCodigoBarra & "<img src=p.jpg width=1 height=" & Altura & " border=0>" 'Retornando a função getCodigoBarras = htmlCodigoBarra End Function 'Exemplo de geração do código de barras 'Substitua o valor do parâmetro abaixo pelo número do código de barras. Response.Write getCodigoBarras("7890552007601") %> pequem ele completo aqui download ae galerinha é engraçado c em outras areas da nossa sociedade tivesse a união q agente tem aqui o nosso pais ia pra frente valeu.
  22. ju acho q consegui achar o q você queria o padrão dos códigos de barras dos dvds é o ean13 da uma olhada nesse site: código ean13 e tb tenho o código em asp desse código para crialo ce caso você ainda não conseguiu me add no MSN que te passo rafaeltejedananet@hotmail.com obs.: caracas 10 pilas acho q vou desenvolver um tb rsss
  23. ju da uma olhada nesse link http://www.macoratti.net/vbcodbar.htm porque ai depende pra qual finalidade você quer usar o codigo de barra o código de barras que vem nas capas de dvd ou seja o código de barras é um código numero que o código do pais de origem da empresa e do produto nos casos dos que vem nos dvds no exemplo do link serve pra identificar banco, conta etc. no caso do sistema da locadora você pode usalo como uma id pra localizar o filme no sistema porque o leitor de código de barras nada mais é do que um leitor funciona assim em vez de você digitar o código do produto ou do filme no campo buscar filme você passa o leitor no código de barra ai ele parece o código do filme pra você buscar informações sobre o mesmo. bom é mais ou menos assim qualquer duvida posta i
  24. galerinha do bem eu peguei um código que envia email com o componente cdonts mas to com um probleminha o código é esse nome=request("nome") empresa=request("empresa") email=request("email") telefone=request("telefone") cidade=request("cidade") canal=request("canal") mensagem=request("mensagem") Set objMail = Server.CreateObject ("CDONTS.Newmail") objmail.to = "rafael.anjinho@gmail.com" objmail.from = email objmail.Subject = " Você revebeu um email do site Guia da hora H com o assundo " &canal corpo = "Nome: " & nome & vbCrLf corpo = "Empresa: " & empresa & vbCrLf corpo = "E-mail: " & email & vbCrLf corpo = "Cidade: " & cidade & vbCrLf Corpo = Corpo & mensagem objmail.body = Corpo objmail.send Response.Write "Seu email foi nos enviado com sucesso." o problema é o seguinte ele ta mandando o email noormalmente só que só vai o campo cidade e mensagem njo email o resto não me deem uma luz atenciosamente
  25. :huh: salve galerinha sera que alguém pode me falar que erro é esse nunca vi dei uma pesquisada nele mas não obtive sucesso. Microsoft OLE DB Provider for ODBC Drivers error '80040e14' [Microsoft][ODBC Microsoft Access Driver] Invalid SQL statement; expected 'DELETE', 'INSERT', 'PROCEDURE', 'SELECT', or 'UPDATE' a linha que esta dando erro é essa sql = "update empresas set titulo = '" & titulo & "', site = '"&site&"', email = '"&email&"', razao_social'"&razao_social&"', cnpj_cpf = '"&cnpj_cpf&"', telefone1 = '"&telefone1&"', telefone2 = '"&telefone2&"', fax = '"&fax&"', cep ='"&cep&"', endereco = '"&endereco&"', bairro = '"&bairro&"', cidade = '"&cidade&"', estado = '"&estado&"', numero = '"&numero&"', ref = '"&ref&"', categoria = '"&categoria&"', subcat = '"&subcat&"', '"&descricao = descricao&"', palavra_chave = '"&palavra_chave&"', palavra_chave2 = '"&palavra_chave2&"', palavra_chave3 = '"&palavra_chave3&"', palavra_chave4 = '"&palavra_chave4&"', palavra_chave5 = '"&palavra_chave5&"', logo = '"&logo&"' where id_empresa = '"&id_empresa&"'" obrigado
×
×
  • Criar Novo...