Changing name of export file

[Roel Schoonveld]

In Access 97 I made an application that makes text files that are
exported.
The names of the files contain two variables:
1. the value of the field BRIN in a table VasteGegevens of my
database.
2. the sequence number.

So for instance, the export file may be called Bron02AP003.txt , where
Bron is a fixed text, BRIN has the value 02AP and it is the third file
of this kind.

I made a button "KnopTest" in the form which renames the initial file
BRONaaaabbb.txt with the following code:
Private Sub KnopTest_Click( )
On Error GoTo Err_KnopTest_Cl ick
Dim Waarde As String
Waarde= "C:\BRON\Br on" & DFirst("[BRIN]", "VasteGegevens" )
&DMax("[Nummer]","Volgnummers" )+1&".txt"
Name "C:\BRON\BRONaa aabbb.txt" As Waarde
Exit_KnopTest_C lick:
Exit Sub
Err_KnopTest_Cl ick:
MsgBox Err.Description
Resume Exit_KnopTest_C lick
End Sub
But it does not work! Any suggestions?

Thanks!

Roel Schoonveld

[Douglas J. Steele]

"It does not work" isn't much for us to go on. What exactly does (or
doesn't) happen?

What value is being stored in Waarde? Is that what it should be?

--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(No private e-mails, please)

"Roel Schoonveld" <ro**@schoonvel d.com> wrote in message
news:c6******** *************** ***@posting.goo gle.com...

In Access 97 I made an application that makes text files that are
exported.
The names of the files contain two variables:
1. the value of the field BRIN in a table VasteGegevens of my
database.
2. the sequence number.

So for instance, the export file may be called Bron02AP003.txt , where
Bron is a fixed text, BRIN has the value 02AP and it is the third file
of this kind.

I made a button "KnopTest" in the form which renames the initial file
BRONaaaabbb.txt with the following code:
Private Sub KnopTest_Click( )
On Error GoTo Err_KnopTest_Cl ick
Dim Waarde As String
Waarde= "C:\BRON\Br on" & DFirst("[BRIN]", "VasteGegevens" )
&DMax("[Nummer]","Volgnummers" )+1&".txt"
Name "C:\BRON\BRONaa aabbb.txt" As Waarde
Exit_KnopTest_C lick:
Exit Sub
Err_KnopTest_Cl ick:
MsgBox Err.Description
Resume Exit_KnopTest_C lick
End Sub
But it does not work! Any suggestions?

Thanks!

Roel Schoonveld

[DFS]

"Roel Schoonveld" <ro**@schoonvel d.com> wrote in message
news:c6******** *************** ***@posting.goo gle.com...

In Access 97 I made an application that makes text files that are
exported.
The names of the files contain two variables:
1. the value of the field BRIN in a table VasteGegevens of my
database.
2. the sequence number.

So for instance, the export file may be called Bron02AP003.txt , where
Bron is a fixed text, BRIN has the value 02AP and it is the third file
of this kind.

I made a button "KnopTest" in the form which renames the initial file
BRONaaaabbb.txt with the following code:
Private Sub KnopTest_Click( )
On Error GoTo Err_KnopTest_Cl ick
Dim Waarde As String
Waarde= "C:\BRON\Br on" & DFirst("[BRIN]", "VasteGegevens" )
&DMax("[Nummer]","Volgnummers" )+1&".txt"
Name "C:\BRON\BRONaa aabbb.txt" As Waarde
Exit_KnopTest_C lick:
Exit Sub
Err_KnopTest_Cl ick:
MsgBox Err.Description
Resume Exit_KnopTest_C lick
End Sub
But it does not work! Any suggestions?

You don't need the line: Name "C:\BRON\BRONaa aabbb.txt" As Waarde

In fact, it should throw an error.

Thanks!

Roel Schoonveld

[Roel Schoonveld]

Thank you all! I found out that I just mistyped a command. Stupid me!
Roel

"DFS" <no****@nospam. com> wrote in message news:<10******* ******@corp.sup ernews.com>...

"Roel Schoonveld" <ro**@schoonvel d.com> wrote in message
news:c6******** *************** ***@posting.goo gle.com...

In Access 97 I made an application that makes text files that are
exported.
The names of the files contain two variables:
1. the value of the field BRIN in a table VasteGegevens of my
database.
2. the sequence number.

So for instance, the export file may be called Bron02AP003.txt , where
Bron is a fixed text, BRIN has the value 02AP and it is the third file
of this kind.

I made a button "KnopTest" in the form which renames the initial file
BRONaaaabbb.txt with the following code:
Private Sub KnopTest_Click( )
On Error GoTo Err_KnopTest_Cl ick
Dim Waarde As String
Waarde= "C:\BRON\Br on" & DFirst("[BRIN]", "VasteGegevens" )
&DMax("[Nummer]","Volgnummers" )+1&".txt"
Name "C:\BRON\BRONaa aabbb.txt" As Waarde
Exit_KnopTest_C lick:
Exit Sub
Err_KnopTest_Cl ick:
MsgBox Err.Description
Resume Exit_KnopTest_C lick
End Sub
But it does not work! Any suggestions?

You don't need the line: Name "C:\BRON\BRONaa aabbb.txt" As Waarde

In fact, it should throw an error.

Thanks!

Roel Schoonveld