hehehe.. pake program :)
On Tue, Sep 6, 2011 at 10:29 AM, Edy <murid.belajaraccess@yahoo.co.id> wrote:
Silahkan taruh ini di module.
lalu jalankan.
Gunanya untuk menghilangkan tulisan "dbo_" tsb.
Sub RenameDBO()
For Each tbl In CurrentDb.TableDefs
If Left(tbl.Name, 4) = "dbo_" Then
NewName = Trim(Replace(tbl.Name, "dbo_", ""))
DoEvents
DoCmd.Rename NewName, acTable, tbl.Name
End If
Next
End Sub
Semoga bermanfaat.
Edy Wiyono
------------------------------------
SPAM IS PROHIBITEDYahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/belajar-access/
<*> Your email settings:
Individual Email | Traditional
<*> To change settings online go to:
http://groups.yahoo.com/group/belajar-access/join
(Yahoo! ID required)
<*> To change settings via email:
belajar-access-digest@yahoogroups.com
belajar-access-fullfeatured@yahoogroups.com
<*> To unsubscribe from this group, send an email to:
belajar-access-unsubscribe@yahoogroups.com
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
Haer Talib
RumahAccess Indonesia
Tempatnya Belajar Microsoft Access
Artikel | Forum | Milis | Download | Training | Links | Blog | Event
__._,_.___
SPAM IS PROHIBITED
MARKETPLACE
.
__,_._,___
Tidak ada komentar:
Posting Komentar