Ted k’ É assim que tem que ser! Programando em ASP, ASP.NET, PHP, CSS, dentre outras…

<%
set abc = server.createObject("ABCpdf6.DOC")
	' Tamanho da Fonte
	abc.FontSize = "12"
	' Estilo da Fonte
	abc.Font = abc.AddFont("Arial")
	' Cor da Fonte
	abc.Color = "255 0 0"
	' Coloque o Texto
	abc.AddText "Coloque seu Texto AQUI"
	abc.save server.mapPath("arquivo_gerado.pdf")
set abc = nothing
%>

Classe que mostrar dados da Conta do Twitter

Olá a todos, nesse artigo vamos aprender a criar um exemplo simples de como mostrar os dados de uma conta do twitter em sua página, resgatando informações de um XML:

O link é Simples: http://twitter.com/users/show/ted_k.xml

Usando um Objeto para ler o XML e um layout agradável, chegamos a essa conclusão:

Criei uma classe chamada UserTwitter, dentro criei uma sub chamada LerXML() para fazer todo o processo:
página default.class.asp

class UserTwitter
public sub LerXML()
set objXMLDOM = server.createObject("MSXML2.DOMDocument.3.0")
objXMLDOM.async = false
objXMLDOM.setProperty "ServerHTTPRequest", true
objXMLDOM.validateOnParse = false
objXMLDOM.load("http://twitter.com/users/show/"request.queryString("username")".xml")

set raiz = objXMLDOM.getElementsByTagName("*")

OBS: coloquei o request.queryString para ter um resgate do nome do usuário mais objetivo!
E, um laço de repetição para pegar a posição de cada nó e para cada nome no XML, assim:

for i = 0 to raiz.length - 1
select case (raiz.item(i).nodeName)
case ("name") : tw.nome = raiz.item(i).text
case ("screen_name") : tw.screen_name = raiz.item(i).text
case ("location") : tw.location = raiz.item(i).text
case ("profile_image_url") : tw.profile_image_url = raiz.item(i).text
case ("url") : tw.url = raiz.item(i).text
case ("followers_count") : tw.followers_count = raiz.item(i).text
case ("friends_count") : tw.friends_count = raiz.item(i).text
case ("favourites_count") : tw.favourites_count = raiz.item(i).text
case ("statuses_count") : tw.statuses_count = raiz.item(i).text
case ("time_zone") : tw.time_zone = raiz.item(i).text
case ("profile_background_image_url") : tw.profile_background_image_url = raiz.item(i).text
case ("profile_background_color") : tw.profile_background_color = ucase(raiz.item(i).text)
case ("profile_text_color") : tw.profile_text_color = ucase(raiz.item(i).text)
case ("profile_link_color") : tw.profile_link_color	= ucase(raiz.item(i).text)
case ("profile_sidebar_fill_color") : tw.profile_sidebar_fill_color = ucase(raiz.item(i).text)
case ("profile_sidebar_border_color") : tw.profile_sidebar_border_color = ucase(raiz.item(i).text)
end select
next

No código dentro do CASE coloquei o nome das tags do XML. fazendo o seguinte:
Quando encontrar o "nodeName" "tal", mostre "tal" case, como uma condicional IF

raiz.item(i).nodeName

Observando também que uso essa propriedade do XML (.text) para imprimir o que há na tag.

raiz.item(i).text

Criando um objeto e chamando ele na tela:

set tw = new UserTwitter
tw.LerXML()

criei uma página chamada default.asp

<% Language="VBScript" %>
<!--include file="Default.class.asp"-->
... o restante do código

Para ter acesso o código completo e o layout clique aqui para baixar

  class mysql{

      private $con;
      protected $inf = array('localhost','usuario','senha','base');

      protected function constantes()
      {
        if(!defined('HOST') and !defined('USU') and !defined('SENHA') and !defined('DB'))
        {
           define('HOST' ,$this->inf[0]);
           define('USU'  ,$this->inf[1]);
           define('SENHA',$this->inf[2]);
           define('DB'   ,$this->inf[3]);
        }
      }

      public function conect(){

         $this->constantes();

         $this->con = mysql_connect(HOST,USU,SENHA)or die('Erro na conexão'.mysql_error($this->con));

         ($this->con) ? (mysql_select_db(DB,$this->con)) : die('Erro ao selecionar base de dados'.mysql_error($this->con));
      }

      function fechar(){
      	return mysql_close($this->con)or die('Erro ao fechar a conxão permanete'.mysql_error($this->con));
      }

      function query($sql){
      	$this->conect();
      	$query = mysql_query($sql)or die('Erro na query'.mysql_error($this->con));
      	return $query;
      	$this->fechar();
      }

      function limpar_memoria($sql){
      	$this->conect();
      	return mysql_free_result($sql)or die('Erro ao limpar a memória do servidor'.mysql_error($this->con));
      	$this->fechar();
      }

      function ant_sql($limp){
      	$limp=preg_replace(sql_regcase("/(from|select|truncate table|insert|delete|where|drop table|show tables|#|\*|--|\\\\)/"),"",$limp);
    	$limp=trim($limp);
    	$limp=strip_tags($limp);
    	$limp=addslashes($limp);
    	return $limp;
      }
  }

$config = (file_exists('class_mysql.php')) ? include('class_mysql.php') : false;

($config) ? $con = new mysql()  :  false;

$consulta = $con->query("SELECT * FROM tabela");