Search results

Fixed. Here's the error: fso.GetFileName(file.Path) --> objFSO.GetFileName(file.Path) Thanks a lot.

Ok, that's fixed. Next: For each file In objFolder.Files file.Move targetFolder(i) & "\" & fso.GetFileName(file.Path) If I try to see every single file by "WScript fso.GetFileName(file.Path)", I get nothing.

I noticed that For i = 0 To Ubound(sourceFolder) Set objFolder = objFSO.GetFolder(sourceFolder) sourceFolder doesn't get folders path

Awesome. So, I need set this: if there's more than one file, vbs script should move all files from every single folder. This is bat script I want to rewrite to vbs script: @echo off echo. SET choice= SET /p choice=¨Quieres mover los archivos? [S/N]: IF NOT '%choice%'=='' SET...

Hi guys. I'm having a problem with a bat file that I can't seem to solve, and it's driving me crazy. I want to count the files in a folder and its subfolders, but without including a file type or the name of a specific file. This is where the problem lies: no matter how many filters I use, it...

Thanks.

ok thanks

Awesome. Thanks a lot!!!!

I've already managed to get it working. Now, this doesn't fix the problem for me. Dim prj As CurrentProject Set prj = Application.CurrentProject prj.Connection.Execute "CREATE TABLE TEvents " _ & "(DateEvent DATETIME, Name CHAR WITH COMP)"...

Dim dbs As Database Set dbs = Application.CurrentProject dbs.Connection.Execute "CREATE TABLE T00CopiasDeSeguridad " _ & "(Fecha DATETIME, Nombre CHAR WITH COMP)" dbs.Close Application.RefreshDatabaseWindow I have tried both...

Hello. I've been thinking about it for a while but I can't find the error. I have this code to create a table, where I want to put the unicode compression in the "Name" field, but I get a syntax error. I'm sure it's a silly thing, but I can't find any information on the Internet and the...

Thanks to all, guys. It's solved now.

Hi guys. I'm trying to make a loop that goes through the records in a table, but the program doesn't respond when I run it. This is the code: Private Sub CalcularImporte() Dim rstTable As DAO.Recordset Dim rst As DAO.Recordset Dim strSql As String Dim ManoDeObra As Double Dim Vehiculo As...

Thanks.

I understand you, but I don't want to have "two databases", and neither do the other two people, because they have little knowledge of computers, and it would be a mess to make them understand. That's why I decided to do it this way, because for me it has no consequences, since I've been doing...

Hi guys. One moment please. First of all, I don't like written communication because it lacks tone, body language, etc., and can lead to misinterpretations. So, Pat, I'm reading you and in my head I see you shouting (with an Andalusian accent): "Have you seen what this madman is doing? Have...

The database I attached is just an example of something more complex that I have. So, a split so I can get to the problem. I have a database configuration form so that the user can add a favicon, change the file folder path, the colors of the database, or create backups (and choose how many to...

I need this table to create backups, so I can store backups name. Therefore, users don't use this table.

Thanks a lot. I share final result.

How do I get this?