Jun/080
Usando a Tag asp:xml ASP.NET
Nada como puxar um XML e configurar ele dentro de um XSL com uma linha só de comando, é possível com a tag
Simples é fácil de utilizar, ela você pode chamar um XML puro com o "DocumentSource" ou modelar no XSL com o "TransformSource"
OBS: Não irei dizer detalhes do XSL pois estou fazendo referências ao ASP.NET, mais de primeira mão, é super fácil.
Então segue abaixo as três páginas que você precisa para modelar tudo
Index.aspx
<%@ Page Language="VB" %> <html> <head> <title>Gerar XML</title> </head> <body> <form runat="server"> <asp:Xml Id="XMLPage" DocumentSource="teste.xml" TransformSource="teste.xsl" runat="server" /> </form> </body> </html>
teste.xml
<?xml version="1.0" ?>
<classe_01>
<bancos>
<bancos_nome>Access</bancos_nome>
<bancos_tipo>Database</bancos_tipo>
<bancos_nome_completo>Microsoft Access</bancos_nome_completo>
<bancos_linguagens>ASP, ASP.NET</bancos_linguagens>
<bancos_tamanho>0 MB</bancos_tamanho>
<bancos_qualidade>5</bancos_qualidade>
</bancos>
<bancos>
<bancos_nome>Oracle</bancos_nome>
<bancos_tipo>Database</bancos_tipo>
<bancos_nome_completo>Oracle Database</bancos_nome_completo>
<bancos_linguagens>ASP, PHP, JSP</bancos_linguagens>
<bancos_tamanho>200 MB</bancos_tamanho>
<bancos_qualidade>10</bancos_qualidade>
</bancos>
<bancos>
<bancos_nome>MySQL</bancos_nome>
<bancos_tipo>Database</bancos_tipo>
<bancos_nome_completo>MySQL Database</bancos_nome_completo>
<bancos_linguagens>ASP, PHP, JSP, ASP.NET</bancos_linguagens>
<bancos_tamanho>0 MB</bancos_tamanho>
<bancos_qualidade>9</bancos_qualidade>
</bancos>
<bancos>
<bancos_nome>SQL SERVER</bancos_nome>
<bancos_tipo>Database</bancos_tipo>
<bancos_nome_completo>Microsoft SQL SERVER 2005</bancos_nome_completo>
<bancos_linguagens>ASP e ASP.NET</bancos_linguagens>
<bancos_tamanho>500 MB</bancos_tamanho>
<bancos_qualidade>10</bancos_qualidade>
</bancos>
</classe_01>
teste.xsl
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">
<xsl:template match="/">
<table id="Transform" border="1" cellpadding="3" cellspacing="0" style="font:12px Arial;">
<tr style="font-weight: bold;">
<td>NOME</td>
<td>TIPOS</td>
<td>COMPLETO</td>
<td>LINGUAGENS</td>
<td>TAMANHO</td>
<td>QUALIDADE</td>
</tr>
<xsl:apply-templates select="classe_01/bancos"/>
</table>
</xsl:template>
<xsl:template match="bancos">
<tr>
<td><xsl:value-of select="bancos_nome"/></td>
<td><xsl:value-of select="bancos_tipo"/></td>
<td><xsl:value-of select="bancos_nome_completo"/></td>
<td><xsl:value-of select="bancos_linguagens"/></td>
<td align="center"><xsl:apply-templates select="bancos_tamanho"/></td>
<td align="center"><xsl:value-of select="bancos_qualidade"/></td>
</tr>
</xsl:template>
</xsl:stylesheet>
Jun/083
Pegando o nome da Imagem em campo “file”
De tanto a os usuários lá do iMasters perguntarem sobre como pegar o nome da imagem de um campo "input file" decidir criar esse "micro" script para facilitar e deixar aqui no blog para compartilhar, é simples, nada que umas condições não possam fazer, então vamos lá.
Vamos supor que a variável que criei chamada "Caminho_Foto" está recebendo o valor de um Request.Form() e que esse .Form está chamando o resultado de um "input file" lá do formulário de HTML; então vamos.
Caminho_Foto = "c:\\teste\imagem.gif" Response.Write(Right(Caminho_Foto, Len(Caminho_Foto) - InstrRev(Caminho_Foto,"\")))
É só isso mesmo, simples, simples!!!
Dúvidas? postem!
Acesse também: Webly
May/082
Gerando Números aleatórios, Randomize
Gerar números randômicos é bem fácil.
Fica mais fácil criar uma função para receber os valores, assim tornando a função "livre" para ser usada em todo o projeto!
<% Function GerarRandomize(Valores) Dim Numeros : Numeros = "0123456789" Randomize For I = 1 To Valores Dim Num : Num = Mid(Numeros, Int(35 * Rnd) + 1, 1) Dim Chave : Chave = Chave + Num Next GerarRandomize = Chave End Function Response.Write(GerarRandomize(10)) 'o número 10 significa quandos números serão gerados %>
Significado das funções:
MID(): Serve para tirar uma string entre dois valores
Sintaxe: MID(String, CaracterInicio, TamanhoSeleção)
RND(): Devolve um numero aleatório.
Antes de se usar esta função, use Randomize, para ele se basear no relógio do sistema e desta maneira não repetir valores.
Qualquer dúvida é só postar:
Acesse também: Webly
May/080
Resgatando o Menor valor
Variáveis Var_NUMBER_01, Var_NUMBER_02, Var_NUMBER_03, Var_NUMBER_04 iram receber os valores, tratamento com a função Split
O Laço FOR indetifica dentro da variável Valor_DADOS o menor número em comparação ao valor da variável Menor_ para achar o menor valor
Script simples para ser vem adaptado
<% Var_NUMBER_01 = "433" Var_NUMBER_02 = "11245" Var_NUMBER_03 = "712" Var_NUMBER_04 = "20455" Valor_DADOS = ""&Var_NUMBER_01&", "&Var_NUMBER_02&", "&Var_NUMBER_03&", "&Var_NUMBER_04&"" Valor_DADOS = Split(Valor_DADOS, ", ") Menor_ = 1000000 For i = LBound(Valor_DADOS) To UBound(Valor_DADOS) If Int(Valor_DADOS(i)) < Int(Menor_) Then Menor_ = Valor_DADOS(i) End If Next Response.Write "Menor Número: " & Menor_ %>
O resultado é: 433
Dicas ou dúvidas relacionadas ao código postado, deixe seu comentário!
Dicas: Webly


