Excel og tal?
Hey...Jeg har et system, som både skal kunne læse og skrive til excel filer, og det går tildels fint nok. Jeg kan bare kun læse TEKST, ligeså snart et felt er formateret som tal, bliver der ikke retuneret noget, går jeg ind og dætter en ' foran, så det bliver til tekst, kører scriptet igen, bliver der retuneret det der skal.
Hvad skal jeg lave om, for at den også virker med felter formateret med tal?
MvH Benny
Kode:
--------------------------------------------
Function connectXls(strXls)
Set objXlsConn = Server.CreateObject("ADODB.Connection")
objXlsConn.Open "DBQ=" & strXls & "; ReadOnly=False; DRIVER={Microsoft Excel Driver (*.xls)};"
End Function
Function disconnectXls()
objXlsConn.close
Set objXlsConn = nothing
End Function
connectXls(strXls)
Set objRSXls = Server.CreateObject("ADODB.Recordset")
objRSXls.Open "select [PLC],[BESK],[PLCTYPE],[BLOCKED] from [" & strSheetName & "$] order by PLC", objXlsConn
do while not objRSXls.EOF
Response.Write(objRSXls.fields.item("PLC").value )
objRSXls.movenext
loop
objRSXls.Close
disconnectXls()
Set objRSXls = Nothing