Registracija

Putanja do datoteke

Odgovori Nova tema

2 odgovora
1.648 pregleda

Putanja do datoteke 30.06.2009. u 14:52 · pre 211 meseci #1

Imam jedno malo glupo pitanje,Zasto ovaj cod nece da ptikaze na txt box-u na formi putanju do snimnjenog fajla.

Code:
Dim ObjFso As Object
Dim ObjFile

Set ObjFso = CreateObject("Scripting.FileSystemObject")
Set ObjFile = ObjFso.CreateTextFile("C:\Program Files\CNC\PRO\Asimetrije\" & Me.ID & ".txt", True)

PutanjaSimanja = ObjFile '- ova linija cod-a nece da radi. Da mi u txtbox ocita putanju snimnjenog fajla.

ObjFile.WriteLine balabla.Value

ObjFile.Close

Re: Putanja do datoteke 30.06.2009. u 18:29 · pre 211 meseci #2

nešto ti fali u ovoj liniji?

Dim objFile

Potpis

Re: Putanja do datoteke 30.06.2009. u 18:46 · pre 211 meseci #3

Probaj ovako:

Code:
Dim ObjFso As Object
Dim ObjFile
Set ObjFso = CreateObject("Scripting.FileSystemObject")
Set ObjFile = ObjFso.CreateTextFile("C:\Program Files\CNC\PRO\Asimetrije\" & Me.ID & ".txt", True)
ObjFile.WriteLine ("test")
ObjFile.Close
ObjFile = "C:\Program Files\CNC\PRO\Asimetrije\" & Me.ID

Me.PutanjaSnimanja.Value = ObjFile

End Sub

Potpis

Jednog dana...

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme