VB: uitleg script

Door app op 28-09-2004 13:01 gewijzigd op 28-09-2004 15:18

384 views

kan iemand deze script effe uitleggen, ik wil de formulier direct in de database hebben kan iemand me vertellen waar ik die kan veranderen......

<SCRIPT LANGUAGE="VBScript">
Sub ReadFile()
Dim Form
Set Form = Document.forms("formulier")

Dim oApp
Dim oDoc
Dim oMergedDoc
on error resume next
Set oApp = CreateObject("Word.Application")
oApp.Visible = False

oApp.Documents.Open Form.cv.value

Set oDoc = oApp.ActiveDocument.Range(0,0)
oDoc.WholeStory
Form.TekstInput.value = oDoc.Text
oApp.ActiveDocument.close False
oApp.quit
Set oApp=Nothing
End Sub
</SCRIPT>

[edit]Heeft niets met php te maken :|[/edit]

M Mitch X

28-09-2004 15:34

Heb je het niet zelf gemaakt?
Waar heb je het vandaan?

Variabelen hebben iig vage namen :P

a app

29-09-2004 13:49

ik heb het niet zelf gemaakt ik heb het gekregen van iemand..

M Mitch X

29-09-2004 20:38

<SCRIPT LANGUAGE="VBScript">
Sub ReadFile() >> functiestart
Dim Form >> Var form
Set Form = Document.forms("formulier") >> het form genaamd formulier wordt gekozen

Dim oApp >> Var
Dim oDoc >> Var
Dim oMergedDoc >> Var
on error resume next >> evt. errors afvangen (weet ut niej cker :P)
Set oApp = CreateObject("Word.Application") >> Word object maken (word openen)
oApp.Visible = False >> Niet zichtbaar voor de client

oApp.Documents.Open Form.cv.value >> documentje openen

>> Set oDoc = oApp.ActiveDocument.Range(0,0)
oDoc.WholeStory
Form.TekstInput.value = oDoc.Text
oApp.ActiveDocument.close False
oApp.quit >> Schrijven en sluiten ...
Set oApp=Nothing >> Var waarde geven
End Sub >> einde functie
</SCRIPT>

M Marien xD

29-09-2004 20:44

duidelijk ;)

M Mitch X

29-09-2004 20:49

Leg jij het maar beter uit dan :D

a app

06-10-2004 13:44

thanx mitch

? Onbekende gebruiker

06-10-2004 14:43

ehh, ik heb ook precies dezelfde probleem. Is er een ander alternatief om word documenten te lezen en dan schrijven in database, zonder enige gezeur van de beveiliging.

Het hoeft in principe geen vb-script zijn, andere script zijn ook van harte welkom, als ze maar werken :D

Reageren

Inloggen om te reageren