-
Notifications
You must be signed in to change notification settings - Fork 0
/
inei_renamu.iss
189 lines (164 loc) · 8.84 KB
/
inei_renamu.iss
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
Sub Main
IgnoreWarning(True)
Call dBASEImport() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\1. Datos Generales de la Municipalidad\CDIR.dbf
Call dBASEImport1() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1483\C01.dbf
Call dBASEImport2() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1483\C02.dbf
Call dBASEImport3() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1484\C03.dbf
Call dBASEImport4() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1484\C04.dbf
Call dBASEImport5() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1485\C05.dbf
Call dBASEImport6() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1485\C06.dbf
Call dBASEImport7() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1485\C07.dbf
Call dBASEImport8() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1485\C08.dbf
Call dBASEImport9() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1485\C09.dbf
Call dBASEImport10() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C10.dbf
Call dBASEImport11() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C11.dbf
Call dBASEImport12() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C12.dbf
Call dBASEImport13() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C13.dbf
Call dBASEImport14() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C14.dbf
Call dBASEImport15() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C15.dbf
Call dBASEImport16() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C16.dbf
Call dBASEImport17() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C17.dbf
Call dBASEImport18() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C18.dbf
Call dBASEImport19() 'C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C19.dbf
Client.RefreshFileExplorer
End Sub
' Archivo - Asistente de importación: dBASE
Function dBASEImport
dbName = "CDIR.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\1. Datos Generales de la Municipalidad\CDIR.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport1
dbName = "C01.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1483\C01.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport2
dbName = "C02.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1483\C02.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport3
dbName = "C03.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1484\C03.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport4
dbName = "C04.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1484\C04.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport5
dbName = "C05.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1485\C05.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport6
dbName = "C06.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1485\C06.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport7
dbName = "C07.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1485\C07.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport8
dbName = "C08.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1485\C08.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport9
dbName = "C09.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1485\C09.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport10
dbName = "C10.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C10.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport11
dbName = "C11.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C11.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport12
dbName = "C12.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C12.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport13
dbName = "C13.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C13.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport14
dbName = "C14.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C14.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport15
dbName = "C15.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C15.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport16
dbName = "C16.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C16.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport17
dbName = "C17.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C17.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport18
dbName = "C18.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C18.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function
' Archivo - Asistente de importación: dBASE
Function dBASEImport19
dbName = "C19.IMD"
Client.AddRecordNumberFieldForImport = FALSE
Client.ImportDbaseFile "C:\Users\Intel\Documents\Mis documentos IDEA\Samples\Archivos fuente.ILB\656-Modulo1486\C19.dbf", dbName, TRUE, FALSE
Client.OpenDatabase(dbName)
End Function