Duffy
-
Total de itens
39 -
Registro em
-
Última visita
Tudo que Duffy postou
-
Faz assim valor1 = cint(request("campo")) valor2 = cint(request("campo")) resultado = valor1 / valor2 Pronto! com o CInt eu converto pra inteiro.. FAlowzzz!!!!
-
Tem q ser todos os campos das 3 pessoas no mesmo form?
-
Agora sim , entra ai e pega Código de Barras Falowzzz!!!
-
E ai beleza entra aqui e pega um exemplo <a href="http://www.lula.pro.br/downloads/codigobarra128.zip">Código de Barras</a>
-
Bareta você conseguiu fazer paginação sem mostrar todas as páginas tipo Anterior 1 2 3 ... Próxima Se conseguiu tem como você postar aqui pra gente??? Valeu
-
Conectar Com Uma Página Da Internet Usando O Vb
pergunta respondeu ao ricardo de Duffy em Visual Basic
Primeiro você vai em Project > Components e marque a opção Microsoft Internet Controls coloque uma text ou uma combo , tanto faz e coleque esse codigo no evento KeyPress '13 equivale ao valor do enter If KeyAscii = 13 Then WebBrowser1.Navigate "http://" & Text1.Text End If Falowzzz!!!! -
Aquela q tem Application("count") ? se for é só substituir a variavel contador por ela
-
<% dim contador Response.Expires=0 set fso = server.createobject("Scripting.FileSystemObject") NomeArq = server.mappath("cont.txt") 'Primeiro você abre o arquivo para saber o seu valor , 0 nº 1 indica leitura set arqtxt = fso.OpenTextFile(NomeArq, 1) contador = trim(arqtxt.readline) arqtxt.close 'incrementa mais um ao valor da variavel contador contador = contador +1 'Abre o arquivo para gravação, como tinha dito antes com o nº 2 set arqtxt = fso.OpenTextFile(NomeArq, 2) 'insere o valor atual do contador arqtxt.WriteLine(contador) arqtxt.close set arqtxt = nothing set fso = nothing %> Cara eu tirei aquele texto "Contador=" q você queria colocar no arquivo texto senão, iria dar mais trabalho na hora de atualizar ia ter q ler o arquivo texto e usar a função inStr e Mid , para pegar somente o número beleza.. Testa ai q não vai dar erro de permissão Falowzzz!!!
-
Eu sou o cara q o Dark pediu para se cadastrar , você quer q eu o ajude a fazer a funcionar , só q eu mudarei um pouco seu código eu vou postar aqui pra você
-
<%@ Language=VBScript %> <%response.buffer=true%> <HTML> <BODY> <% cnpath="DBQ=" & Server.MapPath("noticias.mdb") DataSource = "Driver={Microsoft Access Driver (*.mdb)}; " & cnpath Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open DataSource con.Execute("delete*from Noticias where id="&Request.querystring("id")&("manchete")&("fonte")&("imagem")&("noticia")) &Response.Redirect "admin.asp" <=== tirei a concatenação %> </BODY> </HTML> cara na instrução sql você teria q colocar um AND entre as variaveis . E da onde são essas variaveis manchete, fonte, imagem, e noticia??