Tecnologia, programação e muito Visual FoxPro.

segunda-feira, 30 de novembro de 2009

RE: {Disarmed} [usuarios_fox] LECTOR DE HUELLAS DIGITALES

 

Hola

Yo he estado usando los de Microsoft con el OCX de Griaule
(www.griaulebiometrics.com) pero ya lo descontinuaron y ahora estoy usando
el mismo OCX pero con el lector UareU de digital persona
(www.digitalpersona.com)

Saludos

_____

De: usuarios_fox@yahoogrupos.com.mx [mailto:usuarios_fox@yahoogrupos.com.mx]
En nombre de Ricardo Moscarda
Enviado el: 30 de noviembre de 2009 04:26 p.m.
Para: usuarios_fox@yahoogrupos.com.mx
Asunto: {Disarmed} [usuarios_fox] LECTOR DE HUELLAS DIGITALES

Estimados, alguien trabajo con algún lector de huellas digitales? Necesito
comprar uno para incorporarlo a un programa diseñado en Visual Fox 6 (podría
migrar a Visual Fox 9 esta pequeña aplicación) pero quería saber si hace
falta alguno en especial o si todos vienen con un OCX. Mi idea es comprar
uno con entrada USB.

Si alguien trabajo con este tipo de lector agradeceré cualquier info que me
sirva.

Gracias y saludos.

Ricardo Moscarda

3ROM

[Se han eliminado los trozos de este mensaje que no contenían texto]

--
Este mensaje ha sido analizado por <http://www.mailscanner.info/>
MailScanner
y ClamAV en busca de virus y otros contenidos peligrosos,
y se considera que está limpio.

--
Este mensaje ha sido analizado por MailScanner
y ClamAV en busca de virus y otros contenidos peligrosos,
y se considera que está limpio.

[Se han eliminado los trozos de este mensaje que no contenían texto]

__._,_.___
Comentarios, observaciones o si deseas darte de baja avísame a: jamorquecho@hotmail.com

.

__,_._,___

[usuarios_fox] LECTOR DE HUELLAS DIGITALES

 

Estimados, alguien trabajo con algún lector de huellas digitales? Necesito
comprar uno para incorporarlo a un programa diseñado en Visual Fox 6 (podría
migrar a Visual Fox 9 esta pequeña aplicación) pero quería saber si hace
falta alguno en especial o si todos vienen con un OCX. Mi idea es comprar
uno con entrada USB.

Si alguien trabajo con este tipo de lector agradeceré cualquier info que me
sirva.

Gracias y saludos.

Ricardo Moscarda

3ROM

[Se han eliminado los trozos de este mensaje que no contenían texto]

__._,_.___
Comentarios, observaciones o si deseas darte de baja avísame a: jamorquecho@hotmail.com

.

__,_._,___

Fw: ]] XL-mania [[ Bikin nomor urut di sheet excel

 

re-send.. sepertinya belum masuk ke msg list....
 
----- Original Message -----
From: siti Vi
Sent: Sunday, November 29, 2009 9:03 PM
Subject: Re: ]] XL-mania [[ Bikin nomor urut di sheet excel

Memberi nama tabSheet dengan ANGKA yg selalu urut sesuai letaknya
 
Private Sub RenameSheet()
   Dim w As Worksheet
   For Each w In Worksheets
      w.Name = w.Index
   Next
End Sub

 
atetapi, sebelum prosedur tsb dijalankan, harus ada prosedur lain yg
"jalan" lebih dulu, dan jalannya harus otomatis (tidak perlu user menjalankannya)
 
pada prosedur yg "jalan lebih dulu itu" perlu juga dicegah hal-hal yg "membahayakan"
misalnya mencegah duplikasi penamaan tab sheet)
 
(lihat modules di VBE pada workbook lampiran mail ini)
 
Jika hasilnya tidak anda sukai, nama tab-sheet dapat dikembalikan ke aslinya
dengan :
 
Sub Reset_SheetName()
   Dim w As Worksheet
   For Each w In Worksheets
      w.Name = w.CodeName
   Next w
End Sub
 
 
 

----- Original Message -----
From: Paulus Yokie Radnan K.
To: XL-mania@yahoogroups.com
Sent: Wednesday, November 25, 2009 10:00 AM
Subject: ]] XL-mania [[ Bikin nomor urut di sheet excel

Dear Para Suhu Excel,
Saya ada kendala nih bikin nomor urut di sheet…contohnya :
Sheet 1 dikasih nomor 1, sheet 2 dikasih nomor 2 dan begitu mo move or
copy sheet dia langsung berubah otomatis jadi nomor 3 dan seterusnya…
Please help ya…
Terima kasih

__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Momods lagi hanimuuunnn...                                        |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
.

__,_._,___

[Access VBA Central] Programmically setting query computed field types?

 

I have about 200 queries that need to have the field type of 2 computed fieds to General Number versus the default: text.

Is there a way to do this programmically? Can I specify the query, the name of the field and specify the type as General Number?

Thanks,

Jnana

__._,_.___
.

__,_._,___

[Access VBA Central] Re: Problem with Report Totals

 

SQL Aggregate functions, at least appear, to only work with database fields, not report controls.

--- In AccessVBACentral@yahoogroups.com, "whowhatwhenaware" <stirthingsup@...> wrote:
>
>
>
> This isn't the cause of your problem, but you should know that you're not declaring your variables correctly. Your statement:
>
> Dim agg_Yr1_Grand, agg_Yr2_Grand, agg_Yr3_Grand As Double
>
> is actually declaring the first two as Variant data type, not Double. The correct syntax is:
>
> Dim agg_Yr1_Grand as Double, agg_Yr2_Grand as Double, agg_Yr3_Grand As Double, or
>
> Dim agg_Yr1_Grand as Double
> Dim agg_Yr2_Grand as Double
> Dim agg_Yr3_Grand as Double 'I prefer this since it's harder to forget to declare the data type.
>
> Anyway, try summing the amounts in the report itself using text boxes that contain a formula instead of doing it in code. Put the text boxes in your report footer with a formula in the Control Source field, like =sum(me.ct105) or something like that, whatever field you're trying to add up.
>
>
> --- In AccessVBACentral@yahoogroups.com, "erikd_legendvalve" <erikd_legendvalve@> wrote:
> >
> > I have several fields in my detail section that are calculated from adding the values of a bunch of database fields together. The list of fields that are added changes from month to month. So, in January, bucket 1 is for January, but in February bucket 1 is for February, and so on and so forth. We then take those buckets and add the values for to obtain totals for a given year and year to date. We show the current year and 2 previous years data in the report, so I have 6 aggregate variables, 3 for the Years' grand totals, and 3 for the YTD totals.
> >
> > Now, I need to take those year total and year to date fields and give a grand total for them at the bottom of the report, a seemingly simple task that has me going nuts. Here is the gist of my code.
> > Dim agg_Yr1_Grand, agg_Yr2_Grand, agg_Yr3_Grand As Double
> > Dim agg_Yr1_YTD, agg_Yr2_YTD, agg_Yr3_YTD As Double
> >
> > Private Sub Detail_Print(Cancel As Integer, FormatCount As Integer)
> > agg_Yr1_Grand = agg_Yr1_Grand + Nz(Me.Ctl05)
> > Me.grand1 = agg_Yr1_Grand
> > agg_Yr1_YTD = agg_Yr1_YTD + Nz(Me.YTD2006)
> > Me.ytd1 = agg_Yr1_YTD
> >
> > agg_Yr2_Grand = agg_Yr2_Grand + Nz(Me.Ctl06)
> > Me.grand2 = agg_Yr2_Grand
> > agg_Yr2_YTD = agg_Yr2_YTD + Nz(Me.YTD2007)
> > Me.ytd2 = agg_Yr2_YTD
> >
> > agg_Yr3_Grand = agg_Yr3_Grand + Nz(Me.Ctl08)
> > Me.grand3 = agg_Yr3_Grand
> > agg_Yr3_YTD = agg_Yr3_YTD + Nz(Me.YTD2008)
> > Me.ytd3 = agg_Yr3_YTD
> > End Sub
> >
> > Private Sub Report_Open(Cancel As Integer)
> > agg_Yr1_Grand = 0
> > agg_Yr2_Grand = 0
> > agg_Yr3_Grand = 0
> >
> > agg_Yr1_YTD = 0
> > agg_Yr2_YTD = 0
> > agg_Yr3_YTD = 0
> > End Sub
> >
> > Everything works beautifully if I do a Print Preview, but as soon as I hit print, the totals are all out of whack. Mysteriously the totals add in extra dollars. If I sit there and click the Landscape button over and over, you can watch the totals go up and up and up and up without bound.
> >
> > I've tried this in both Access 2000 and 2007, with the same result. I've tried Compacting and Repairing, with no effect. Any ideas?
> >
>

__._,_.___
.

__,_._,___

]] XL-mania [[ Membuat template Kode Material & Deskripsinya

 

Dear pakar XL,

Saya perlu bantuannya untuk merubah suatu matrix kode material ke dalam template List-nya untuk keperluan stock opname. Data sebenarnya cukup banyak sehingga akan memakan waktu jika dikerjakan secara manual.

Sebagai referensi saya kirimkan contoh matrix-nya;

Thanks bgt buat bantuannya.

Salam
Pak Tirta

__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Momods lagi hanimuuunnn...                                        |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
.

__,_._,___

]] XL-mania [[ Mengundi DoorPrize

Selamat malam Bapak2 dan Ibu2 para master, guru dan suhu XL-Mania.

Saya mau membuat undian doorprize menggunakan excel.

Berikut penjelasannya :

  1. Akan ada 36 angka dengan 36 nama.
  2. Misalnya menggunakan CommandButton, maka setiap cmd dipencet, maka akan muncul nomor yang bergerak secara cepat dan akan berhenti di satu angka tertentu. (mirip display saat kita menekan F9 ketika menggunakan formula "=randbetween(1,36)".
  3. Setelah muncul angkanya, maka akan muncul nama pada diplay. Katakanlah semacam label, besar dan akan dimunculkan pada infokus.
  4. Angka yang telah muncul, maka akan didelete dari cell atau tidak akan pernah muncul lagi pada pengundian berikutnya.
  5. Lalu kembali pada tampilan semula (dengan menekan cmd_exit) untuk melakukan pengundian kedua.

Untuk workbook saya belum mendapatkan ide, namun kira2 seperti lampiran.

Demikian pertanyaan dari saya dan mohon bantuan kepada Bapak dan Ibu sekalian  dan atas perhatiannya terima kasih banyak.

 

Salam hormat,

 

Ahmad Adriansyah


]] XL-mania [[ excel 2007 error...

 

aku punya file format excel 2003...
hartono02580: file itu di share di server,,
hartono02580: tapi kl dibuka di client, pake excel 2007, slalu error..
hartono02580: "microsoft excel has stop working"
hartono02580: trus pesannya lg " microsoft excel trying to recover your information"
hartono02580: apanya ya bos

__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Momods lagi hanimuuunnn...                                        |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
.

__,_._,___

Re: ]] XL-mania [[ Membuat Grafik Sclatter

 

Pak Sugeng
Mungkin Source datanya ada yang perlu dirubah kali ya... seperti file terlampir.
 
Helmi
On Mon, Nov 30, 2009 at 1:45 PM, Sugeng WA <gengsue@gmail.com> wrote:
 

Terima kasih 


__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Momods lagi hanimuuunnn...                                        |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
.

__,_._,___

Re: ]] XL-mania [[ Membuat Grafik Sclatter

 

Sama-sama

On Mon, Nov 30, 2009 at 1:45 PM, Sugeng WA <gengsue@gmail.com> wrote:
 

Terima kasih 


__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Momods lagi hanimuuunnn...                                        |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
.

__,_._,___

]] XL-mania [[ Membuat Grafik Sclatter

 

Terima kasih 

__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Momods lagi hanimuuunnn...                                        |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
.

__,_._,___

Re: ]] XL-mania [[ Konversi Text Angka ke Bilangan terurut menaik.

 

Terima kasih AA, pak hendrik dan mas zain
semua solusi = bagus....
 
sebelum dikirim ke milis siti juga sudah menyediakan rumusnya
=TRANSPOSE(SMALL(--MID(B2,ROW(INDIRECT("1:"&(LEN(B2)+1)/3))*3-2,2),ROW(INDIRECT("1:"&(LEN(B2)+1)/3))))
 
---------------------
From: Ahmad Adriansyah
Sent: Saturday, November 28, 2009 11:32 AM
Jikalau boleng menggunakan dummy, maka sepertinya saya boleh ngikut kali yah
walaupun formulanya Puannnjaang. Sambil mengunggu hasil dari para master.
=IF(ISERR(SMALL(IF(ISERR(--MID($B4,$Q$3:$AC$3,2)),"",--MID($B4,$Q$3:$AC$3,2)),
COLUMN(1:14))),"",SMALL(IF(ISERR(--MID($B4,$Q$3:$AC$3,2)),"",--MID($B4,$Q$3:$AC$3,2)),
COLUMN(1:14)))
Thanks & Regards,
Sent: Saturday, November 28, 2009 2:57 PM
Mbak Siti,
Celengnya sdh ketangkep
(pakai fungsi yg ada di excel 2007)
From: "Zainul Ulum" <zainul_ulum@yahoo.com>
Sent: Saturday, November 28, 2009 7:46 PM
rumusnya masih panjang
=SMALL(--MID(SUBSTITUTE($A2," ",""),1+(ROW(INDIRECT("1:"&1+LEN($A2)-
LEN(SUBSTITUTE($A2,"-",""))))-1)*3,2),COLUMN()-COLUMN($A2))

__._,_.___
+-:: XL-mania ::::::::::::::::::::----------------------------------+
| Momods lagi hanimuuunnn...                                        |
| http://www.facebook.com/group.php?gid=37671048001&ref=mf          |
+-------------------------------------------------------------------+
| DILARANG : MLM, money game, OOT, iklan tanpa izin, SARA, testing, |
| pembicaraan pribadi, one line message,  melecehkan,  tidak sopan. |
+-------------------------------------------------------------------+
| Buat subjek yang kreatif, jangan : "tanya", "help", "mohon bantu" |
| Usahakan besar attachment < 200 kb. Gunakan  winzip  jika  perlu. |
+-------------------------------------------------------------------+
| Ajak teman-teman Anda bergabung dengan mengirim e-mail kosong ke  |
| XL-mania-subscribe@yahoogroups.com atau kirimkan mereka file dari |
| http://groups.yahoo.com/group/XL-mania/files/Promotion/           |
+-------------------------------------------------------------------+
| Berikan testimoni di : http://www.friendster.com/xlmania atau...  |
| http://www.xl-mania.com/2008/06/testimoni-xl-mania.html           |
+-------------------------------------------------------------------+
| Message lama ada di :                                             |
| http://groups.yahoo.com/group/XL-mania/messages [perlu yahoo id]  |
| http://www.mail-archive.com/xl-mania@yahoogroups.com              |
+-------------------------------------------------------------------+
.

__,_._,___

Arquivo do blog