Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

-_KIKO_-

Bug na tabela com ASP! :(

Por , em ASP Clássico

Recommended Posts

-_KIKO_-    0

-_KIKO_-
Postado

Vejam:

 

http://e0x.no-ip.com:5555/usuarios/1234

 

dai tem uma tela de login

user: 1234

senha: 1234

 

dai cliquem em Administrar arquivos...

vcs vão ver isso:

 

Imagem Postada

Obs..: vejam o meu risco em vermelho, o tamanho do espaço....

 

dai você clica num link e o espaço que eu risquei vermelho desaparece :S

o objetivo eh naum ter esse espaço.;...podem me ajudar?

script todo:....vejam....

 

 

 

 

 

 

 

 

 

 

 

<!-- #include file="../../templates.asp" --><title>Página de Administração da Conta</title><%'-------------------------------------------------------------------''                           UPLOAD GROUP                            ''==================================================================='' Por: Luiz Roberto Casarini Bossoi                                 '' E-mail: kikowar@pop.com.br                                        '' Telefone: 0xx-14-35231617                                         '' Cidade: LINS - SP                                                 '' ICQ: #104889405                                                   ''                                                                   ''                                                                   ''      UPLOAD GROUP - ALL RIGHTS RESERVED                           ''      UPLOAD GROUP - TODOS OS DIREITOS RESERVADOR                  ''                                                                   ''                                                                   ''-------------------------------------------------------------------'' Iniciando a autenticação seguradiretorio = Server.Mappath("/") & "\" & "usuarios" & "\"pasta1 = diretorio & Session("username")  & "\" & "index.asp"pasta2 = Server.Mappath("index.asp")'###########################################################################################'            Proteção de Dados começa agora. 99,9% Seguro...nada é 100% seguro..'###########################################################################################If Pasta1 = Pasta2 Then%><% '################################################################################################' %><body bgcolor="<%=Pagecolor%>" link="#000000" vlink="#000000" alink="#000000"><%Function FormatSize (givenSize) If (givenSize < 1024) Then  FormatSize = givenSize & " Bytes" ElseIf (givenSize < 1024*1024) Then  FormatSize = FormatNumber(givenSize/1024,2) & " KB" ElseIf (givenSize < 1024*1024*1024) Then  FormatSize = FormatNumber(givenSize/(1024*1024),2) & " MB" Else  FormatSize = FormatNumber(givenSize/(1024*1024*1024),2) & " GB" End IfEnd Function%><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">  <tr>    <td><img border="0" src="<%=imgesquerda%>"></td>    <td width="100%" background="<%=cima%>"> </td>    <td><img border="0" src="<%=imgdireita%>"></td>  </tr>  <tr>    <td colspan="3" style="border-left: 3px solid #0000FF; border-right: 3px solid #0000FF; border-bottom: 3px solid #0000FF"> <div align="center">      <center>      <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="90%">        <tr>          <td><font color="#FFFFFF"><img border="0" src="<%=imgesquerda%>"></font></td>          <td width="100%" background="<%=cima%>">          <p align="center"><b><font face="Tahoma" size="2" color="<%=fontcolor%>">Bem Vindo <%=Session("Nome")%></font></b></td>          <td><font color="#FFFFFF"><img border="0" src="<%=imgdireita%>"></font></td>        </tr>        <tr>          <td colspan="3" bgcolor="<%=bgcolor%>">          <p align="center"><b><font face="Verdana" size="2">          <a href="logado.asp?estilo=<%=Session("Template")%>&dir=web\">Home</a> -          <a href="profile.asp?estilo=<%=Session("Template")%>&dir=web\">Meu Perfil</a> -          <a href="dados.asp?estilo=<%=Session("Template")%>&dir=web\">Dados da Conta</a> -          <a href="files.asp?estilo=<%=Session("Template")%>&dir=web\">Administrar Arquivos</a> -          <a href="../../logout.asp?estilo=<%=Session("Template")%>&dir=web\">Logout</a></font></b></td>        </tr>      </table>      </center>    </div>    <div align="center">      <center>      <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="90%">        <tr>          <td> </td>          <td width="100%">          <b><font face="Tahoma" size="2"> </font></b></td>          <td> </td>        </tr>        <tr>          <td><font color="#FFFFFF"><img border="0" src="<%=imgesquerda%>"></font></td>          <td width="100%" background="<%=cima%>">          <p align="center"><b><font face="Tahoma" size="2" color="#FFFFFF">Meus Arquivos -            </font></b></td>          <td><font color="#FFFFFF"><img border="0" src="<%=imgdireita%>"></font></td>        </tr>        <tr>          <td colspan="3" bgcolor="<%=bgcolor%>"><table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">  <tr>    <td width="61%" align="center" bgcolor="#0000FF"><b>    <font face="Verdana" size="2" color="#FFFFFF">Nome do Arquivo</font></b></td>    <td width="17%" align="center" bgcolor="#0000FF"><b>    <font face="Verdana" size="2" color="#FFFFFF">Tipo</font></b></td>    <td width="15%" align="center" bgcolor="#0000FF"><b>    <font face="Verdana" size="2" color="#FFFFFF">Tamanho</font></b></td>   <td width="7%" align="center" bgcolor="#0000FF"><b>   <font face="Verdana" size="2" color="#FFFFFF">Ações</font></b></td> </font>  <tr><td width="100%" colspan="4"><font face="Verdana" size="2">   <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">  <tr>    <td width="50%"><font face="Verdana" size="2"> <%    entrada = request.querystring("dir")    response.write "<b><font face=verdana size=2>Pasta: " & entrada'***************** FilesSet fso = CreateObject("Scripting.FileSystemObject")entrada = request.querystring("dir")Set folderObject = fso.GetFolder(Server.MapPath(entrada))Set filesObject = folderObject.Filespasta = request.querystring("pasta")  if entrada = "../" Then  response.write "ACESSO NEGADO XITER!! SUX!"  response.end  elseif entrada = "../../" Then  response.write "ACESSO NEGADO XITER!! SUX!"  response.end  elseif entrada = "../../../" Then  response.write "ACESSO NEGADO XITER!! SUX!"  response.end    elseif entrada = "..\..\..\" Then  response.write "ACESSO NEGADO XITER!! SUX!"  response.end    elseif entrada = "..\..\" Then  response.write "ACESSO NEGADO XITER!! SUX!"  response.end    elseif entrada = "/" Then  response.write "ACESSO NEGADO XITER!! SUX!"  response.end    elseif entrada = "\" Then  response.write "ACESSO NEGADO XITER!! SUX!"  response.end    elseif entrada = "..\" Then  response.write "ACESSO NEGADO XITER!! SUX!"  response.end end if  entrada = replace(entrada,"../","ACESSO NEGADO")entrada = replace(entrada,"../../","ACESSO NEGADO")entrada = replace(entrada,"..\..\","ACESSO NEGADO")entrada = replace(entrada,"..\","ACESSO NEGADO")    %></td>    <td width="0%"><font face="Verdana" size="2">     <a href="javascript:history.back(-1);">     <img border="0" src="../../templates/imgs/seta.jpg" width="18" height="15" alt="Subir um Nivel" align="right"></a></td>  </tr></table></td>      </tr>  <tr><% Set folderObject2 = folderObject.SubFoldersFor Each subFolder in FolderObject2pika = subfolder.name%>  <td width="61%"><b><font face="verdana" size="2"><a href="files.asp?estilo=<%=Session("Template")%>&dir=<%=entrada%><%=pika%>\&pasta=<%=pika%>"><%=pika%></a> </td>        <td width="17%"><font face="verdana" size="2">Pasta</td>    <td width="15%">     <font face="verdana" size="2">    <%    pastasize = folderObject.Size response.write FormatSize(pastasize)    %> </td>    <td width="7%">    <img border="0" src="../../templates/imgs/delete.jpg" align="right" width="18" height="22"><img border="0" src="../../templates/imgs/rename.jpg" align="right"></td>  </tr><%Next %>  <tr><%For Each file In filesObject%><% nome = file.NameSet fileObject = fso.GetFile(Server.MapPath(Entrada) & "\" & Nome ) %><font face="Verdana" size="2"></font>    <td width="61%"><font face="verdana" size="2"><% Response.Write file.Name %> </td><%kiko = FileObject.Typetamanho = fileObject.SizeIf kiko = "Arquivo ZIP do WinRAR" Then	kiko = "Arquivo ZIP"ElseIf kiko = "Documento do Active Server" Then	kiko = "Documento ASP"ElseIf kiko = "Arquivo de filme (MPEG)" Then	kiko = "Filme/Clipe	"Elsekiko = kikoEnd If%>    <td width="17%"><font face="verdana" size="2"><%=kiko%> </td>    <td width="15%"><font face="verdana" size="2"><% response.write FormatSize(tamanho)'    If tamanho > 1048576 Then'    Response.write(Round((fileObject.Size / 1048576),2 / 1048576) & "Mb")'    else'    Response.Write Round((fileObject.Size / 1024),2) & " Kb"'    end if %> </td>    <td width="7%">    <img border="0" src="../../templates/imgs/delete.jpg" align="right" width="18" height="22"><img border="0" src="../../templates/imgs/rename.jpg" align="right"></td>  </tr><% next %><font face="Verdana" size="2"><%end ifSet fileObject = NothingSet folderObject = NothingSet fso = Nothing%> </font></table>          </td>        </tr>      </table>      </center>    </div>    <p><font face="Verdana"><br> </td>  </tr></table><p align="center"><font face="Verdana" size="1">Luiz Roberto C. Bossoi<br>Todos os Direitos Reservados</font><br><br> <% '################################################################################################' %><%'if acesso > "4" Then'Else'response.redirect "index.asp?msg=Acesso Negado!"'End If%> </p>

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito