Bonjour cher amis!!
A travers ActiveX,je veux recuperer le nom d'un fichier txt pour y extraire la date du fichier et l'inserer dans une table Sqlserver2000 à travers le DTS de SQLserver2000. le code utiliser est un code VbScript. Voici un exemplaire du script au niveau duquelle la variable qui doit en principe représenter le nom de la source de donnée(fichier txt), est remplacé par le nom d'un fichier:
Je n'y arrive pas!! Au secour c'est urgent!!!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 Function Main() DTSGlobalVariables("recup").value="dbdump-01082007" DTSGlobalVariables("Position1")=Instr( DTSGlobalVariables("recup"),"-") DTSGlobalVariables("Position2 ")=Len( DTSGlobalVariables("recup"))- DTSGlobalVariables("Position1") DTSGlobalVariables("Str2") =Right( DTSGlobalVariables("recup"),Position2 ) DTSDestination("datejour")=DTSGlobalVariables("Str2") Main = DTSTransformStat_OK End Function
Partager