Standard Jet DBЕnb` ТUщЉgr@?œ~Ÿџ…š1ХyКэ0МпЬcйфУŸFћŠМNVkь7дœњЮ(цУ&Š`„{6%тпБЇdC?Б3фёy[B%|*‡џ|™˜§вqp!y$‚f_•ја‰$…gЦ'DвюЯeэџЧFЁx эщ-bдT4.0IdЛvаNY Y  Y €Y Y Y  Y Y AttributesDataTypeFieldNameIndexTypeSkipColumn SpecID Start Widthƒџџџџџџ џџЬџџџџџџ џџЬ Ь€ƒџџџџџџ џџЬџџџџџџ џџЬ Ь‰YџџџџYџџџџ Index1PrimaryKeyџџQ^ mJL^Qk`kvkJMQk`kvkdL[QMmk`kvkhoQiYQk`kvkiQ^JmYdbkWYfkJMMQkk^Jvdom `kvkOLko``JivYbSdokQiOQSYbQO€фjюДт@N%яДт@fromspss00000000000 П€€€юэДт@юэДт@getSPSSvars66666666666 П€ €юэДт@юэДт@UserDefined66666666666 П€ €юэДт@юэДт@SummaryInfo66666666666 П€ €юэДт@юэДт@AccessLayout88888888888 П€юэДт@юэДт@SysRel,,,,,,,,,,, П€юэДт@юэДт@Scripts........... П€юэДт@юэДт@Reports........... П€юэДт@юэДт@Modules........... П€юэДт@юэДт@Forms*********** ПюэДт@юэДт@€MSysRelationshipsЕоDDDDDDDDDDB џюэДт@юэДт@€MSysQueriesЕо88888888886 џюэДт@юэДт@€MSysACEsЕо22222222220 џюэДт@юэДт@€MSysObjectsЕо88888888886 џюэДт@юэДт@€MSysDbДм.........., џюэДт@юэДт@€Rel€‡џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџо YS  Y   Y Y  Y Y  Y  ўY  Y  r Y s Y E Y a Y dў Y 2ўY  Y   Y  jўY ConnectDatabaseDateCreateDateUpdate FlagsForeignNameIdLvLvExtraLvModule LvPropName OwnerParentIdRmtInfoLongRmtInfoShortTypeƒџџџџnџџџџiџџџџџџџџTѓ€ƒџџџџ€џџѓџџTџџџџ€џџѓџџTџџTѓ€YџџџџYџџџџIdParentIdName        џџ'@ ќџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЉOYCSY Y Y  Y 2ўACMFInheritableObjectIdSIDƒџџџџџџџџџџџџџџџџџџџџџџџџџџ ˆYџџџџObjectIdџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџўџџџўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot EntryџџџџџџџџаHƘЁС@PropData џџџџForms џџџџРЅ#˜ЁСРЅ#˜ЁСReportsџџџџРЅ#˜ЁСРЅ#˜ЁСўџџџўџџџўџџџўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџijфgetSPSSvarsMSysDbModulesџџџџРЅ#˜ЁС@'ў˜ЁСScriptsџџџџџџџџџџџџРЅ#˜ЁСРЅ#˜ЁСVBAџџџџџџџџ РЅ#˜ЁСР ј˜ЁСCmdbarsџџџџџџџџџџџџРЅ#˜ЁСРЅ#˜ЁСDataAccessPages џџџџџџџџџџџџРЅ#˜ЁСРЅ#˜ЁСDatabasesџџџџџџџџ `,%˜ЁС@'ў˜ЁС0џџџџ `,%˜ЁС@'ў˜ЁСBlob џџџџџџџџџџџџўџџџCustomGroups џџџџ`,%˜ЁС`,%˜ЁСVBAProjectџџџџџџџџ€Э,˜ЁС€Э,˜ЁС0џџџџ0ТĘЁС0ТĘЁСPropDatažšы YSY  Y Y Y  Y ўў Y ўўY  Y ўўAttributeExpressionFlagLvExtra Name1 Name2ObjectId Orderƒџџџџnџџџџzџџџџfџџ edYџџџџ"ObjectIdAttributeџџџџџџџџџџџџџџCustomGroups џџџџ`,%˜ЁС`,%˜ЁСVBAProjectџџџџ€Э,˜ЁСРзы˜ЁС0џџџџ0ТĘЁС0ТĘЁСPropDataџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџ §џџџ ўџџџ ўџџџўџџџ!"#$%&'()ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџDirDataџџџџџџџџџџџџ DirDataџџџџџџџџџџџџAcessVBADataџџџџџџџџџџџџVBAџџџџџџџџ€9˜ЁСРзы˜ЁСPROJECTwmџџџџџџџџџџџџ &PROJECTџџџџ^_VBA_PROJECTџџџџџџџџџџџџ8Д YYZDMACULIPGCEZFAQYMGWDENSL_:џџџџџџџџ Іўџџџўџџџўџџџўџџџўџџџ ўџџџўџџџ ўџџџ !"#$%&'()*ўџџџ,-./01234567ўџџџ9:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijўџџџlmўџџџopqrstuvwxyz{|}~ўџџџ"2725F6FB0E051A061A06E5" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] getSPSSvars=0, 0, 0, 0, C getSPSSvarsgetSPSSvarsrU€€€ џџџџџџџџџџџџ spssfilelabtabm“K*mџџџџrU€€€€~~~~~~~~~Root Entryџџџџџџџџ@'ў˜ЁС PropData џџџџFormsžšЫ -YSY Y Y  Y ў Y ў Y ў Y ў Y ˆўccolumn grbiticolumnszColumnszObject$szReferencedColumn$szReferencedObjectszRelationshipƒџџ>џџhџџџџџџ€џџѓџџTџџџџ€ Tѓ€‚ƒџџ€џџѓџџTџџџџ€џџѓџџTџџџџ€ Tѓ€‚ƒџџ€џџѓџџTџџџџ€џџѓџџTџџџџ€ Tѓ€‚YџџџџYџџџџYџџџџszObject$szReferencedObjectszRelationshipџџP_2џџџџџџџџnv__SRP_3џџџџkždirџџџџџџџџџџџџ+__SRP_0џџџџ,__SRP_1џџџџџџџџџџџџ `џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ~e Щ Mc-šљC˜ •ђŸњŠO  фџџџџ‰a  џџџџџџџџбщџџй™ЁyqQydb1 getSPSSvarsяРF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA љџџџџ !‰0 ЩџJ™_ЏNЊ? 3C:\Program Files\Microsoft Office\Office\MSACC9.OLBAccess ёџџџџ ‰@^РFF:\WINNT\System32\dao350.dllDAO љџџџџ!iPPћБGр3ЮНuЊY: !C:\Program Files\SPSS\spsswin.tlbspsswin бџџџџ  Y`0РFC:\WINDOWS\SYSTEM32\STDOLE2.TLBstdole Щџџџџё9pWсРFCC:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLBVBIDE Љџџџџбa€main GetSpssLab  $C:\data\mydata.sav fromspss jІVзјЮЏ.РzМ рЌеLјЮЏ.РzМ С џџџџСЩЄsжа˜П Щ ШйРцЬh)aЏNЊ?Yџџџџq€Њm.ЄбО™ЁUWЯ‹яРIТ 1€Њm.Є VARNAMES€Њm.ЄQ€Њm.Є VARLABEL VALUE VALLABELИfФЄŸIЛxЊ8<Л CˆYЈVBE6.DLL С џџџџ­ И Г€0* pH‚dфdb1@е= d  ђњ€<Ј J< ˜ DAO>„D€AO wm*\G{00€025E01-:0C  0046}#5.0#0#F:\WINNT\System32\dao350.dll#Microsoft o 3.5 Object Li`braryo€spssw in>ps€win5€No€ e€N47B1FB50-33E0-11CE -BD75€NAA0059033A}#7€N409#C:\Program Files@\SPSS\6.tlb# Ty peJstdole>‚ st€doleIhG^IŠ204ж3„•‘-˜2˜H˜DOWS\SYSTEM€LSTDOLE2.TLB# Autom`ation€A~VBIDE> VBIPDE"ЗР­УРEnE157‚jRn3@n"KFCommon„I‡nžšYЛv1ьЇbи “ N Ф  : ѕ А k & с œ W  Э ˆ C ўЙt/ъЅ € @@6 €€€@€@€@ UQmkfkkqJikOJmJJMMQkkfJUQkOJmJLJkQkSdi`k `dOo^Qk iQ^JmYdbkWYfkiQfdimk kMiYfmk kvkiQ^ mJL^QkSid`kfkk`kvkJMMQkkdL[QMmk`kvkJMQk`kvkY`QuMd^o`bk`kvkY`QukfQMk`kvkdL[QMmk`kvkhoQiYQk`kvkiQ^JmYdbkWYfkJMMQkk^Jvdom`kvkOLko``JivYbSdokQiOQSYbQOokQiOQSYbQO.0#409#C:\Program Files\SPSS\spsswin.tlb#SPSS Type Library џџџџџџџџј}п9џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‚2getSPSSvars 1539df7df2*DџџvP:џџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџx<эbЊЇ‘д™YР№#5-џџџџџџџџшџџџџ €7=џ,Access€џCall.€џDebugG€џEndА€џSubVBAїтWin16С~Win32MacГВDAOž‚db1Ѕ‚spsswin7о getSPSSvarsŠ €џ lux=€gGetSpssLabЅspssfileRњlabtab>{spssappяn €џApplicationЅ*spssdatг| €џISpssDataDocnh €џOpenDataDoc›i`jaretЮnvarsДИncodes]rs_ €џRecordsetкц €џdbOpenDynaset – €џCurrentDbS €џOpenRecordsetе|ErrExitФGpNames_TpLabelsŠpTypesOA pMsmtLevels pLabelCounts*€џGetVariableInfoD pvalues\я pvaluelabels*њ€џGetVariableValueLabels‹В€џAddNewaЃ€џUpdateвќ€џQuit9ЎModule1b€џFields7ЉItemзz€џValueфKErroŠNumberЃ- DescriptionО mainˆ, €џџџ_B_var_mainє‘fromspssЦъ €џџџ_B_var_CallЗйmaid~, €џџџ_B_var_subН’€џџџ_B_var_fromspssOТ GetSpssDataЊ7GetData(…џџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџ џџ dirЭЩБ€0* pH‚dфdb1@е= d  ј}п9Ј J< ˜ DAO>„D€AO wm*\G{00€025E01-:0C  0046}#4.0#0#F:\WINNT\System32\dao350.dll#Microsoft o 3.5 Object Li`braryo€spssw in>ps€win5€No€ e€N47B1FB50-33E0-11CE -BD75€NAA0059033A}#7€N409#C:\Program Files@\SPSS\6.tlb# Type‹JОA‚‚2 @getvars_VBA_MO€DULE2€ _VBЊ_MODU LE€ H‚1‚Ь:‚,BvP!B+BBžšZ  @€ @€ @      €€€€€€€€ '#'$ 'C 'D 'E 'F€'6€'7€'8€'G€'(€')€'H€'9€':€';€'<€'=€'>€'%€'&€''€'*€'+€',€'-€'.€'/€'K€'L€'?€'@€'A€'B'''''' ' ' ' '''4E-00AA003F0F07}#8.0#0#F:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Libraryк*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#F:\WINNT\System32\dao350.dll#Microsoft DAO 3.5 Object LibraryЪ*\G{47B1FB50-33E0-11CE-BD75-00AA0059033A}#7.0#409#C:\Program Files\SPSS\spsswin.tlb#SPSS Type Library џџџџџџџџј}п9џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‚2getSPSSvars 1539df7df2*DџџvP:џџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџx<эbЊЇ‘д™YР№#5-џџџџџџџџшџџџџ €7=џ,Access€џCall.€џDebugG€џEndА€џSubVBAїтWin16С~Win32MacГВDAOž‚db1Ѕ‚spsswin7о getSPSSvarsŠ €џ_Evaluateй GetSpssLabЅspssfileRњlabtab>{spssappяn €џApplicationЅ*spssdatг| €џISpssDataDocnh €џOpenDataDoc›i`jaretЮnvarsДИncodes]rs_ €џRecordsetкц €џdbOpenDynaset – €џCurrentDbS €џOpenRecordsetе|ErrExitФGpNames_TpLabelsŠpTypesOA pMsmtLevels pLabelCounts*€џGetVariableInfoD pvalues\я pvaluelabels*њ€џGetVariableValueLabels‹В€џAddNewaЃ€џUpdateвќ€џQuit9ЎModule1b€џFields7ЉItemзz€џValueфKErroŠNumberЃ- DescriptionО mainˆ, €џџџ_B_var_mainє‘fromspssЦъ €џџџ_B_var_CallЗйmaid~, €џџџ_B_var_subН’€џџџ_B_var_fromspssOТ GetSpssDataЊ7GetData(…џџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџ џџ dirЭЩБ€0* pH‚dфdb1@е= d  ј}п9Ј J< ˜ DAO>„D€AO wm*\G{00€025E01-:0C  0046}#4.0#0#F:\WINNT\System32\dao350.dll#Microsoft o 3.5 Object Li`braryo€spssw in>ps€win5€No€ e€N47B1FB50-33E0-11CE -BD75€NAA0059033A}#7€N409#C:\Program Files@\SPSS\6.tlb# Type‹JОA‚‚2 @getvars_VBA_MO€DULE2€ _VBЊ_MODU LE€ H‚1‚Ь:‚,BvP!B+BBХ  @€ @€ @€ @€ @€ @€ @€ @€######### # # # #############$#% #& #' #(€#9€#:€#;€#<€#0€#1€#2€#=€#>€#?€#@€#A€#B€#)€#*€#+€#,€#-€#.€#/€#3€#4€#5€ #6€ #7€ #8#### ## ####!#"########em32\dao350.dll#Microsoft DAO 3.5 Object LibraryЪ*\G{47B1FB50-33E0-11CE-BD75-00AA0059033A}#7.0#409#C:\Program Files\SPSS\spsswin.tlb#SPSS Type LibraryМ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\SYSTEM32\STDOLE2.TLB#OLE AutomationZ*\G{0002E157-0000-0000-C000-000000000046}#5.3#0#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB#Microsoft Visual Basic for Applications Extensibility 5.3 џџџџџџђњ€<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‚28YYZDMACULIPGCEZFAQYMGWDENSL_023c80faf2џџgetSPSSvarsџџvPќџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ“ў НоВ]K‡ƒДіДж­џџџџџџџџ`€13џ+ Access VBAїтWin16С~Win32MacГВVBA6­# db1Ѕ‚DAOž‚spsswin7о getSPSSvarsŠ _EvaluateйЌ(mainˆ, Ќ(GetSpssLabЅspssfileRњlabtab>{spssappяn ApplicationЅ*spssdatг| ISpssDataDocnh OpenDataDoc›i`jaretЮpNames_TpLabelsŠpTypesOA pMsmtLevels pLabelCounts*pvalues\я pvaluelabels*њnvarsДИncodes]rs_ Recordsetкц CurrentDbS OpenRecordsetе| dbOpenDynaset –ErrExitФGGetVariableInfoD GetVariableValueLabels‹ВAddNewaЃUpdateвќErroŠNumberЃ- DescriptionО Quit9Ў stdole“` VBIDEAџ€џFields7ЉItemзz€џValueфKџџ`џџџџџџџџџџџџџџџџџџџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџZџџ\џџџџџџџџrU€€€ џџџџџџџџ$`§џџџџџџџџџџџ,Љ`§џџџџџџџџџџџa00nrU€€€€~| ‰)Љ1 Љ Љбљ! I y Ё Щ  ) с a ‰ žš e> newsgroup 2000/09/23–@]ђР]ђрэЦ.э  %$. ]ђ]ђ]ђ0ђHђ`ђxђђЈ]ђРђи]ђ№]ђ]ђ э  F B%D.>ЩH@ ѕ , . 0 2 47J':џ &ўЌ :Ќ ’ &$4'< <Ќ œ & 6 87L'*џ (ўЌ <Ќ ’ >B@N &$,ЖVARNAME+> &$.ЖVARLABEL+> ($6ЖVALUE+> ($8ЖVALLABEL+> >B@PџЧkџџџЧјqџџ№ЃHш[й R!Tз R!Vж B@X >B@BoџџЈџџџџ џџџџІГAttribute VB_Name = "getSPSSvars" Option Compare Database`Expli cit Sub main() Call G˜pssLab( "C:\d|\my .sav",€ "froms"Т"2End BK' This imports “iable n Ћs,labellues &   ' directlyB n an т *B file.Thomas.Zapf-Schramm@t-online.de> newsgroup 2000Р/09/23S{ˆtg* As Sё€Аng,E€œ‡€vB Dim a pp win.”ApЊaН ‰3€œ‰IS€œЩDo"cSet(= xNew‚’)С=A .OpenD(#2+iLonъgЧ%jr@!?С (, pA–s Vaрriant€„lqЫTypРn€ ‡ MРsmtLevŽ ‚pCoun… ‡$pќva‚ Тƒ„ nМA‹7ncod У%Ыr‚4Reco№rdseРСiСT= CurrenиtDbTF (РР, dbZynгtФWOn Err€or GoToExжСC)Wit>hj€lCСУ-= .€ ‚N@ШInfoў(^F[‚XРЧU€Wˆ)Ё Fрiр0Ц `C - 1Ї"‘C#= ph(iЈ‘ЁIf d(>   xhenЋaF+Vу!8Т s(i #:яУ8  СjЦуюars.Add€dУ("VARРNAME")` у)юAШLABELЯуХ№LUЄ #|(jЛШ #!И.{spssappяn ApplicationЅ*spssdatг| ISpssDataDocnh OpenDataDoc›i`jaretЮpNames_TpLabelsŠpTypesOA pMsmtLevels pLabelCounts*pvalues\я pvaluelabels*њnvarsДИncodes]rs_ Recordsetкц CurrentDbS OpenRecordsetе| dbOpenDynaset –ErrExitФGGetVariableInfoD GetVariableValueLabels‹ВAddNewaЃUpdateвќErroŠNumberЃ- DescriptionО Quit9Ў stdole“` VBIDEAџ€џFields7ЉItemзz€џValueфKџџ`џџџџџџџџџџџџџџџџџџџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџZџџ\џџџџџџџџID="{2CD89A12-E01B-4EE4-90E6-0B915283C6B0}" Module=getSPSSvars Name="db1" HelpContextID="0" VersionCompatible32="393222000" CMG="0D0FDCEDE4FEE8FEE8FEE8FEE8" DPB="1A18CBE4D9E5D9E5D9" GC="2725F6FB0E051A061A06E5" [Host Extender Info] &H00000001={38№Єд8џџџџк і‚2vPџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ )”џџ)Lџџ(Lџџ@> џџџџPџџџџLџџџџџџџџ”џџџџLџџџџLџџџџLџџџџ”џџџџLџџџџџџџџLџџџџ<џџџџџџ"˜р @`џџџџџџџџ€tџkџџџџџџџџџџ „ џџџџ`џџџџџџџџhˆўk€џџџџџџ%%„iƒџџџџ џџџџ €iƒџџџџџџџџџџџџ€ „џџџџxџџџи% „ џџџџtџџџј%`„&џџџџlџџџџџ`„(џџџџhџџџџџ`„*џџџџdџџџџџ`„,РTџџџ џџ`„.џџџџDџџџ џџ`„0H4џџџ џџ`„2$џџџ џџ`„4`џџџ џџ`„6џџџџџџџ џџ`„8Јєўџџ џџ`„:џџџџ№ўџџџџј`„<џџџџьўџџџџ „>€шўџџ8%џџџџџџџџ@ƒџџџџџџxџџџџџџџџџџџџџџ %џџžš џџџџџџџџџџџџџџџџџџџџџџџџџџџџџPROJECTwmџџџџџџџџџџџџz&AcessVBADataџџџџџџџџџџџџ{Forms џџџџРЋ™ЁСРЋ™ЁСCmdbarsџџџџџџџџџџџџРЋ™ЁСРЋ™ЁСModulesРЋ™ЁСРЋ™ЁС0џџџџРЋ™ЁСРЋ™ЁСPropDataџџџџџџџџџџџџ| DirDataџџџџџџџџџџџџ} ReportsџџџџџџџџџџџџРЋ™ЁСРЋ™ЁСScriptsџџџџРЋ™ЁСРЋ™ЁСPropDataџџџџџџџџџџџџ~DatabasesРЋ™ЁСРЋ™ЁС0џџџџРЋ™ЁСРЋ™ЁСBlob џџџџџџџџџџџџўџџџDirDataџџџџџџџџџџџџCustomGroupsџџџџџџџџРЋ™ЁСРЋ™ЁСDataAccessPages џџџџџџџџџџџџРЋ™ЁСРЋ™ЁСџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџSTEM€LSTDOLE2.TLB# Autom`ation€A~VBIDE> VBIPDE"ЗР­УРEnE157‚jRn3@n"KFCommon„I‡nSha€red\VBAС6E6EXT.O+G Visual Basic for Applic1s ExtensibiliРty 5.3Р+€"ИТ‚2ˆ @getСd€varsGA\tSPРS@varР†РYYZDMACULIPGCEZFAQYMGWDENSL_2„8AYZРJ‚M@КCUL@N PGC@OZЊF@Q@M@WBT"N@L_B"H@1гќXB,-vTP!B+BB“K*mџџџџrU€€€€~~~~~~~~~~e Щ Mc-šљC˜ •ђŸњŠO  фџџџџ‰a  џџџџџџџџбщџџй™ЁyqQydb1 getSPSSvarsяРF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA љџџџџ !‰0žš @ўџ€pџџџ џџ џџџџFBR@ўџPиўџџ џџ @ўџhШўџџ џџ @ўџџџџџИўџџ џџ @ўџџџџџДўџџ џџ џџџџўџџџџџАўџџИ`% @ўџџџџџЌўџџџџ @ўџЈўџџџџ (ш@ўџPЄўџџџ h@ўџџџџџ”ўџџ џџ @ўџxўџџџџ P@ўџџџџџŒўџџџ  xАxџџџџ@ўџџџџџˆўџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ђњ€<$*\Rffff*023c80faf2*\R3*#22*\R3*#1b*\R2*#2e*\R3*#20*\R3*#20*\R2*#0*\R1*#99*\R1*#98*\R2*#24*\R2*#28*\R2*#29*\R2*#2a*\R0*#13*\R0*#19пўЪ4€€€ џџџџ€ џџџџ"( @€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ JH€ (˜€ <Р€ џџџџ" €€ (€@€H€&P€x€ˆ€€˜8 И€ џџџџ Р,Шш   8 PA`A€A AР р № ј €@ 0 @Pџџџџ`ЭџџxЭџџp–ЖC:\data\mydata.savЖfromspssAoџџ8рD This imports variable names, variable labels, values & value labelsр" directly from an SPSS *.sav file.р6 Thomas.Zapf-Schramm@t-online.de> newsgroup 2000/09/23–@]ђР]ђрэЦ.э  %$. ]ђ]ђ]ђ0ђHђ`ђxђђЈ]ђРђи]ђ№]ђ]ђ э  F B%D.>ЩH@ ѕ , . 0 2 47J':џ &ўЌ :Ќ ’ &$4'< <Ќ œ & 6 87L'*џ (ўЌ <Ќ ’ >B@N &$,ЖVARNAME+> &$.ЖVARLABEL+> ($6ЖVALUE+> ($8ЖVALLABEL+> >B@PџЧkџџџЧјqџџ№ЃHш[й R!Tз R!Vж B@X >B@BoџџЈџџџџ џџџџІГAttribute VB_Name = "getSPSSvars" Option Compare Database`Expli cit Sub main() Call G˜pssLab( "C:\d|\my .sav",€ "froms"Т"2End BK' This imports “iable n Ћs,labellues &   ' directlyB n an т *B file.Thomas.Zapf-Schramm@t-online.de> newsgroup 2000Р/09/23S{ˆtg* As Sё€Аng,E€œ‡€vB Dim a pp win.”ApЊaН ‰3€œ‰IS€œЩDo"cSet(= xNew‚’)С=A .OpenD(#2+iLonъgЧ%jr@!?С (, pA–s Vaрriant€„lqЫTypРn€ ‡ MРsmtLevŽ ‚pCoun… ‡$pќva‚ Тƒ„ nМA‹7ncod У%Ыr‚4Reco№rdseРСiСT= CurrenиtDbTF (РР, dbZynгtФWOn Err€or GoToExжСC)Wit>hj€lCСУ-= .€ ‚N@ШInfoў(^F[‚XРЧU€Wˆ)Ё Fрiр0Ц `C - 1Ї"‘C#= ph(iЈ‘ЁIf d(>   xhenЋaF+Vу!8Т s(i #:яУ8  СjЦуюars.Add€dУ("VARРNAME")` у)юAШLABELЯуХ№LUЄ #|(jЛШ #!И. џЩ‹8Ет@9Ет@MSysAccessObjectsе?DDDDDDDDDDB џW+ьяїс@ЦзХ7ејс@fromspssе?5@%>>>22222220 џ@ €€€~~Ѓїс@!j+Ет@getSPSSvarsе?88888888886 џ€ €'œzгліс@'œzгліс@UserDefinedе?88888888886 џ€ €^zгліс@^zгліс@SummaryInfoе?€@%DDD88888886 џ@€ €јсхзліс@Ђ Dт@AccessLayoutе?4€MR2€KeepLocal TТ@$†zz:::::::8 џ@€Ю…}гліс@Ю…}гліс@SysRelе?.........., џ€ЋG}гліс@ЋG}гліс@Scriptsе?0000000000. џ€ЋG}гліс@ЋG}гліс@Reportsе?0000000000. џ€ЋG}гліс@ЋG}гліс@Modulesе?0000000000. џ€ЋG}гліс@ЋG}гліс@Formsе?,,,,,,,,,,* џ€кэ*Ет@кэ*Ет@DataAccessPagesе?@@@@@@@@@@> џ\twгліс@\twгліс@€MSysRelationshipsд=DDDDDDDDDDB џ\twгліс@\twгліс@€MSysQueriesд=88888888886 џ\twгліс@\twгліс@€MSysACEsд=22222222220 џ\twгліс@\twгліс@€MSysObjectsд=88888888886 џ\twгліс@ЩI'Ет@€MSysDbе?@%:::......., џ@\twгліс@\twгліс@€Relationshipsд=<<<<<<<<<<: џ\twгліс@\twгліс@€Databasesд=44444444442 џ\twгліс@\twгліс@€Tablesд=.........., џЇQYN Y  Y dY  Y dvarnamevarlabel valuevallabelƒџџџџџџџџџџџџџџџџџџџџџџџџџˆ€Yџџџџvarnameџџ     €€€€StartRowTextDelimTimeDelimƒџџ џџЬџџџџџџ џџЬџџџџџџ Ь ‰YџџџџPrimaryKeyџџ€л№Дт@м№Дт@MSysIMEXColumns>>>>>>>>>>> ПфjюДт@л№Дт@fromspss00000000000 П€€€юэДт@юэДт@getSPSSvars66666666666 П€ €юэДт@юэДт@UserDefined66666666666 П€ €юэДт@юэДт@SummaryInfo66666666666 П€ €юэДт@юэДт@AccessLayout88888888888 П€юэДт@юэДт@SysRel,,,,,,,,,,, П€юэДт@юэДт@Scripts........... П€юэДт@юэДт@Reports........... П€юэДт@юэДт@Modules........... П€юэДт@юэДт@Forms*********** ПюэДт@юэДт@€MSysRelationshipsЕоDDDDDDDDDDB џюэДт@юэДт@€MSysQueriesЕо88888888886 џюэДт@юэДт@€MSysACEsЕо22222222220 џюэДт@юэДт@€MSysObjectsЕо88888888886 џюэДт@юэДт@€MSysDbДм.........., џюэДт@юэДт@€RelationshipsЕо<<<<<<<<<<: џюэДт@юэДт@€DatabasesЕо44444444442 џюэДт@юэДт@€TablesЕо.........., џЛv1щвЄv<N Y  d Y  Y dY vallabelvarnamevarlabel valueџџџџџџРЅ#˜ЁСРЅ#˜ЁСijфgetSPSSvarsMSysDbID="{2CD89A12-E01B-4EE4-90E6-0B915283C6B0}" Module=getSPSSvars Name="db1" HelpContextID="0" VersionCompatible32="393222000" CMG="0D0FDCEDE4FEE8FEE8FEE8FEE8" DPB="1A18CBE4D9E5D9E5D9" GC=__SRP_2џџџџџџџџnv__SRP_3џџџџkždirџџџџџџџџџџџџ+__SRP_0џџџџ,__SRP_1џџџџџџџџџџџџ `џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ~e Щ Mc-šљC˜ •ђŸњŠO  фџџџџ‰a  џџџџџџџџбщџџй™ЁyqQydb1 getSPSSvarsяРF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA љџџџџ !‰0 ЩџJ™_ЏNЊ? 3C:\Program Files\Microsoft Office\Office\MSACC9.OLBAccess ёџџџџ ‰@^РFF:\WINNT\System32\dao350.dllDAO љџџџџ!iџџџР>:Ет@N7;Ет@fromspss00000000000 П €€€Р>:Ет@Р>:Ет@getSPSSvars66666666666 П€ €Р>:Ет@Р>:Ет@UserDefined66666666666 П€ €Р>:Ет@Р>:Ет@SummaryInfo66666666666 П€ €Р>:Ет@Р>:Ет@AccessLayout88888888888 П€Р>:Ет@Р>:Ет@SysRel,,,,,,,,,,, П€Р>:Ет@Р>:Ет@Scripts........... П€Р>:Ет@Р>:Ет@Reports........... П€Р>:Ет@Р>:Ет@Modules........... П€Р>:Ет@Р>:Ет@Forms*********** П€Р>:Ет@Р>:Ет@DataAccessPages>>>>>>>>>>> ПР>:Ет@Р>:Ет@€MSysRelationshipsд=DDDDDDDDDDB џР>:Ет@Р>:Ет@€MSysQueriesд=88888888886 џР>:Ет@Р>:Ет@€MSysACEsд=22222222220 џР>:Ет@Р>:Ет@€MSysObjectsд=88888888886 џР>:Ет@Р>:Ет@€MSysDbе?..........џўcat1џўcat1 labelџўValue label 2 for cat10 џўcat1џўcat1 labelџўValue label1 for cat1/ idџўid labelџўValue label 4# idџўid labelџўValue label 2# idџўid labelџўValue label 1# я @€MJm8MJm8YOYOYODatabaseDateCreateDateUpdate FlagsForeignNameIdLvLvExtraLvModule LvPropName OwnerParentIdRmtInfoLongRmtInfoShortTypeƒџџџџnџџџџiџџџџџџџџTѓ€ƒџџџџ€џџѓџџTџџџџ€џџѓџџTџџTѓ€YџџџџYџџџџIdParentIdName        џџ‚2vPџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ )”џџ)Lџџ(Lџџ@> џџџџPџџџџLџџџџџџџџ”џџџџLџџџџLџџџџLџџџџ”џџџџLџџџџџџџџLџџџџ<џџџџџџ"˜р @`џџџџџџџџ€tџkџџџџџџџџџџ „ џџџџ`џџџџџџџџhˆўk€џџџџџџ%%„iƒџџџџ џџџџ €iƒџџџџџџџџџџџџ€ „џџџџxџџџи% „ џџџџtџџџј%`„&џџџџlџџџџџ`„(џџџџhџџџџџ`„*џџџџdџџџџџ`„,РTџџџ џџ`„.џџџџDџџџ џџ`„0H4џџџ џџ`„2$џџџ џџ`„4`џџџ џџ`„6џџџџџџџ џџ`„8Јєўџџ џџ`„:џџџџ№ўџџџџј`„<џџџџьўџџџџ „>€шўџџ8%џџџџџџџџ@ƒџџџџџџxџџџџџџџџџџџџџџ %џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџ@ўџPxџџџџџ @ўџџџџџtџџџџџ  р№0џџџџџџџџџџџџџџџџиџџџџР xџџџџР8џџџџ8џџџџаџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџшџџџџџџџџџџџџџџџџ Р@ўџ€pџџџ џџ џџџџFBR@ўџPиўџџ џџ @ўџhШўџџ џџ @ўџџџџџИўџџ џџ @ўџџџџџДўџџ џџ џџџџўџџџџџАўџџИ`% @ўџџџџџЌўџџџџ @ўџЈўџџџџ (ш@ўџPЄўџџџ h@ўџџџџџ”ўџџ џџ @ўџxўџџџџ P@ўџџџџџŒўџџџ  xАxџџџџ@ўџџџџџˆўџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ђњ€<$*\Rffff*023c80faf2*\R3*#22*\R3*#1b*\R2*#2e*\R3*#20*\R3*#20*\R2*#0*\R1*#99*\R1*#98*\R2*#24*\R2*#28*\R2*#29*\R2*#2a*\R0*#13*\R0*#19пўЪ4€€€ џџџџ€ џџџџ"( @€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ JH€ (˜€ <Р€ џџџџ" €€ (€@€H€&P€x€ˆ€€˜8 И€ џџџџ Р,Шш   8 PA`Ažš яY дђ=дђ=дђ=N Y ˜Y DataIDƒџџџџџџџџџџџџџџџџџџ‰YџџџџAOIndexџџ€%€*€+€,€-€.@€Лv1Z4р@xK[€€€@@ ˜ЬѓИ6џюя0SysAccessObjectsДмLLLLLLLLLLJ џ 07.53   les\Microsoft Shared\VBA\VBA332.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#8.0#0#F:\Program Files\Microsoft Office\Office\MSACC8.OLB#Microsoft Access 8.0 Object Libraryк*\G{00025E01-0000-0000-C000-000000000046}#4.0#0#F:\WINNT\System32\dao350.dll#Microsoft DAO 3.5 Object LibraryЪ*\G{47B1FB50-33E0-11CE-BD75-00AA0059033A}#7.0#409#C:\Program Files\SPSS\spsswin.tlb#SPSS Type Library џџџџџџџџј}п9џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‚2getSPSSvars 1539df7df2*DџџvP:џџџџџџ0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџx<эbЊЇ‘д™YР№#5-џџџџџџџџшџџџџ €7=џ,Access€џCall.€џDebugG€џEndА€џSubVBAїтWin16С~Win32MacГВDAOž‚db1Ѕ‚spsswin7о getSPSSvarsŠ €џ lux=€gGetSpssLabЅspssfileRњlabtab>{spssappяn €џApplicationЅ*spssdatг| €џISpssDataDocnh €џOpenDataDoc›i`jaretЮnvarsДИncodes]rs_ €џRecordsetкц €џdbOpenDynaset – €џCurrentDbS €џOpenRecordsetе|ErrExitФGpNames_TpLabelsŠpTypesOA pMsmtLevels pLabelCounts*€џGetVariableInfoD pvalues\я pvaluelabels*њ€џGetVariableValueLabels‹В€џAddNewaЃ€џUpdateвќ€џQuit9ЎModule1b€џFields7ЉItemзz€џValueфKErroŠNumberЃ- DescriptionО mainˆ, €џџџ_B_var_mainє‘fromspssЦъ €џџџ_B_var_CallЗйmaid~, €џџџ_B_var_subН’€џџџ_B_var_fromspssOТ GetSpssDataЊ7GetData(…џџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџ џџ dirЭЩБ€0* pH‚dфdb1@е= d  ј}п9Ј J< ˜ DAO>„D€AO wm*\G{00€025E01-:0C  0046}#4.0#0#F:\WINNT\System32\dao350.dll#Microsoft o 3.5 Object Li`braryo€spssw in>ps€win5€No€ e€N47B1FB50-33E0-11CE -BD75€NAA0059033A}#7€N409#C:\Program Files@\SPSS\6.tlb# Type‹JОA‚‚2 @getvars_VBA_MO€DULE2€ _VBЊ_MODU LE€ H‚1‚Ь:‚,BvP!B+BBžšK[аЯрЁБс>ўџ #ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ ?ЏЅС/@!VBAџџџџџџџџ %™ЁС ?ЏЅСVBAProjectџџџџ %™ЁС ?ЏЅСVBAџџџџџџџџРЋ™ЁС ?ЏЅС.§џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ'"&-џџџџџџџџўџџџ!џџџџџџџџ7 *ўџџџ+0G23456,ўџџџ9:;<=>?@ABCўџџџ1FDHKџџџџџџџџEџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot EntryџџџџџџџџР 1ЄС @!VBAџџџџџџџџ %™ЁСР 1ЄСVBAProjectџџџџ %™ЁСР 1ЄСVBAџџџџџџџџРЋ™ЁСР 1ЄСџџџџџџџџ §џџџ' ўџџџ )ўџџџўџџџџџџџ"&џџџџ (ўџџџ!$IџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџJ%џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPROJECTwmџџџџџџџџџџџџz&AcessVBADataџџџџџџџџџџџџ{Forms џџџџРЋ™ЁСРЋ™ЁСCmdbarsџџџџџџџџџџџџРЋ™ЁСРЋ™ЁС ўџџџ !"#$%&'()ƒ+ўџџџ-./0123456789:;<=‚?@ўџџџBCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrsuvwxyўџџџўџџџўџџџўџџџўџџџўџџџўџџџ40-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] getSPSSvars=22, 22, 980, 858, аЯрЁБс>ўџ getSPSSvarsgetSPSSvarsџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџgetSPSSvarsџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџijфџџžšK[џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџMSysDbџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ__SRP_3џџџџџџџџџџџџ>ž_VBA_PROJECT џџџџAС YYZDMACULIPGCEZFAQYMGWDENSL_:џџџџџџџџџџџџѓPROJECT џџџџt_NumberЃ- DescriptionО Quit9Ў stdole“` VBIDEAџ€џFields7ЉItemзz€џValueфK€џџџ1Hџџ`џџџџџџџџџџџџџџџџџџџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџZџџ\џџџџџџџџID="{2CD89A12-E01B-4EE4-90E6-0B915283C6B0}" Module=getSPSSvars Name="db1" HelpContextID="0" VersionCompatible32="393222000" CMG="A3A1722CD430D430D430D430" DPB="0103D0D5D1D5D1D5" GC="5F5D8E70B29011911191EE" [Host Extender Info] &H00000001={3832D6dirџџџџџџџџџџџџ__SRP_0џџџџ Š__SRP_1џџџџџџџџџџџџ*`__SRP_2 џџџџ,†ўџџџўџџџўџџџ„ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Г€0* pH‚dфdb1@е= d  ђњ€<Ј J< ˜ DAO>„D€AO wm*\G{00€025E01-:0C  0046}#5.0#0#F:\WINNT\System32\dao350.dll#Microsoft o 3.5 Object Li`braryo€spssw in>ps€win5€No€ e€N47B1FB50-33E0-11CE -BD75€NAA0059033A}#7€N409#C:\Program Files@\SPSS\6.tlb# Ty peJstdole>‚ st€doleIhG^IŠ204ж3„•‘-˜2˜H˜DOWS\SYSTEM€LSTDOLE2.TLB# Autom`ation€A~VBIDE> VBIPDE"ЗР­УРEnE157‚jRn3@n"KFCommon„I‡nSha€red\VBAС6E6EXT.O+G Visual Basic for Applic1s ExtensibiliРty 5.3Р+€"ИТ‚2ˆ @getСd€varsGA\tSPРS@varР†РYYZDMACULIPGCEZFAQYMGWDENSL_2„8AYZРJ‚M@КCUL@N PGC@OZЊF@Q@M@WBT"N@L_B"H@1г0XB,-vTP!B+BB“K*mџџџџrU€€€~~~~~~~~~~e ЩmгtŒž—ЛIМЯHърХ  00nЬamџ  фњ*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#9.0#0#C:\Program Files\Microsoft Office\Office\MSACC9.OLB#Microsoft Access 9.0 Object Libraryк*\G{00025E01-0000-0000-C000-000000000046}#5.0#0#F:\WINNT\System32\dao350.dll#MicrosožšK[ft DAO 3.5 Object LibraryЪ*\G{47B1FB50-33E0-11CE-BD75-00AA0059033A}#7.0#409#C:\Program Files\SPSS\spsswin.tlb#SPSS Type LibraryМ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\SYSTEM32\STDOLE2.TLB#OLE AutomationZ*\G{0002E157-0000-0000-C000-000000000046}#5.3#0#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB#Microsoft Visual Basic for Applications Extensibility 5.3 џџџџџџђњ€<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‚28YYZDMACULIPGCEZFAQYMGWDENSL_023c80faf2џџgetSPSSvarsџџvP0џџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ“ў НоВ]K‡ƒДіДж­џџџџџџџџ`€24џ4+ Access VBAїтWin16С~Win32MacГВVBA6­# db1Ѕ‚DAOž‚spsswin7о getSPSSvarsŠ _EvaluateйЌ(mainˆ, Ќ(GetSpssLabЅspssfileRњlabtab>{spssappяn ApplicationЅ*spssdatг| ISpssDataDocnh OpenDataDoc›i`jaretЮpNames_TpLabelsŠpTypesOA pMsmtLevels pLabelCounts*pvalues\я pvaluelabels*њnvarsДИncodes]rs_ Recordsetкц CurrentDbS OpenRecordsetе| dbOpenDynaset –ErrExitФGGetVariableInfoD GetVariableValueLabels‹ВAddNewaЃUpdateвќErroŠ 0CB0€ (€@€H€&P€x€ˆ€˜8 И€ џџџџ Р\voyer\200009\temp.sav file1z PA`A€A AР р № ј €@ 0 @Pџџџџ`ЭџџxЭџџp–ЖC:\data\mydata.savЖfromspss№Єд8џџџџк *‚2vPџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ )”џџ)Lџџ(Lџџ@> џџџџPџџџџLџџџџџџџџ”џџџџLџџџџLџџџџLџџџџ”џџџџLџџџџџџџџLџџџџ<џџџџџџ"€р @`џџџџџџџџџџџџtџHџџџџџџџџџџ„ џџџџ`џџџџџџџџhˆўk€џџџџџџ%%„iƒџџџџ џџџџ €iƒџџџџџџџџџџџџ€ „џџџџxџџџи% „ џџџџtџџџј%`„&џџџџlџџџџџ`„(џџџџhџџџџџ`„*џџџџdџџџџџ`„,РTџџџ џџ`„.џџџџDџџџ џџ`„0H4џџџ џџ`„2$џџџ џџ`„4`џџџ џџ`„6џџџџџџџ џџ`„8Јєўџџ џџ`„:џџџџ№ўџџџџј`„<џџџџьўџџџџ „>€шўџџ8%џџџџџџџџ@ƒџџџџџџxџџџџџџџџџџџџџџ %˜žšK[рџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџ˜@˜(xџџџџџ @ўџtџџџџџ  р№0џџџџџџџџџџџџџџџџиџџџџР xџџџџР8џџџџ8џџџџаџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџшџџџџџџџџџџџџџџџџ Р@ўџ€pџџџ џџ џџџџFBR@ўџPиўџџ џџ @ўџhШўџџ џџ @ўџџџџџИўџџ џџ @ўџџџџџДўџџ џџ џџџџўџџџџџАўџџИ`% @ўџџџџџЌўџџџџ @ўџЈўџџџџ (ш@ўџPЄўџџџ h@ўџџџџџ”ўџџ џџ @ўџxўџџџџ P@ўџџџџџŒўџџџ  xАxџџџџ@ўџџџџџˆўџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ђњ€<$*\Rffff*023c80faf2*\R3*#22*\R3*#1b*\R2*#2e*\R3*#20*\R3*#20*\R2*#0*\R1*#99*\R1*#98*\R2*#24*\R2*#28*\R2*#29*\R2*#2a*\R0*#13*\R0*#19пўЪ=€ ^p€ Jа€ џџџџ€ џџџџ€€€ џџџџ€ џџџџ"€ $€ "Ј€ >(€ Tа€ `(€@€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ JH€ (˜€ <Р€ џџџџ" €€ (€@€H€&P€x€ˆ€€˜8 И€ џџџџ Р,Шш   8 PA`A€A AР р № ј €@ 0 @Pџџџџ(ЭџџxЭџџp–р Parameters to GetSpssLab areoџџ8рD This imports variable names, variable labels, values & value labelsр" directly from an SPSS *.sav file.р6 Thomas.Zapf-Schramm@t-online.de> newsgroup 2000/09/23–@]ђР]ђрэЦ.э  %$. ]ђ]ђ]ђ0ђHђ`ђxђђЈ]ђРђи]ђ№]ђ]ђ э  F B%D.>ЩH@ ѕ , . 0 2 47J':џ &ўЌ :Ќ ’ &$4'< <Ќ œ & 6 87L'*џ (ўЌ <Ќ ’ >B@N &$,ЖVARNAME+> &$.ЖVARLABEL+> ($6ЖVALUE+> ($8ЖVALLABEL+> >B@PџЧkџџџЧјqџџ№ЃHш[й R!Tз R!Vж B@X >B@BoџџЈџџџџ р before calling the Sub tЖc:\data\test.savЖ mydata.savAр 1) name of SPSS file andhich wрN That table must contain the field names varname, varlabel, value and vallabel whiр8 2) name of ACCESS table which will contain the data.џџџџPрX In order to be able run this, you need to add the SPSS Type Library to ACCESS using theћќрD following menu from MS Visual Basic for Access: Tools>References...РOзJиџџџџИџџџџПДAttribute VB_Name = "getSPSSvars" ' In order to be able run this, you nHeed:ad he | Type Library8ACCESS  usingveД@followmenu from MS Visual Basic for Access: Tools>Referen... Option Compare €DatabascExplicit-Sub main()BParЁ€|tersSG€~€pssLab €$ 1) nIŽofƒmfi€aєnd2„r?€which wi€ll cont€8| d€N€[' That mus‚t field‚:,s Х?,laHbellu€Хnšd€ l‚ Ebe€–@e call„В Q€u C ‡l("c:\B\test.sav",p "my&AРEE/€ТƒLAT| i mportТ$i‚‚A&РР(У#@(s< &(€*ƒdi@rectlyƒ{ajnƒT*! V„Fomas.Zapf-Sch@hžšK[m@t-onР5e.de>Рœwsgroup 2000/0p9/23*Р,I:sƒРr As SЛ№ng, €"]G@;AРx Dim  appС€І.ApхŽaС— Щ @KЩ ŒIS€žDoc Set= Ne^wBв… С= .аOpenD(#2…+iLongЧ%:jr@!?С , pљs Vari˜ant@@]ellwLMsmtLe†vNТCoun€BЧр ф GpvaAgп`bCBˆ‡nРIтСЫncode№@w‘Р Rec•se |с4a*= CurБР…tDb*І(у@, db-yn †tф+On Err!@GoToAEx‡Ё‡с ЃWith5@6#aу= .€mƒ"!€ЅInfo(/џІ-B,рч*€ˆ)UЁ Fрi@Г0  qC - 1Ї"C#=d ph(iЈЁI$f d(>   heоnЋaF+V!8Т јs(i #:У8 ћ СjЦуюaРrs.Add€dУ("VARNA№ME")` у)юAСШLABELуХ3№LUЄ #(jЛШ #!И.UpРEРвAiNexЄVѓЅсЏIf‡!'!ЁO, TСR:ЃDebug.PrintV.Number;bDescri‚фƒС‰.Quуe-Clo1s`T {Forms џџџџРЋ™ЁСРЋ™ЁСCmdbarsџџџџџџџџџџџџРЋ™ЁСРЋ™ЁСPROJECTwmџџџџџџџџџџџџz&AcessVBADataџџџџџџџџџџџџ{Forms џџџџРЋ™ЁСРЋ™ЁСCmdbarsџџџџџџџџџџџџРЋ™ЁСРЋ™ЁСReportsџџџџџџџџџџџџРЋ™ЁСРЋ™ЁСScriptsџџџџРЋ™ЁСРЋ™ЁСPropDataџџџџџџџџџџџџ~DatabasesРЋ™ЁСРЋ™ЁС0џџџџРЋ™ЁСРЋ™ЁСBlob џџџџџџџџџџџџўџџџDirDataџџџџџџџџџџџџCustomGroupsџџџџџџџџРЋ™ЁСРЋ™ЁС ўџџџ !"#$%&'()ƒ+ўџџџ-./0123456789:;<=‚?@ўџџџBCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrsuvwxyўџџџўџџџўџџџўџџџўџџџўџџџўџџџ§“@џўЎ”ў%Дў:Шў%pџшў Д pџ 0 Дў H )pџДў5”ўAhџ§“@єўўЎ”ў%Дў:Шў%pџшў Д pџ 0 Дў H )pџДў5”ўєѕшў d hџfŒў  lџfЄўЌќcќјАў@Ќў pџpџ ˆў ДўДў ,lˆўlЌўџџ /ˆў)pџДў xџ ` шў Ф  єЄP8 Аў$џшўtџєўџDџџ4џTџxџˆўpџДў”ўfrU€€€ џџџџџџџџ$`§џџџџџџџџџџџ,Љ`§џџџџџџџџџџџaLИfФЄŸIЛxЊ8<Л CˆYЈVBE6.DLL С џџџџ­ И @D:\data\aarU€€€ џџџџџџџџџџџџ spssfilelabtabmrU€€€€~| ‰)Љ1 Љ Љбљ! I y Ё Щ  ) с a ‰ Q `(žšН  @€€€€€€€€&€+€,€ .€ -pdate FlagsForeignNameIdLvLvExtraLvModule LvPropName OwnerParentIdRmtInfoLongRmtInfoShortTypeƒџџџџnџџџџiџџџџџџџџTѓ€ƒџџџџ€џџѓџџTџџџџ€џџѓџџTџџTѓ€YџџџџYџџџџIdParentIdName        џџ‡ qYNY Y  Y €Y Y Y ”€Y Y AttributesDataTypeFieldNameIndexTypeSkipColumn SpecID Start Widthƒџџџџ€џџ”џџlџџџџ€џџ”џџl”€l€ƒџџџџ€џџ”џџlџџџџ€џџ”џџl”€l‰YџџџџYџџџџ Index1PrimaryKeyџџжЛv1ь€@       €€€€€€ м YN  !! Y џџY Y Y  Y l” Y ”€Y Y l Y l”€Y  Y  € Y  l Y  l”DateDelim"DateFourDigitYear DateLeadingZerosDateOrderDecimalPointFieldSeparatorFileType SpecIDSpecNameSpecTypeStartRowTextDelimTimeDelimƒџџ”џџlџџџџ€џџ”џџlџџџџ€џџ”!"€l”‰YџџџџPrimaryKeyџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЛv1        €€€€€€€9FэvcP=*Г z№ н Ъ З @ -  Ѓ  } j ѓ р Э К C 0  ї € m Z G а Н Њ — њƒp]цг\Iв[HбОЋ4!—„ њƒp]цггТгТгТ  Y  Y Y Y  Y €Y  Y   Y   Y  eDateDelim"DateFourDigitYear DateLeadingZerosDateOrderDecimalPointFieldSeparator'џўд? 'џўд? 'џўзхi№ёсJ%я~RRO7#1іЗyЭƒЋuџuЄрЈюbвr @€ @€ @€ @€ЪОџџџџџџџџџџџџџџџџџџџџfromspssCreate query in Design viewgetSPSSvars ўfџџџџ^Щ3ЪОџџџџџџџџџџџџџџџџџџџџfromspssCreate query in Design viewgetSPSSvars ўfџџџџ^Щ3+ LVALњzE EЫEЫEЫГ z№ н Ъ З @ -  Ѓ  } j ѓ р Э К C 0  ї € m Z G MR2€OrderByOnColumnWidthColumnOrderColumnHiddenRequiredAllowZeroLengthDisplayControlDecimalPlacesDefaultValue FilterOrderBy Yvarlabel џџџџ     m] value џџџџ   џ  0  mYvallabel 1     mWvarname џџџџ    MR2€OrderByOnColumnWidthColumnOrderColumnHiddenRequiredAllowZeroLengthDisplayControlDecimalPlacesDefaultValue FilterOrderBy Yvarlabel џџџџ     m] value џџџџ   џ  0  mYvallabel 1     mWvarname џџџџ     mMR2Ž€ValidationRuleValidationText FilterOrderByOrderByOnColumnWidthColumnOrderColumnHiddenDescription FormatInputMaskCaptionDefaultValueRequiredAllowZeroLengthDisplayControlDecimalPlaces= (  fromspss.varnameYvarlabel џџџџ      m] value џџџџ   џ  0   mYvallabel 1      mWvarname џџџџ      mMR20€ Title AuthorCompanyL db1(  Raynald Levesque  MR2Д€AccessVersion Build6Track Name AutoCorrect Info0Perform Name AutoCorrectCpgConversionN 08.50 ю   фK[NџџY  DataAccessPages џџџџџџџџџџџџРЋ™ЁСРЋ™ЁСPropDataџџџџџџџџџџџџ€џџџџџџџџџџџџџџџџџџџџџџџџModulesРЋ™ЁСРЋ™ЁС0џџџџџџџџРЋ™ЁСРЋ™ЁСPropDataџџџџџџџџџџџџ| DirDataџџџџ} CtџtџCxџxџ 2xџtџ($  xџtџЄ §єxџpџ€ xџ <Qpџtџ8Дў'Иў%'Шў%ўСиў%€pџ$ јpџ МQДўшўpџKJ ltџќјАў,ЌўџўЭ$џўЭ4џўЭDџўЭTџўЭАў м lЌўq№ўѕlџl№ўѕЎўdЄўBlџ§“@џўЎ”ўќ"qьў5”ўlьўѕл6 ЌўєўўЭџўЭllџАў № lЌўqdџѕhџlьўѕЎўdŒў6 шў Р Alџ§“@TџўЎ”ў%Дў:Шў %pџшў Д pџ 0 Дў H )pџДў5”ўAlџ§“@DџўЎ”ў%Дў:Шў%pџшў Д pџ 0 Дў H )pџДў5”ўAhџфџџџџ A  џџџџџџџџбщџџй™ЁyqQydb1 getSPSSvarsяРF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA љџџџџ !‰0 ЩџJ™_ЏNЊ? 3C:\Program Files\Microsoft Office\Office\MSACC9.OLBAccess ё32D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] getSPSSvars=22, 22, 980, 858, рЁБс>ўџ getSPSSvarsgetSPSSvarsџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџgetSPSSvarsџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџijфџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџMSysDbџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ__SRP_3џџџџџџџџџџџџ>ž_VBA_PROJECT џџџџAС YYZDMACULIPGCEZFAQYMGWDENSL_:џџџџџџџџџџџџ8 PROJECT џџџџtcNumberЃ- DescriptionО Quit9Ў stdole“` VBIDEAџ€џFields7ЉItemзz€џValueфK€џџџ1Hџџ`џџџџџџџџџџџџџџџџџџџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџZџџ\џџџџџџџџID="{2CD89A12-E01B-4EE4-90E6-0B915283C6B0}" Module=getSPSSvars Name="db1" HelpContextID="0" VersionCompatible32="393222000" CMG="6260B3531157115711571157" DPB="C4C615F5155616561656" GC="2624F7973B9B9C9C9C9C63" [Host Extender Info] &H00000001={38ўџџџўџџџўџџџ„ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџžšЇQYRN(( Y  Y dY  Y dvarnamevarlabel valuevallabelƒџџџџџџџџџџџџџџџџџџџџџџџџџ(*ˆ€YџџџџvarnameџџOJmJLJkQkiQ^JmYdbkWYfkmJL^Qk`kvkJMQk`kvkdL[QMmk`kvkhoQiYQk`kvkOLўЎ”ў%Дў:Шў%pџшў Д pџ 0 Дў H )pџДў5”ўAhџ§“@єўўЎ”ў%Дў:Шў%pџшў Д pџ 0 Дў H )pџДў5”ўєѕшў d hџfŒў  lџfЄўЌќcќјАў@Ќў pџpџ ˆў ДўДў ,lˆўlЌўџџ /ˆў)pџДў xџ ` шў Ф  єЄP8 Аў$џшўtџєўџDџџ4џTџxџˆўpџДў”ўfџџџџџџџџџџ№Єд8џџџџк і‚2vPџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ )”џџ)Lџџ(Lџџ@> џџџџPџџџџLџџџџџџџџ”џџџџLџџџџLџџџџLџџџџ”џџџџLџџџџџџџџLџџџџ<џџџџџџ"˜р @`џџџџџџџџ€tџkџџџџџџџџџџ „ џџџџ`џџџџџџџџhˆўk€џџџџџџ%%„iƒџџџџ џџџџ €iƒџџџџџџџџџџџџ€ „џџџџxџџџи% „ џџџџtџџџј%`„&џџџџlџџџџџ`„(џџџџhџџџџџ`„*џџџџdџџџџџ`„,РTџџџ џџ`„.џџџџDџџџ џџ`„0H4џџџ џџ`„2$џџџ џџ`„4`џџџ џџ`„6џџџџџџџ џџ`„8Јєўџџ џџ`„:џџџџ№ўџџџџј`„<џџџџьўџџџџ „>€шўџџ8%џџџџџџџџ@ƒџџџџџџxџџџџџџџџџџџџџџ %џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџ@ўџPxџџџџџ @ўџџџџџtџџџџџ  р№0џџџџџџџџџџџџџџџџиџџџџР xџџџџР8џџџџ8џџџџаџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџшџџџџџџџџџџџџџџџџ Р@ўџ€pџџџ џџ џџџџFBR@ўџPиўџџ џџ @ўџhШўџџ џџ @ўџџџџџИўџџ џџ @ўџџџџџДўџџ џџ џџџџўџџџџџАўџџИ`% @ўџџџџџЌўџџџџ @ўџЈўџџџџ (ш@ўџPЄўџџџ h@ўџџџџџ”ўџџ џџ @ўџxўџџџџ P@ўџџџџџŒўџџџ  xАxџџџџ@ўџџџџџˆўџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ђњ€<$*\Rffff*023c80faf2*\R3*#22*\R3*#1b*\R2*#2e*\R3*#20*\R3*#20*\R2*#0*\R1*#99*\R1*#98*\R2*#24*\R2*#28*\R2*#29*\R2*#2a*\R0*#13*\R0*#19пўЪ4€€€ џџџџ€ џџџџ"( @€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ JH@@@ьааа џ]ђ]ђ0ђHђ`ђxђђЈ]ђРђи]ђ№]ђ]ђ э  F B%D.>ЩH@ ѕ , . 0 2 47J':џ &ўЌ :Ќ ’ &$4'< <Ќ œ & 6 87L'*џ (ўЌ <Ќ ’ >B@N &$,ЖVARNAME+> &$.ЖVARLABEL+> ($6ЖVALUE+> ($8ЖVALLABEL+> >B@PџЧkџџџЧјqџџ№ЃHш[й R!Tз R!Vж B@X >B@BoџџЈџџџџ џџџџІГAttribute VB_Name = "getSPSSvars" Option Compare Database`Expli cit Sub main() Call G˜pssLab( "C:\d|\my .sav",€ "froms"Т"2End BK' This imports “iable n Ћs,labellues &   ' directlyB n an т *B file.Thomas.Zapf-Schramm@t-online.de> newsgroup 2000Р/09/23S{ˆtg* As Sё€Аng,E€œ‡€vB Dim a pp win.”ApЊaН ‰3€œ‰IS€œЩDo"cSet(= xNew‚’)С=A .OpenD(#2+iLonъgЧ%jr@!?С (, pA–s Vaрriant€„lqЫTypРn€ ‡ MРsmtLevŽ ‚pCoun… ‡$pќva‚ Тƒ„ nМA‹7ncod У%Ыr‚4Reco№rdseРСiСT= CurrenиtDbTF (РР, dbZynгtФWOn Err€or GoToExжСC)Wit>hj€lCСУ-= .€ ‚N@ШInfoў(^F[‚XРЧU€Wˆ)Ё Fрiр0Ц `C - 1Ї"‘C#= ph(iЈ‘ЁIf d(>   xhenЋaF+Vу!8Т s(i #:яУ8  СjЦуюars.Add€dУ("VARРNAME")` у)юAШLABELЯуХ№LUЄ #|(jЛШ #!И.џўmarque1џўmarqueџўVolkwagen"=џўmarque1џўmarqueџўVolkswagen#<џўmarque1џўmarqueџўToyota;џўmarque1џўmarqueџўSuzuki:џўmarque1џўmarqueџўSubaru9џўmarque1џўmarqueџўSaturn8џўmarque1џўmarqueџўSaab7џўmarque1џўmarqueџўqSubaru 6џўmarque1џўmarqueџўPorsche 5џўmarque1џўmarqueџўPONTIAC 4џўmarque1џўmarqueџўPontiac 3џўmarque1џўmarqueџўPlYmouth!2џўmarque1џўmarqueџўPlymouth!1џўmarque1џўmarqueџўOLDSMOBILE#0џўmarque1џўmarqueџўOldsmobile#/џўmarque1џўmarqueџўNissan.џўmarque1џўmarqueџўMERCURY -џўmarque1џўmarqueџўMercury ,џўmarque1џўmarqueџўMercedes!+џўmarque1џўmarqueџўMazda*џўmarque1џўmarqueџўLINCOLN )џўmarque1џўmarqueџўLincoln (џўmarque1џўmarqueџўLexus'џўmarque1џўmarqueџўLand Rover#&џўmarque1џўmarqueџўLada%џўmarque1џўmarqueџўKia$џўmarque1џўmarqueџўJVolkswagen$#џўmarque1џўmarqueџўJeep"џўmarque1џўmarqueџўJaguar!џўmarque1џўmarqueџўIsuzu џўmarque1џўmarqueџўInfiniti!џўmarque1џўmarqueџўHyundai џўmarque1џўmarqueџўhyundai џўmarque1џўmarqueџўHondaџўmarque1џўmarqueџўGmc 2500!џўmarque1џўmarqueџўGmcџўmarque1џўmarqueџўGeoџўmarque1џўmarqueџўFordџўmarque1џўmarqueџўFerrari џўmarque1џўmarqueџўEagleџўmarque1џўmarqueџўDodgeљџўmarque1џўmarqueџўDodgeџўmarque1џўmarqueџўDaewooџўmarque1џўmarqueџўcrHonda џўmarque1џўmarqueџўChrysler!џўmarque1џўmarqueџўcHondaџўmarque1џўmarqueџўCHEVROLET"џўmarque1џўmarqueџўChevrolet"џўmarque1џўmarqueџўCHEVOLET! џўmarque1џўmarqueџўCadillac! џўmarque1џўmarqueџўBuick џўmarque1џўmarqueџўBmw џўmarque1џўmarqueџўBentley  џўmarque1џўmarqueџўAudiџўmarque1џўmarqueџўASUNAџўmarque1џўmarqueџўaHondaџўmarque1џўmarqueџўAcuraџўmarque1џўmarqueџў50580џўmarque1џўmarqueџў/Toyota џўmarque1џўmarqueџў/Hondaџўmarque1џўmarqueџў Hondaџўclassџўclassџўcancelled џўclassџўclassџўhigh rate џўclassџўclassџўmed. rate џўclassџўclassџўlow rate џўclassџўclassџўnew (missing)# џўcat1џўcat1 labelџўValue label 2 for cat10 џўcat1џўcat1 labelџўValue label1 for cat1/ idџўid labelџўValue label 4# idџўid labelџўValue label 2# idџўid labelџўValue label 1# Ь '@@@@@@@@@@@@@@@@M^Jkk)M^Jkk)M^Jkk)M^Jkk)M^Jkk) QmJm8)HQmJm8)IQmJm8)JQmJm8)KQmJm8)LQmJm8)MQmJm8)NQmJm8)OQmJm8)PQmJm8)QQmJm8)RQmJm8)SQmJm8)TQmJm8)UQmJm8)V`JihoQ8) `JihoQ8) `JihoQ8) `JihoQ8) `JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8)`JihoQ8) `JihoQ8)!`JihoQ8)"`JihoQ8)#`JihoQ8)$`JihoQ8)%`JihoQ8)&`JihoQ8)'`JihoQ8)(`JihoQ8))`JihoQ8)*`JihoQ8)+`JihoQ8),`JihoQ8)-`JihoQ8).`JihoQ8)/`JihoQ8)0`JihoQ8)1`JihoQ8)2`JihoQ8)3`JihoQ8)4`JihoQ8)5`JihoQ8)6`JihoQ8)7`JihoQ8)8`JihoQ8)9`JihoQ8):`JihoQ8);`JihoQ8)<`JihoQ8)=`JihoQ8)>`JihoQ8)?`JihoQ8)@`JihoQ8)A`JihoQ8)B`JihoQ8)C`JihoQ8)D`JihoQ8)E`JihoQ8)F`JihoQ8)Gх˜ъiсј{ Џd+p ў е? TзћКQ’H2i%я~RRO7чШю­%œ`&хРъmnоoˆрЈюbвr џЩ‹8Ет@9Ет@MSysAccessObjectsе?DDDDDDDDDDB џW+ьяїс@ЦзХ7ејс@fromspssе?5@%>>>22222220 џ@ €€€~~Ѓїс@!j+Ет@getSPSSvarsе?88888888886 џ€ €'œzгліс@'œzгліс@UserDefinedе?88888888886 џ€ €^zгліс@^zгліс@SummaryInfoе?€@%DDD88888886 џ@€ €јсхзліс@Mѕ)Ет@AccessLayoutе?4€MR2€KeepLocal T@$†zz:::::::8 џ@€Ю…}гліс@Ю…}гліс@SysRelе?.........., џ€ЋG}гліс@ЋG}гліс@Scriptsе?0000000000. џ€ЋG}гліс@ЋG}гліс@Reportsе?0000000000. џ€ЋG}гліс@ЋG}гліс@Modulesе?0000000000. џ€ЋG}гліс@ЋG}гліс@Formsе?,,,,,,,,,,* џ€кэ*Ет@кэ*Ет@DataAccessPagesе?@@@@@@@@@@> џ\twгліс@\twгліс@€MSysRelationshipsд=DDDDDDDDDDB џ\twгліс@\twгліс@€MSysQueriesд=88888888886 џ\twгліс@\twгліс@€MSysACEsд=22222222220 џ\twгліс@\twгліс@€MSysObjectsд=88888888886 џ\twгліс@ЩI'Ет@€MSysDbе?@%:::......., џ@\twгліс@\twгліс@€Relationshipsд=<<<<<<<<<<: џ\twгліс@\twгліс@€Databasesд=44444444442 џ\twгліс@\twгліс@€Tablesд=.........., џK[Nџџ ї € m Z G а Н Њ —џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџdirџџџџџџџџџџџџ__SRP_0џџџџ Š__SRP_1џџџџџџџџџџџџ*`__SRP_2 џџџџ,† Г€0* pH‚dфdb1@е= d  ђњ€<Ј J< ˜ DAO>„D€AO wm*\G{00€025E01-:0C  0046}#5.0#0#F:\WINNT\System32\dao350.dll#Microsoft o 3.5 Object Li`braryo€spssw in>ps€win5€No€ e€N47B1FB50-33E0-11CE -BD75€NAA0059033A}#7€N409#C:\Program Files@\SPSS\6.tlb# Ty peJstdole>‚ st€doleIhG^IŠ204ж3„•‘-˜2˜H˜DOWS\SYSTEM€LSTDOLE2.TLB# Autom`ation€A~VBIDE> VBIPDE"ЗР­УРEnE157‚jRn3@n"KFCommon„I‡nSha€red\VBAС6E6EXT.O+G Visual Basic for Applic1s ExtensibiliРty 5.3Р+€"ИТ‚2ˆ @getСd€varsGA\tSPРS@varР†РYYZDMACULIPGCEZFAQYMGWDENSL_2„8AYZРJ‚M@КCUL@N PGC@OZЊF@Q@M@WBT"N@L_B"H@1гHXB,-vTP!B+BB“K*mџџџџrU€€€~~~~~~~~~~e ЩmгtŒž—ЛIМЯHърХ  00nЬamџ  фњ*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{4AFFC9A0-5F99-101B-AF4E-00AA003F0F07}#9.0#0#C:\Program Files\Microsoft Office\Office\MSACC9.OLB#Microsoft Access 9.0 Object Libraryк*\G{00025E01-0000-0000-C000-000000000046}#5.0#0#F:\WINNT\System32\dao350.dll#Microsoft DAO 3.5 Object LibraryЪ*\G{47B1FB50-33E0-11CE-BD75-00AA0059033A}#7.0#409#C:\Program Files\SPSS\spsswin.tlb#SPSS Type LibraryМ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\SYSTEM32\STDOLE2.TLB#OLE AutomationZ*\G{0002E157-0000-0000-C000-000000000046}#5.3#0#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB#Microsoft Visual Basic for Applications Extensibility 5.3 џџџџџџђњ€<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ‚28YYZDMACULIPGCEZFAQYMGWDENSL_023c80faf2џџgetSPSSvarsџџvPHџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџžšK[аааа @€ @€ @€ @€ @€ @€ @€џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ“ў НоВ]K‡ƒДіДж­џџџџџџџџ`€24џ4+ Access VBAїтWin16С~Win32MacГВVBA6­# db1Ѕ‚DAOž‚spsswin7о getSPSSvarsŠ _EvaluateйЌ(mainˆ, Ќ(GetSpssLabЅspssfileRњlabtab>{spssappяn ApplicationЅ*spssdatг| ISpssDataDocnh OpenDataDoc›i`jaretЮpNames_TpLabelsŠpTypesOA pMsmtLevels pLabelCounts*pvalues\я pvaluelabels*њnvarsДИncodes]rs_ Recordsetкц CurrentDbS OpenRecordsetе| dbOpenDynaset –ErrExitФGGetVariableInfoD GetVariableValueLabels‹ВAddNewaЃUpdateвќErroŠ 0CB0€ (€@€H€&P€x€ˆ€˜8 И€ џџџџ Р\voyer\200009\temp.sav file1z PA`A€A AР р № ј €@ 0 @Pџџџџ`ЭџџxЭџџp–ЖC:\data\mydata.savЖfromspss№Єд8џџџџк B‚2vPџџЖџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ )”џџ)Lџџ(Lџџ@> џџџџPџџџџLџџџџџџџџ”џџџџLџџџџLџџџџLџџџџ”џџџџLџџџџџџџџLџџџџ<џџџџџџ"€р @`џџџџџџџџџџџџtџHџџџџџџџџџџ„ џџџџ`џџџџџџџџhˆўk€џџџџџџ%%„iƒџџџџ џџџџ €iƒџџџџџџџџџџџџ€ „џџџџxџџџи% „ џџџџtџџџј%`„&џџџџlџџџџџ`„(џџџџhџџџџџ`„*џџџџdџџџџџ`„,РTџџџ џџ`„.џџџџDџџџ џџ`„0H4џџџ џџ`„2$џџџ џџ`„4`џџџ џџ`„6џџџџџџџ џџ`„8Јєўџџ џџ`„:џџџџ№ўџџџџј`„<џџџџьўџџџџ „>€шўџџ8%џџџџџџџџ@ƒџџџџџџxџџџџџџџџџџџџџџ %˜рџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџ˜@˜(xџџџџџ @ўџtџџџџџ  р№0џџџџџџџџџџџџџџџџиџџџџР xџџџџР8џџџџ8џџџџаџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџшџџџџџџџџџџџџџџџџ Р@ўџ€pџџџ џџ џџџџFBR@ўџPиўџџ џџ @ўџhШўџџ џџ @ўџџџџџИўџџ џџ @ўџџџџџДўџџ џџ џџџџўџџџџџАўџџИ`% @ўџџџџџЌўџџџџ @ўџЈўџџџџ (ш@ўџPЄўџџџ h@ўџџџџџ”ўџџ џџ @ўџxўџџџџ P@ўџџџџџŒўџџџ  xАxџџџџ@ўџџџџџˆўџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@ђњ€<$*\Rffff*023c80faf2*\R3*#22*\R3*#1b*\R2*#2e*\R3*#20*\R3*#20*\R2*#0*\R1*#99*\R1*#98*\R2*#24*\R2*#28*\R2*#29*\R2*#2a*\R0*#13*\R0*#19пўЪ=€ dа€ J0€ џџџџ€ џџџџ€€€ џџџџ€ џџџџ"€ $€ "h€ >€ Xи€ žšK[­ И @D:\data\aarU€€€ џџџџџџџџџџџџ spssfilelabtabmrU€€€€~| ‰)Љ1 Љ Љбљ! I y Ё Щ  ) с a ‰ Q `( CtџtџCxџxџ 2xџtџ($  xџtџЄ §єxџpџ€ xџ <Qpџtџ8Дў'Иў%'Шў%ўСиў%€pџ$ јpџ МQДўшўpџKJ ltџќјАў,ЌўџўЭ$џўЭ4џўЭDџўЭTџўЭАў м lЌўq№ўѕlџl№ўѕЎўdЄўBlџ§“@џўЎ”ўќ"qьў5”ўlьўѕл6 ЌўєўўЭџўЭllџАў № lЌўqdџѕhџlьўѕЎўdŒў6 шў Р Alџ§“@TџўЎ”ў%Дў:Шў %pџшў Д pџ 0 Дў H )pџДў5”ўAlџ§“@DџўЎ”ў%Дў:Шў%pџшў Д pџ 0 Дў H )pџДў5”ўAhџфџџџџ A  џџџџџџџџбщџџй™ЁyqQydb1 getSPSSvarsяРF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA љџџџџ !‰0 ЩџJ™_ЏNЊ? 3C:\Program Files\Microsoft Office\Office\MSACC9.OLBAccess ёџџџџ ‰@^РFF:\WINNT\System32\dao350.dllDAO љџџџџ!iPPћБGр3ЮНuЊY: !C:\Program Files\SPSS\spsswin.tlbspsswin бџџџџ  Y`0РFC:\WINDOWS\SYSTEM32\STDOLE2.TLBstdole Щџџџџё9pWсРFCC:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBEџџџџ ‰@^РFF:\WINNT\System32\dao350.dllDAO љџџџџ!iPPћБGр3ЮНuЊY: !C:\Program Files\SPSS\spsswin.tlbspsswin бџџџџ  Y`0РFC:\WINDOWS\SYSTEM32\STDOLE2.TLBstdole Щџџџџё9pWсРFCC:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLBVBIDE Љџџџџбa€main GetSpssLab  $C:\data\mydata.sav fromspss jІVзјЮЏ.РzМ рЌеLјЮЏ.РzМ С џџџџСЩЄsжа˜П Щ ШйРцЬh)aЏNЊ?Yџџџџq€Њm.ЄбО™ЁUWЯ‹яРIТ 1€Њm.Є VARNAMES€Њm.ЄQ€Њm.Є VARLABEL VALUE VALLABE6EXT.OLBVBIDE Љџџџџбa€main GetSpssLab  $C:\data\mydata.sav fromspss jІVзјЮЏ.РzМ рЌеLјЮЏ.РzМ С џџџџСЩЄsжа˜П Щ ШйРцЬh)aЏNЊ?Yџџџџq€Њm.ЄбО™ЁUWЯ‹яРIТ 1€Њm.Є VARNAMES€Њm.ЄQ€Њm.Є VARLABEL VALUE VALLABE*\R3*#22*\R3*#1b*\R2*#2e*\R3*#20*\R3*#20*\R2*#0*\R1*#99*\R1*#98*\R2*#24*\R2*#28*\R2*#29*\R2*#2a*\R0*#13*\R0*#19пўЪ9€€€ џџџџ€ џџџџ"€ $€ "Ј€ >(€ Tа€ `(€@€ џџџџ€ žšK[Nџџ Е Œ a 9  ы П – k (@@€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ JH€ (˜€ Dˆ€ џџџџ" Р€Ш€а иш€€€&€8€H€P€X8`x€ џџџџ €,ˆЈ Р а рј A A@A`A€   А И РШ€а@и № џџџџ@ЭџџxЭџџp–р Parameters to GetSpssLab areoџџ8рD This imports variable names, variable labels, values & value labelsр" directly from an SPSS *.sav file.–@]ђР]ђрэЦ.э  %$. ]ђ]ђ]ђ0ђHђ`ђxђђЈ]ђРђи]ђ№]ђ]ђ э  F B%D.>ЩH@ ѕ , . 0 2 47J':џ &ўЌ :Ќ ’ &$4'< <Ќ œ & 6 87L'*џ (ўЌ <Ќ ’ >B@N &$,ЖVARNAME+> &$.ЖVARLABEL+> ($6ЖVALUE+> ($8ЖVALLABEL+> >B@PџЧkџџџЧјqџџ№ЃHш[й R!Tз R!Vж B@X >B@BoџџЈџџџџ р before calling the Sub tЖc:\data\test.savЖ mydata.savAр 1) name of SPSS file andhich wр8 2) name of ACCESS table which will contain the data.џџџџPрQ That table must contain the 4 field names: varname, varlabel, value and vallabelрD following menu from MS Visual Basic for Access: Tools>References...РOзJиџџџџИр= Source: Thomas.Zapf-Schramm@t-online.de newsgroup 2000/09/23р^ NOTE: In order to be able run this, you need to add the SPSS Type Library to ACCESS using theџџџџџџџџдДAttribute VB_Name = "getSPSSvars" ' NOTE: In order to be able run this, you need:ad he ˆ Type L@ibrary8ACCESS us(ingve`followmenu from MS Visual Basic for Access: Tools>ReferenA... Option Compare Da`tabascE€xplicit-Sub mainD()BPar€t(ersSG€ps`sLab €$ @ 1) n‘ofƒmfi€and=2„r?€which will` cont€8| d€N€[' Tha„t must €4 field‚;'€|€Щ@, laHbelluЧnšd€ l‚ Gbe˜@e callД Qw C n("c:\"\test.sav",p "myТ&A€FE/€ТCMATР| i@mports"iџBƒA&€‚€&У#@(xs &(€*ƒd€irectlyC|4anCU*!€=leBGSource}homas.Za@pf-Schkm @t-onР7e.de@Ÿwsgroup 2000/р09/23A,€. <†s@uТmAs SПАng, @$€_ Fƒ=@{ Dim  8appСЉ.AЪp‘aAš Щ MЩ IS€ Doc Set= NМewBв… С=  .OpenD(# 2+iLonguЧ%jr@!€:С , p~sVar0iant@€^ellСxLMsmtL evNТCoun`Cр ф GpvaтAПg`b#Cˆ‡n JƒтЫncode№#€xР Rec@–seр}с4a*= Cubr‡tDb*І(!у@, db-yn`‡tф+On ErBr€GoToAExсˆс ЃWith5@6#aу= .`n"!РІInfo(џ/І-B,рч*€ˆ)ЋЁ Fрi@Е0@Ёт C - 1Ї"C#Ш= ph(iЈЁHIf d(>   hМenЋaF+V!8ёТ s(i #:У8ї  СjЦуюars.Add€dУ("VARNрAME")` у)юƒAШLABELуgХ№LUЄ #(>jЛШ #!И.UpРEдAiNexчЄVЅСАIf‡!'!YЁO TСR:ЃDebug.PrintV.Number;bDesc