Office2003 installed before the owc are no good? Office2k before it is packed, Web componts office with the proper controls, related equipment not used after 2003, a red cross on the website. Is how else

Indeed, they can not use the upgrade, I also tied to let the good time! I finally solved the output of Excel and Word and so on the website, Kazakhstan Ha!

Even tell you how to solve the

Excel first of a new Excel file, and then open the menu Lane, "" tools "," macro "Script Editor 10.0 >Microsoft Sources further complicated documents to a new system of ASP, and then at the top of this document to write the following words : <% Response.ContentType= "application/vnd.ms-excel" Response.AddHeader "Content-Disposition", "attachment; filename=bugs.xls" %> Then rewritten form inside the paper you use to write the ASP dynamic forms, for instance, you can bring some information to write dynamic information forms the basis of these data, Liezi : [B] "Table x:str cellpadding=0 cellspacing=0> "Col> "Tr> "Td><font color=" #0000FF "" ID</font></td> "Td><font color=" #0000FF "," date of submission "/font></td> "Td><font color=" #0000FF "/font></td>" testers " "Td><font color=" #0000FF "," type bugs "/font></td> "Td><font color=" #0000FF "" game version of "/font></td> "Td><font color=" #0000FF "and" describe bugs "/font></td> "Td><font color=" #0000FF "and" reply to people "/font></td> "Td><font color=" #0000FF "" programmers can return "/font></td> "Td><font color=" #0000FF "and" Programmer specific reply to the "/font></td> "Td><font color=" #0000FF "and" testing confirmed the "/font></td> "Td><font color=" #0000FF "and" testing concrete "/font></td> "Td><font color=" #0000FF "/font></td>" annex " "Per <% 'ASP here, in front of all derived from the Microsoft Excel macro script editor 10.0 explained in the script 'Reading the corresponding values from the database Dim conn 'Database Connection conn words omitted here Dim rs ＝, sgl Set rs=server.CreateObject ( "ADODB.RecordSet") 'Sgl sentences based on the data. Sql=request.Form ( "sgl") Rs.open sgl, conn,1,3 Do while not rs.EOF %> "Tr height=19 Historic Significance of the Transitional Budget 'height:14.25pt'" "Td x:num><%=rs.fields (" bugid ") %></td> "Td><%=rs.fields (" reporttime ") %></td> "Td><%=rs.fields (" reporter ") %></td> "[Passages on congress progress omitted] <% 'Bugs types : A, B, C, D, E Select case rs.fields ( "type") Case 1 Response.Write ( "A") Case 2 Response.Write ( "B") Case 3 Response.Write ( "C") Case 4 Response.Write ( "D") Case 5 Response.Write ( "E") End select %> "= "Td><%=rs.fields (" ver ") %></td> "Td><%=rs.fields (" bugdesc ") %></td> "Td><%if rs.fields (" genpro ")" "" "then response.Write (rs.fields (" genpro ")) else response.Write (" not allocated ") end if %></td> "Td><%if rs.fields (" genpro_s ")" "" "then response.Write (rs.fields (" genpro_s ")) else response.Write (" There is no reply to ") end if %></td " "Td><%if rs.fields (" genprodesc ")" "" "then response.Write (rs.fields (" genprodesc ")) else response.Write (" There is no specific reply to ") end if %></td " "Td><%if rs.fields (" genqa_s ")" "" "then response.Write (rs.fields (" genqa_s ")) else response.Write (" No recognition ") end if %></td> "Td><%if rs.fields (" genqadesc ")" "" "then response.Write (rs.fields (" genqadesc ")) else response.Write (" No definite confirmation ") end if %></td " <% 'Bugs Annex 2, designed specifically for Excel Format Dim att Att=rs.fields ( "attachment") 'Fulfillment see Annex separation If instr (att, "uploadfile") then Dim strArray, i StrArray=split (att, "uploadfile") For i = 1 to UBound (strArray) Response.Write ( "" td><a href=http:// "&request.ServerVariables (" HTTP_HOST ") &Left (request.ServerVariables (" URL ") Instr (Mid (request.ServerVariables ( "URL"), 2). "/") +1) & "uploadfile" &strArray (i) & "" uploadfile "&strArray (i) &" "/a></td>") Next Else Response.Write ( "the" non-Annex [passages on congress progress omitted] "[passages on congress progress omitted]") End if %> "Per <% Rs.movenext Loop Rs.close () Set rs=nothing Conn.close () Set conn=nothing %> "![if SupportMisalignedColumns]> "Tr height=0 Historic Significance of the Transitional Budget 'display:none'" "Td></td> "Td></td> "Per "![endif]> "ShapeID="_x0000_i1025" DrawAspect="Content" ObjectID="_1127825915"> </o:OLEObject> [/b]

[ Closed window ]