Jump to content
Fórum Script Brasil

Alyson Ronnan Martins

Membros
  • Content Count

    486
  • Joined

  • Last visited

Community Reputation

0 Neutro

7 Followers

About Alyson Ronnan Martins

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Boa noite. Da mesma maneira que fez o "foreach" para os itens deve fazer para o corpo do email assim vai passar da linha dos seus dados para o corpo.
  2. Seu projeto pode ter muitos sites para pesquisar ou pouco? Exemplo de muitos 600 mil kkkkk O que pode fazer é um for pesquisar um por um se tem a "frase" pelo Banco de dados (sentido inverso ao que está tentando). Mais isso é viável até não ficar lendo pelo excesso de sites. Se puder eu já vejo o código para pesquisar dentro de uma String se tem o texto do bando.
  3. Bom dia. Tenta usar esse código: $url = “http://” . $_SERVER[‘HTTP_HOST’] . $_SERVER[‘REQUEST_URI’]; echo “A URL atual é: ” . $url;
  4. Tamo aqui. Programo a mais de 7 anos em vba for Excel.
  5. Eu não vi a variável "wd" declarada nem configura. O que é "wd"?
  6. Tem sim direto no workbook. Já só seguiu fazer?
  7. Boa tarde @Ezio Barreto . Tem como mandar uma foto defoto está é fazer manual apara ver como quer que fique?
  8. Bom dia. Já viu as Ribbons ? Agora os menus de Excel e Access usam elas e até fiz alguns projetos. Só não sei se você se interessa por eles.
  9. Bom dia Jardel. Seria mais simples ter o número de casamento(posso estar pensando besteira) é se tiver outra pessoal com o mesmo número já pode identificar e carregar o nome.
  10. Bom dia não entendi a idei..
  11. Poderia anexar a planilha para tentar simular e elaborar um código?
  12. Bom dia. Só uma parte do código esta repetida 'Cola as informações na tabela dados Sheets("Dados").Select Sheets("Dados").Cells(1, 1).Activate Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False Fora isso não nada de errado. Se possível enviar a planilha para simular e tentar ver
  13. Boa tarde. Olha se esse código funciona. Public Sub cmdPularLinhas() Dim xLinhas As Long Dim valorAtual As Long Dim x As Long xLinhas = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row If xLinhas > 1 Then For x = xLinhas To 2 Step -1 valorAtual = ActiveSheet.Range("C" & x).Value Rows(x + 1 & ":" & x + valorAtual).Insert Shift:=xlDown Next x End If End Sub
  14. Novamente confuso kkkk tem skype ou telegram para tentar me explicar melhor?
  15. Eu fiz a conexão via OO e ficou assim: <?php session_start(); // initializing variables $user_name = ""; $user_email = ""; $errors = array(); // connect to the database $db_sys = new mysqli('localhost', 'root', '', 'test'); // REGISTER USER if (isset($_POST['user_reg'])) { // receive all input values from the form $user_name = mysqli_real_escape_string($db_sys, $_POST['user_name']); $user_email = mysqli_real_escape_string($db_sys, $_POST['user_email']); $user_pass1 = mysqli_real_escape_string($db_sys, $_POST['user_pass1']); $user_pass2 = mysqli_real_escape_string($db_sys,
×
×
  • Create New...