renatocantarino

var MailListener = require("mail-listener2");
var Cylon = require("cylon");
 
var mailListener = new MailListener({
  username: "renato.cantarino@gmail.com", //seu email
  password: "", //sua senha
  host: "imap.gmail.com",
  port: 993, 
  tls: true,
  tlsOptions: { rejectUnauthorized: false },

renatocantarino

var fs = require('fs');

var contents =  
    fs.readFile('index.html' , function(err, ctt)
                    {
                    
                    
                    console.log(ctt);
                    
                    

renatocantarino

//carrega a lib Http do Node

var http = require('http');

//Cria um serviço web para tratar  requisicao

var _server = http.createServer(function(request,response)
{
	//parametros do cabeçalho
	response.writeHead(200,{'Content-Type': 'text/html'});

renatocantarino

sudo -u root /opt/Aptana_Studio_3/AptanaStudio3

renatocantarino

import java.*;
import java.io.*;
import processing.serial.*; //Cria o canal de comunicação com o Arduino
import cc.arduino.*; //Libs Arduino


Arduino arduino;
int ledPin;

void setup()

renatocantarino

int led = 13;  // Numero da porta onde o Led esta conectado


void setup() {                
  
  pinMode(led, OUTPUT);     // porta , e modo de visualização.
}


void loop() {

renatocantarino

library(RODBC)
cn<-odbcConnect('NW',uid='Usuario',pwd='Senha')
sql <- "select top 30 ShipName from dbo.Orders"
myresult<- (sqlQuery(cn, sql))
odbcClose(cn)
print(myresult)

renatocantarino

library("ROAuth")
library("twitteR")
library("wordcloud")
library("tm")

options(RCurlOptions = list(capath = system.file("CurlSSL", "cacert.pem", package = "RCurl"), ssl.verifypeer = FALSE))
reqURL <- "https://api.twitter.com/oauth/request_token"
accessURL <- "https://api.twitter.com/oauth/access_token"
authURL <- "https://api.twitter.com/oauth/authorize"
consumerKey <- "Seu Consumer KEY"

renatocantarino

library("ROAuth")
library("twitteR")

options(RCurlOptions = list(capath = system.file("CurlSSL", "cacert.pem", package = "RCurl"), ssl.verifypeer = FALSE))
reqURL <- "https://api.twitter.com/oauth/request_token"
accessURL <- "https://api.twitter.com/oauth/access_token"
authURL <- "https://api.twitter.com/oauth/authorize"
consumerKey <- "SEU CONSUMER KEY"
consumerSecret <- "SEU CONSUMER SECRET"
twitCred <- OAuthFactory$new(consumerKey=consumerKey,

renatocantarino

library(RODBC)
cn<-odbcConnect('NW',uid='renato',pwd='senha')
sql <- "select top 30 ShipName from dbo.Orders"
myresult<- (sqlQuery(cn, sql))
odbcClose(cn)
print(myresult)