Abrir documento do excel

[Marcel Cândido 0]

Procurei mas não achei.....

 

Como visualizar planilha do excel em uma página asp?

 

Desejo que na pagina asp, apareca com aparece no excel, cores, bordas, formulás...

 

Cosigo fazer montar a página asp, mas ela só puxa os dados das células, as formatações não.

 

 

alguém saabe com posso fazer isso?

 

abraço

[sr.silva 1]

Veja se te ajuda:

 

http://forum.imasters.com.br/lofiversi...hp/t156189.html

 

[]´s ;)

[Marcel Cândido 0]

não, acho que não...

 

to fazendo isso

 

Set objTable = Server.CreateObject("ADOX.Catalog")

objTable.ActiveConnection = objConn

 

for j = 0 to objTable.tables.count - 1

if lcase(objTable.tables(j).Type) = "table" Then

 

set objRs = Server.CreateObject("ADODB.Recordset")

objRs.CursorLocation = 3

objRs.Open "SELECT * FROM ["&Cstr(Ucase(objTable.tables(j).Name))&"] ",objConn

intCount = 0

if Not objRs.Eof Then

intColunas = objRs.Fields.Count

Response.Write ("<table border=""1"">" & vbNewline)

If intCount = 0 Then

Response.Write ("<tr>" & vbNewline)

For i = 0 To (intColunas-1)

Response.Write ("<td><font size=""1"" face=""verdana""><b> " & objRs.Fields(i).Name & "</b></td>" & vbNewline)

next

Response.Write ("</tr>" & vbNewline)

End If

Do While Not objRs.Eof

Response.Write ("<tr>" & vbNewline)

For i = 0 To (intColunas-1)

Response.Write ("<td><font size=""1"" face=""verdana""> " & objRs.Fields(i).Value & "</td>" & vbNewline)

Next

response.write ("</tr>" & vbNewline)

objRs.MoveNext

Loop

Response.Write ("</table>" & vbNewline)

Response.Write ("<font size=""1"" face=""verdana""><b>Nome da Tabela(Planilha):</b>" & Cstr(Ucase(objTable.tables(j).Name)) & vbNewline)

Response.Write ("<br/>" & vbNewline)

Response.Write ("<font size=""1"" face=""verdana""><b>Total Colunas: </b>" & intColunas & vbNewline)

Response.Write ("<br/>" & vbNewline)

Response.Write ("<font size=""1"" face=""verdana""><b>Total Linhas: </b>" & objRs.RecordCount +1 & vbNewline) ' o +1 é por causa da primeira linha que é o name da coluna

End If

objRs.Close

Set objRs = Nothing

Response.Write ("<br/>")

Response.Write ("<br/>")

end if

next

 

 

ele busca dos os camplos, mas em algumas fórmulas não funciona..

gostaria de abrir como é no excel, só q no internet explorer...

com bordas, corers, img que estiver dentro do excel...

 

entende?

 

obrigado

[sr.silva 1]

Mais uma busca:

 

http://forum.imasters.com.br/lofiversi...hp/t234625.html

 

http://forum.imasters.com.br/index.php?showtopic=203019

[Marcel Cândido 0]

não, ja olhei tudo isso antes de postar e nada rescolve o q eu quero...

 

é assim...

 

será que tem com abrir um .xls no browser ? tipo qndo abre um pdf??

 

ai resolveria eu acho...

 

pq não sei se tem como listar uma tabela do excel, no asp , junto com suas formatações de células...

 

 

abraço... valew pelas ajudas

[sr.silva 1]

Já pesquisou sobre OWC

 

http://forum.imasters.com.br/lofiversi...hp/t109187.html

 

Desculpe qualquer coisa, tem tempoooo que não trabalho com ASP

 

Se não der, tente algo com ASP.Net!

 

[]´s ;)