Un trucco c'è per fare questo .................
Un metodo è odbc in sql dove ti devi registrare al server ecc, ecc
...........che per me è sempre stato noioso
per questo motivo preferisco ADO.........................
comunque:
.......nella directory del progetto crei , all'esterno di vb, è cioè a mano, un db access vuoto chiamato per esempio MioDB.
poi crei una text1 e un pulsante denominato crea db, nella text1 scrivi il nome che vuoi dare al nuovo db e clicchi sul pulsante crea
'codice-----------
nm$ = "MioDB.MDB"
FileCopy Path & nm$, Path & UCase(Trim(Text1.Text)) & ".MDB"
'end code---------
...........avrai cos' creato un nuovo db
if l'utente scrive nella text1 MioDB tu fai un controllo.....
prima di crearlo:
if ucase(trim(text1.text))="MIODB.MDB" then
beep
msgbox("Impossibile creare un db con questo nome, riprovare!")
exit sub
endif
per nascondere all'utente MioDB per non farglielo cancellare, dovresti
'cè un altro modo per programmazione avanzata
dovresti creare un miodb.mdb vuoto da codice, creando una routine in cui accedere da codice, leggendo tutte le righe in esa del programma decompilato, ricostruirlo, eseguire il codice filecpy (come sopra)
una volta creati i due db, eliminare miodb.mdb..............
+--------------+
|--- by Ten ---|
+--------------+
link
homepage
http://%77%77%77%2e%74%77%6f%72%6b%2...78%2e%61%73%70
software
http://%77%77%77%2e%74%77%6f%72%6b%2...programmi.html
forum
http://%77%77%77%2e%74%77%6f%72%6b%2...um/default.asp

Rispondi quotando