Avatar billede ameq Nybegynder
29. august 2003 - 11:27 Der er 26 kommentarer og
1 løsning

Opdater fælet i Excel

Hej
Jeg har fundet/fået den her sidehttp://www.hinnerup.net/2001/articles/excel/

og den har jeg læse "en masse" gang.. men fatter ikke at opdater mit xls... så nu ville jeg godt have noget hjælp.. =)

Det skal lige sige at jeg måtte lave en lille smulle om for at få den til at læse fra mit xls doc. men det virker nu da =)
Avatar billede eagleeye Praktikant
29. august 2003 - 12:34 #1
du laver en excel fil med dette i:

    A          B
1  Fornavn  Efternavn
2
3

Markere A1->B1 og klader det for myRange1 så kan du indsætter data i filen sådan her:

<%
'Create and open a new ADO Connection
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
          "Data Source=" & Server.MapPath("fil.xls") & ";" & _
          "Extended Properties=""Excel 8.0;HDR=Yes;"";"

' Open the Recordset using a Named Ranged
SQL = "INSERT INTO `myRange1` (Fornavn, Efternavn) VALUES ('Jens', 'Jensen')"
Conn.Execute(SQL)


' Clean Up

Conn.Close
Set Conn = Nothing
%>
Avatar billede ameq Nybegynder
29. august 2003 - 12:37 #2
kan du tømme xls filen først?
Avatar billede ameq Nybegynder
29. august 2003 - 12:38 #3
eller bliver de over skrivet? eller skal du bare lige som til en database slette data først?
Avatar billede eagleeye Praktikant
29. august 2003 - 12:38 #4
nej.
Avatar billede eagleeye Praktikant
29. august 2003 - 12:40 #5
HVis du har excel kørene på serveren og har rettigheder til at bruge excel fra web kan du måske slette indholdet.

Det er ikke muligt at slette ræker i Excel via ADO
Avatar billede eagleeye Praktikant
29. august 2003 - 12:40 #6
Her et eks med Excel Application:


dim OXL
set oXL = CreateObject("EXCEL.application")
oXL.workbooks.Open "dinexcelfil.xls"
oXL.sheets("Ark1").Activate
'Her laver du fx et loop
for i = 1 to 10
  oXL.ActiveSheet.range("A" & i).Activate
  oXL.activecell.Value = "Linje " & i & " HER SKRIVER DU BARE DIN TEKST"
next
oXL.application.quit
set OXL = nothing
Avatar billede ameq Nybegynder
29. august 2003 - 12:42 #7
okey har ikke lige xl... kan måske få... men helt ikke =)

men hvordan skal man så "slette" de gamle data... for man kan da ikke være sikker på at man har samme mængte data være gang...
Avatar billede ameq Nybegynder
29. august 2003 - 12:43 #8
eller ville en mulighed være at åben file selv også slette alt hvad der står i den - den første row?
Avatar billede eagleeye Praktikant
29. august 2003 - 12:47 #9
Alternativt kan man måske havde to filer en "master" som er tom men indeholder kolonnerne, så kopier man den fil til en ny som er den du bruger til at ligger data i. Dermed overskrives filen hver gang man kopier "masteren".
Avatar billede eagleeye Praktikant
29. august 2003 - 12:50 #10
Der er også mange gode ting på denne side fra MS.
http://support.microsoft.com/default.aspx?scid=kb;EN-US;q257819

Blandet andet står der:
You are more restricted in deleting Excel data than data from a relational data source. In a relational database, "row" has no meaning or existence apart from "record"; in an Excel worksheet, this is not true. You can delete values in fields (cells).
You can only delete a record by blanking out the contents of each individual field

men det ikke lykkes mig at få det til at virke.
Avatar billede ameq Nybegynder
29. august 2003 - 12:51 #11
okey =( er der vist ting som min fæler (overskriften) ikke må være tænker på teng som / eller -...
Avatar billede ameq Nybegynder
29. august 2003 - 12:53 #12
for jeg får en fejl i den her line...
SQL = "INSERT INTO [Ark1$] (Date, Time, Company_name, Contact, Contact_NO, Date_Start, Time_Start, Date_End, Time_End, Support_id) VALUES ('7/20/2003', '09:47', 'Dansk', 'Peter', '631', '8/27/2003', '13:11', '8/27/2003', '13:11', '4')"

Syntax error in INSERT INTO statement.
Avatar billede ameq Nybegynder
29. august 2003 - 12:54 #13
ved ikke om du skal have "overskrifterne" fra mit xl?? men her =)
Date    Time    Company_name    Contact    Contact_NO    Date_Start    Time_Start    Date_End    Time_End    Support_id
Avatar billede eagleeye Praktikant
29. august 2003 - 12:55 #14
Via SQL gælder de samme ting som for Access at man skal replace et ' med to ''
Avatar billede eagleeye Praktikant
29. august 2003 - 12:56 #15
Date og Time er nok med garenti reservede ord så prøv at sætte [] omrking:

SQL = "INSERT INTO [Ark1$] ([Date], [Time], Company_name, Contact, Contact_NO, Date_Start, Time_Start, Date_End, Time_End, Support_id) VALUES ('7/20/2003', '09:47', 'Dansk', 'Peter', '631', '8/27/2003', '13:11', '8/27/2003', '13:11', '4')"
Avatar billede ameq Nybegynder
29. august 2003 - 12:57 #16
ja men jeg har ikke nogle ' i min date... det enste ' er for at vis at det et er en teskt...
Avatar billede ameq Nybegynder
29. august 2003 - 12:59 #17
har laver den lige mere simpel...
SQL = "INSERT INTO [Ark1$] (Date) VALUES ('7/20/2003')"
laver samme fejl
Avatar billede eagleeye Praktikant
29. august 2003 - 12:59 #18
->29/08-2003 12:56:49
Avatar billede ameq Nybegynder
29. august 2003 - 13:02 #19
arr FUCK JA =) sorry my bad... jeg for ikke alt tid se om der er noget ny... på arbejde bruger vi pop3 så jeg får færst mail 2 - 3 efter... =( HELT VILDT nedere
Avatar billede ameq Nybegynder
29. august 2003 - 13:03 #20
ALT for nice...
må jeg sprøge om noget personlidt?
Avatar billede eagleeye Praktikant
29. august 2003 - 13:05 #21
Ja du kan da prøve ;)
Avatar billede ameq Nybegynder
29. august 2003 - 13:08 #22
okey tak =)
Hvad er din uddannelse
Hvor arbejder du (Firma navn)
Hvor gamle er du
Hvor mange år har du arbejde med "hjemmeside ting" =)
Avatar billede eagleeye Praktikant
29. august 2003 - 13:14 #23
1. Diplom igeniør (svagstrøm)
2. Terma A/S
3. 30
4. tja første gang jeg kiggede på HTML kode var i 1997 (dog men lange pauser), det er først inden for de sidste par år jeg har kigget på ASP.
Avatar billede eagleeye Praktikant
29. august 2003 - 13:17 #24
(svagstrøm) -> med flest Software fag, dog havde jeg ikke nok software fag til at kalde mig Software ingeniør.
Avatar billede ameq Nybegynder
29. august 2003 - 13:21 #25
okey =)
Avatar billede ameq Nybegynder
29. august 2003 - 13:21 #26
svar du lige for de her poining vil jeg sq godt give =)
Avatar billede eagleeye Praktikant
29. august 2003 - 13:23 #27
Ja ok ;)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester