
DataSet
Membros-
Total de itens
367 -
Registro em
-
Última visita
Tudo que DataSet postou
-
É realmente funciona. Testei.
-
na função do onclick você dá um focus no frame que quer imprimir. Ex: frame.focus(); windows.print(); Se você tiver um botao em um frame, e usar o codigo acima, você vai direcionar o focus para o outro frame e ele vai imprimir. Para voltar a imprimir a frame que contém o botão é necessário usar o codigo acima, mas dando o focus no outro frame. Quaquer coisa tecla aí...
-
www.apostilando.com pode ajudar... além de ser gratuíto contém bastante dica e exemplos.
-
A parte mais difícil não é ó código ASP para gerar o boleto, e sim a conta corrente, é preciso ter o serviço de carteira que permite o pagamento por boleto. Pra isso a maioria dos bancos te dá duas opções de emissão de boleto. A primeira opção é cobrado uma taxa 2,50 ( + ou -) por boleto pago. Essa opção o banco não sabe da existencia do boleto até o dia em que é feito o pagamento, passando o valor para a sua conta, para cada boleto pago ele desconta da sua conta os 2,50 por isso que repassamos para o cliente essa diferença, então em vez do cliente pagar 35 reais ele pagará 37,50 A outra opção, é que ele cobra 2,50 (+ ou -) por boleto gerado, então você envia um doc dos boletos gerados pra lá, e ele desconta da sua conta esse valor de 2,50 X a quantidade de boleto gerado numa paulada só. A diferença é que nessa opção o banco fica acompanhando o boleto, se ele não for pago, o banco envia o boleto pra protesto e outros serviços a mais. Esolha um banco de sua preferência, e após acertar todos os passos com o seu gerente, entre em contato aqui no forum pra ver se você encontra um boleto do banco escolhido, já que alguns bancos trabalham com codificação diferenciada.
-
http://forum.imasters.com.br/index.php?showtopic=169983
-
Ao Digitar Procura Valores Na Combo
pergunta respondeu ao DataSet de DataSet em Ajax, JavaScript, XML, DOM
http://forum.imasters.com.br/index.php?sho...mp;#entry595061 -
Olá pessoal, segue este exemplo que achei nos scripts prontos aqui do fourm, o código faz o seguinte, a pessoa digita num input e ele faz a busca na combo, deixando selecinado a opção que mais se assemelha ao digitado no input. Eu preciso de algo assim, mas não posso ter um input, a pessoa clica na combo, daí ela fica azul, pois está selecionada, e vai digitando ali mesmo, e ele vai fazendo a pesquisa http://scriptbrasil.com.br/forum/index.php...st&p=207163 Veja esse exemplo acima, como fazer a mesma coisa sem usar input? usando a própria combo ? Valeu
-
Olá turma.... tenho essa função que ao sair da página ( X ) ele abre uma pop up, então se o usuário não se deslogou, eu mostro uma mensagem pra ele.... eis a função <script language='Javascript'> function leave() { window.open('../meio.asp','','toolbar=no,menubar=no,location=no,height=500,width=500'); } </script> Mas tenho Frames, veja: <html> <head> <title>SWSIS - optimizes realtions 2006</title> <link rel='shortcut icon' href='../paratodos/imagens/swsis/swsis2.ico'> <script language='Javascript'> function leave() { window.open('frontend/meio.asp','','toolbar=no,menubar=no,location=no,height=500,width=500'); } </script> </head> <frameset rows='1,*' frameborder='NO' border='0' framespacing='0'> <frame name='cabecalho' scrolling='no' noresize target='cabPrin' src='#'> <frame name='principal' src='frontend/index.asp'> <noframes> <body> Esta página usa quadros mas seu navegador não aceita quadros. </body> </noframes> </frameset> </html> Acontece que se eu colocar só a função na página, ela roda, mas se eu colocar junto com o restante do código, que é os frames, ela não roda, o exemplo acima mostra o codigo inteiro. Será que tem como fazer funcionar ? Já tentei colocar a função dentro de um dos frames, mas também não roda. Valeu pela ajuda.
-
O ao clicar em APLICAR, você da um submit na página index.asp, e no select faça o um WHERE onde o codigo da marca seja igual ao valor que você selecionou na combo. EX: Coloque o codigo abaixo dento das tags ASP IF request("id_table") <> "" THEN Set tabMar = Server.CreateObject("ADODB.RecordSet") sql = "SELECT nome1, nome2, nome3 FROM marcas where codMarca = " & request("id_table") tabMar.Open sql, conSTR WHILE not tabMar.EOF respons.write .... tabMar.MoveNext WEND END IF id_tabl é o nome da sua combo. desse jeito que você fez não dá : <a href="index7.asp?Fmarca="&id_table.selected>APLICAR</a> Troque por: <button name=enviar onclick='Form1.submit()'>Enviar</button> (Coloque dentro do seu FORM) Troque os nomes do campos do SELECT de acordo com sua tabela, qualquer coisa tecla aí...
-
Set tabPal = Server.CreateObject("ADODB.RecordSet") sql = "SELECT nomPal FROM tabela WHERE nomPal like '%"&request("strBusca")&"%'" tabPal.Open sql, conSTR WHILE not tabPal.EOF response.write "<tr><td>"&tabPal("nomPal")&"</td></tr>" tabPal.MoveNext WEND
-
http://scriptbrasil.com.br/forum/index.php?showtopic=79383 Troque a variável coluna, e você terá uma listagem lado a lado conforme a quantidade informada, na variável Talves tenha um jeito melhor de se fazer isso... mas funciona.
-
Ok Andréia.. me diga... então usando dessa maneira, com css, não importa qual as margens estão configuradas no browser, ele vai imprimir do jeito que eu colocar no css ? É isso ?
-
Meu email: dataset@swsis.com.br Me manda esse executavel que arruma ao iniciar o windows. Andreia... como faço com CSS ? me dá uma ajuda...
-
Olá... Eu tenho um sitema para uma escola, e eles imprimem diploma de conclusão do curso. Esse sistema é acessado em 4 filiais, e estão reclamando constantemente do desperdício de folha, é uma folha timbrada da empresa, etc... e tal... A impressao sai desalinhada, as vezes a margem direita fica maior que a esquerda, e vise e versa com a superior e inferior. Eles mudam as configurações de página do IE e esquecem de colocar novamente nas margens corretas, e o pior, além de trocarem, as vezes a secretária de uma das filiais não sabe arrumar... daí eles não imprimem mas nada... Como eu posso resolver esse problema da impressão, alguém tem uma ideia ?
-
Crie um arquivo chamado RandomImage.inc Conteúdo desse arquivo: <% Function RandomImage(strPath,strDefault) On Error Resume Next Randomize Timer Dim objFSO, objFolder, objFiles, objFile Dim strFiles, strImages, strPhysical, strFile Const strValid = ".gif.jpg.png" If Right(strPath,1) <> Chr(47) Then strPath = strPath & Chr(47) strPhysical = Server.MapPath(strPath) Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objFolder = objFSO.GetFolder(strPhysical) Set objFiles = objFolder.Files For Each objFile in objFiles strFile = LCase(objFile.Name) If Instr(strValid,Right(strFile,4)) Then strFiles = strFiles & strFile & vbTab End If Next strImages = Split(strFiles,vbTab) If UBound(strImages) > 1 Then RandomImage = strPath & strImages(Int(Rnd(1)*UBound(strImages))) Else RandomImage = strDefault End If End Function %> Crie um arquivo chamado randomimages.asp Conteúdo desse arquivo: <% @Language="VBScript" %> <% Option Explicit %> <html> <head> <!--#include virtual="/includes/RandomImage.inc"--> </head> <body> <div align="center"><center> <table border="1"> <tr> <td bgcolor="#ffffff"> <img src="<%=RandomImage("/images/","/images/default.gif")%>"> </td> </tr> </table> </center></div> </body> </html> Arrume o include virtual de acordo com a estrutura das suas pastas aí Se você passar o primeiro paramentro na chamada da função, ele vai mostrar as imagem ramdomicamente, se ele não achar nenhuma imagem na pasta, ele mostra a imagem referente ao segundo parametro. Qualquer coisa tecla aí
-
Para pegar as fotos, você pode gravar o caminho dela numa tabela do banco, daí fazendo um select nessa coluna, você vai ter response.write "<td><img src="&tabFot("nomCam")&"></td>" Faça o select para pegar o caminho da foto e use o comando 'random' para randomizar e pegar aleatoriamente.
-
Troca por esse codigo e roda, como não testei aqui, pode ser que apareça pequenos erros. Se der algum erro, tecla aí. <% set Conn = server.createobject("adodb.connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="mechaangel/database/speed_search.mdb;" set Rec = server.CreateObject("ADODB.Recordset") strSQL = "SELECT url, decricao FROM search WHERE url LIKE '%"&Request("search")&"%' OR descricao LIKE '%"&Request("search")&"%'" Rec.Open strSQL,Conn IF not Rec.EOF THEN while not Rec.eof response.write Rec("url")%> & "<br>" & Rec("descricao") Rec.movenext WEND END IF Rec.close set Rec = nothing set Conn = nothing %>
-
Eu acho que neste caso você está acessando a intranet dessa empresa. Aqui onde eu trabalho tem um caso assim. Se eu acessar de casa, vai abrir a caixa de login e senha, como essa que abre ao tentar acessar ftp pelo windows explorer. Eu imagino que no iis, exista a restrição para abrir a pagina asp com usuário atenticado.
-
Eu uso o TextPad, por enquanto ele está me sendo util... já andei vendo o visual studio.net pra programar em asp, tem uma versão gratuita na net... ele é muito bom também.
-
O erro é que o servidor não dá suporte para o mailmsg.Host Provavelmente ele não tem esse componente instalado ou ele não está rodando. Entre em contato com o suporte pra ver quais componentes de envio de email eles tem instalado no component services.
-
Alguém Teria Por Acaso Um Gerador De Imagens Aleatórias.
pergunta respondeu ao Giovanicaf de DataSet em ASP
http://www.webwizguide.info/asp/sample_scr...wiz_CAPTCHA.asp -
Na janela internet explorer vai em Ferramentas => Opções => Avançado => Procura por Impressora e deixe a caixinha imprimir caixa de fundo... Dá OK e manda imprimir agora, se não der resultado, feche a janela, abra uma outra e imprima... Qualquer coisa, tecla aí...
-
SQL SERVER é excelente, já passei por uma experiência trágica de ter que trocar de banco. Tive que alterar um monte de códigos, refazer a modelagem e tudo mais... foram 25 dias penosos... Por isso pensar e discutir o projeto com a equipe de desenvolvimento antes é muito importante, porque depois de desenvolvido e implantado, é complicado fazer migrações. PostgreSQL e SQL SERVER são recomendados para projetos grandes.
-
SELECT login, url, FROM tabela WHERE login = '" & request("login") & "'" OR url = '"&request("url")&"'" IF not tabSel.EOF THEN IF tabSel("login") <> "" THEN auxLogin = tabSel("login") END IF IF tabSel("url") <> "" THEN auxURL = tabSel("url") END IF END IF tabSel.Close Set tabSel = Nothing IF auxLogin <> "" OR auxURL <> "" THEN response.write _ "Os dados abaixo já estão gravados no banco: " & _ auxLogin & "<br>" & _ auxUF & "<br>" & __ "Por motivo de segurança, não é permitido ter dois logins cadastrados. Redigite um login diferente." ELSE INSERT INTO tabela SET ... END IF