neodbpro
Quote from Olga Beatriz Rojas on November 25, 2024, 11:54 pmHola, solicito ayuda, cuando transformo pasando un archivo de Excel con datos incorporados a Access y luego ejecuto en mi pc funciona correctamente , pero cuando paso el archivo exe junto con el archivo access a otra pc, luego de compilar, al ejecutar en otra pc aparece el Access vacío sin los datos incorporados previamente. ¿Cuál sería el inconveniente?
Hola, solicito ayuda, cuando transformo pasando un archivo de Excel con datos incorporados a Access y luego ejecuto en mi pc funciona correctamente , pero cuando paso el archivo exe junto con el archivo access a otra pc, luego de compilar, al ejecutar en otra pc aparece el Access vacío sin los datos incorporados previamente. ¿Cuál sería el inconveniente?
Quote from Olga Beatriz Rojas on November 26, 2024, 6:52 pmQuote from mishem on November 26, 2024, 8:45 amAt least attach an example and a file.
FileExists "[PubDir]SANFER.accdb" "[FOUND]"
If "[FOUND]" "=" "False"
dbpCreateAccessDatabase "[PubDir]SANFER.accdb" "Password=;Encrypted=No"
dbpOpenAccessDatabase "MBASE" "[PubDir]SANFER.accdb" ""
dbpCreateTable "MBASE" "Licen" "ID AutoInc PrimaryKey;dispo string(20);AyNP string(40);DNI string(10);codi string(10);arti string(10);descrip string(30);desde date;hasta date;sitrev string(15);cargo string(10);cd integer;form string(2)"
dbpCreateTable "MBASE" "Cargos" "cargo string(10)"
dbpExecSQL "MBASE" "INSERT INTO Cargos VALUES('TITULAR');INSERT INTO Cargos VALUES('INTERINO');INSERT INTO Cargos VALUES('SUPLENTE');INSERT INTO Cargos VALUES('CBT-INT');INSERT INTO Cargos VALUES('CBT-SUP');" ""
Else
dbpOpenAccessDatabase "MBASE" "[PubDir]SANFER.accdb" ""
EndIf
dbpOpenTable "MBASE" "Licen" ""
dbpOpenTable "MBASE" "Cargos" ""
dbpShowGrid "MBASE" "Licen" "Rectangulo1"
dbpSetGridProperties "MBASE" "Licen" "Color=White;Font=Arial,9,Normal,ANSI_CHARSET;FontColor=Black;AlternateRowColor=216,248,200;AlternateRowFontColor=Black;RowHeight=21;TitleColor=223,223,223;TitleFont=Arial,9,Normal,ANSI_CHARSET;TitleFontColor=Black;TitleRowHeight=21;HighlightColor=Highlight;HighlightFontColor=HighlightText;EditColor=Window;EditFontColor=WindowText;ShowTitles=Yes;3DTitles=No;ShowGraphics=Yes;ShowIndicator=Si;ShowColumnLines=Yes;ShowRowLines=Yes;GridLineWidth=1;GridLineColor=Gray;AllowRowResize=No;AllowColumnResize=No;AllowColumnSort=No;ConfirmDelete=No;ReadOnly=No;RowSelect=NO;ShowScrollBars=Yes;ShowNavigationBar=No"
dbpSetColumnTitles "MBASE" "Licen" "dispo=Disposición;AyNP=Apellido y Nombre;DNI=DNI N°;codi=Código;arti=Artículo;descrip=Descripción;desde=Desde;hasta=Hasta;sitrev=SRevista;cargo=Cargo;cd=CD;form=Form"
dbpSetColumnOrder "MBASE" "Licen" "dispo;AyNP;DNI;codi;arti;descrip;desde;hasta;sitrev;cargo;cd;form;"
dbpSetColumnWidths "MBASE" "Licen" "dispo=110;AyNP=160;DNI=80;codi=60;arti=60;descrip=160;desde=80;hasta=80;sitrev=60;cargo=50;cd=30;form=50"
Quote from mishem on November 26, 2024, 8:45 amAt least attach an example and a file.
FileExists "[PubDir]SANFER.accdb" "[FOUND]"
If "[FOUND]" "=" "False"
dbpCreateAccessDatabase "[PubDir]SANFER.accdb" "Password=;Encrypted=No"
dbpOpenAccessDatabase "MBASE" "[PubDir]SANFER.accdb" ""
dbpCreateTable "MBASE" "Licen" "ID AutoInc PrimaryKey;dispo string(20);AyNP string(40);DNI string(10);codi string(10);arti string(10);descrip string(30);desde date;hasta date;sitrev string(15);cargo string(10);cd integer;form string(2)"
dbpCreateTable "MBASE" "Cargos" "cargo string(10)"
dbpExecSQL "MBASE" "INSERT INTO Cargos VALUES('TITULAR');INSERT INTO Cargos VALUES('INTERINO');INSERT INTO Cargos VALUES('SUPLENTE');INSERT INTO Cargos VALUES('CBT-INT');INSERT INTO Cargos VALUES('CBT-SUP');" ""
Else
dbpOpenAccessDatabase "MBASE" "[PubDir]SANFER.accdb" ""
EndIf
dbpOpenTable "MBASE" "Licen" ""
dbpOpenTable "MBASE" "Cargos" ""
dbpShowGrid "MBASE" "Licen" "Rectangulo1"
dbpSetGridProperties "MBASE" "Licen" "Color=White;Font=Arial,9,Normal,ANSI_CHARSET;FontColor=Black;AlternateRowColor=216,248,200;AlternateRowFontColor=Black;RowHeight=21;TitleColor=223,223,223;TitleFont=Arial,9,Normal,ANSI_CHARSET;TitleFontColor=Black;TitleRowHeight=21;HighlightColor=Highlight;HighlightFontColor=HighlightText;EditColor=Window;EditFontColor=WindowText;ShowTitles=Yes;3DTitles=No;ShowGraphics=Yes;ShowIndicator=Si;ShowColumnLines=Yes;ShowRowLines=Yes;GridLineWidth=1;GridLineColor=Gray;AllowRowResize=No;AllowColumnResize=No;AllowColumnSort=No;ConfirmDelete=No;ReadOnly=No;RowSelect=NO;ShowScrollBars=Yes;ShowNavigationBar=No"
dbpSetColumnTitles "MBASE" "Licen" "dispo=Disposición;AyNP=Apellido y Nombre;DNI=DNI N°;codi=Código;arti=Artículo;descrip=Descripción;desde=Desde;hasta=Hasta;sitrev=SRevista;cargo=Cargo;cd=CD;form=Form"
dbpSetColumnOrder "MBASE" "Licen" "dispo;AyNP;DNI;codi;arti;descrip;desde;hasta;sitrev;cargo;cd;form;"
dbpSetColumnWidths "MBASE" "Licen" "dispo=110;AyNP=160;DNI=80;codi=60;arti=60;descrip=160;desde=80;hasta=80;sitrev=60;cargo=50;cd=30;form=50"