Lösen Sie das Problem, dass ASP Abfrageergebnisse in die ID-Nummer in Excel exportiert
Autor:Eve Cole
Aktualisierungszeit:2009-06-23 17:01:06
Beim Exportieren der Abfrageergebnisse der Access-Datenbank in eine Excel-Datei ist kürzlich ein Problem aufgetreten, da ein Feld die ID-Nummer enthält. In der exportierten Excel-Datei wurden die letzten drei Ziffern aller ID-Nummern zu 0! Wie deprimierend! Nach einer Online-Recherche habe ich herausgefunden, dass das Standardzahlenformat von Excel „normal“ ist und die eingegebenen 11 Ziffern nur normal angezeigt werden können. Wenn die Zahl 11 Ziffern überschreitet, wird sie in wissenschaftlicher Notation angezeigt.
Um dieses Problem zu lösen, kann ich die Abfragedaten nur als Textdaten markieren. Folgendes ist Teil des Codes:
<%
„Nach Excel exportieren.“
set rs = server.createobject("adodb.recordset")
sqlstr="select * from tabname where"&searhsql 'Abfrageanweisung
rs.open sqlstr,oconn,1,3
%>
<%set fs = server.createobject("script_ing.filesystemobject")
„Dateien speichern
Dateiname="info.xls"
temp=Dateiname
Dateiname=request.servervariables("appl_physical_path")&"\"+Dateiname
'Vorhandene Excel-Dateien löschen
'Wenn fs.fileexists(Dateiname), dann
'fs.deletefile(Dateiname)
'Ende wenn
'-Excel-Datei erstellen
set myfile = fs.createtextfile(filename,true)
dim strline,responsestr
strline=""
für jedes x in rs.fields
strline= strline & x.name & chr(9)
nächste
'Schreiben Sie zuerst die Spaltennamen der Excel-Tabelle
myfile.writeline strline
während nicht rs.eof
strline=""
für jedes x in rs.fields
'Hier werden die Daten als Texttyp markiert
strline= strline & "="""&x.value &"""& chr(9)
nächste
„Schreiben Sie Tabellendaten in Excel
myfile.writeline strline
rs.movenext
wenden
link="<a href=\" & temp & " title=Daten in eecel-Tabelle speichern><font color=red><b>Excel-Datei exportieren</b></font></a> "
Antwort.Write-Link
setze myfile = nichts
setze fs=nichts
rs.close
%>
Beispiel-Quellcode-Download: http://code.knowsky.com/down/12254.html