Questione : Aprire l'immagine della chiazza da SQL in VB.Net

Sto tentando di aprire una lima del pdf immagazzinata nella colonna di immagine di sql. Il codice sotto gli impianti benissimo, a meno che debba specificare un indice per conservare la lima dentro. Come posso aprire appena la lima e dò all'utente l'aperto/salvo la finestra di dialogo invece di precisazione dell'indice? il

oscura il da come nuovo
del _
di SqlDataAdapter (“selezionare * a partire dai docimages dove doc_number = “„ & MyDoc & “„ “, imbroglione) oscura MyCB come SqlCommandBuilder = nuovo
ds fioco di SqlCommandBuilder (da) come nuovo
da del

Con.Open di gruppo di dati () (). Riempire (ds, “docimages„) il
oscurano il myRow come il myRow di DataRow
= ds. Tabelle (“docimages„). 0)

di Rows (oscurano MyData () come Byte
MyData =
K fioco del myRow (“immagine„) come Long


'fs fioco di UBound = di K (MyData) come nuovo FileStream (
fs fioco del

come nuovo
'fs del _
(" C:\Adode\test.pdf„, FileMode.OpenOrCreate, FileAccess.Write) di FileStream. Colto (MyData, 0, K)
fs. Scrivere (MyData, 0, K)
fs. Chiudere () il

fs = Nothing
MyCB = Nothing
ds = Nothing
il da = imbroglione di Nothing

. Chiudere () il
= Nothing
MsgBox (“immagine richiamata„) class= del

Risposta : Aprire l'immagine della chiazza da SQL in VB.Net

Ciao, occ_user.

Ciò non può essere fatta con una regola.  Le regole infornano soltanto quando un messaggio è ricevuto o dopo che ha trasmesso.  Ciò richiede una macro.  La macro è abbastanza semplice, ma dovrà essere assegnata ad ogni calcolatore.  La prospettiva non ha mezzi automatizzati di distribuzione delle macro.  Lo spiegamento della macro dovrà essere fatto manualmente.  Più calcolatori ci è nell'organizzazione il più di un dolore che questo diventa.  Inoltre, un utente di buon senso potrebbe spegnere la macro.

La divagazione di cui sopra, qui è la macro.  Seguire queste istruzioni usarla.

Prospettiva 2007
1.  Iniziare la prospettiva
2.  Scattare gli attrezzi > la macro > il redattore del Visual Basic
3.  Se non già in espansione, ampliare gli oggetti di prospettiva di Microsoft Office e scattare sopra ThisOutlookSession
4.  Copiare il codice dalla scatola del frammento di codice ed incollarlo nella lastra di vetro destra della finestra del redattore di VB della prospettiva
5.  Pubblicare il codice come stato necessario.  Ho compreso le linee di commento laddove che qualcosa ha bisogno di o che può cambiare
6.  Scattare l'icona del dischetto sull'tavoletta porta-utensili per conservare i cambiamenti
7.  Chiudere il redattore di VB
8.  Scattare gli attrezzi > il centro di fiducia
9.  Scattare la sicurezza a macroistruzione
10. Fissare la sicurezza a macroistruzione “agli avvertimenti per tutte le macro„
11. Scattare l'APPROVAZIONE
12. Chiudere la prospettiva
13. Iniziare la prospettiva.  La prospettiva visualizzerà un avvertimento della dialogo-scatola che ThisOutlookSession contiene le macro e chiedere se volete permetterli di funzionare.  Dire sì.


Prospettive 2003 e più in anticipo
1.  Iniziare la prospettiva
2.  Scattare gli attrezzi > la macro > il redattore del Visual Basic
3.  Se non già in espansione, ampliare gli oggetti di prospettiva di Microsoft Office e scattare sopra ThisOutlookSession
4.  Copiare il codice dalla scatola del frammento di codice ed incollarlo nella lastra di vetro destra di
5.  Finestra del redattore di VB della prospettiva
6.  Pubblicare il codice come stato necessario.  Ho compreso le linee di commento laddove che qualcosa ha bisogno di o che può cambiare
7.  Scattare l'icona del dischetto sull'tavoletta porta-utensili per conservare i cambiamenti
8.  Chiudere il redattore di VB
9.  Scattare gli attrezzi > la macro > la sicurezza
10. Fissare il livello di sicurezza al mezzo
11. Chiudere la prospettiva
12. Iniziare la prospettiva
13. La prospettiva visualizzerà un avvertimento della dialogo-scatola che ThisOutlookSession contiene le macro e chiedere se volete permetterli di funzionare.  Dire sì.
1:
2:
3:
4:
5:
6:
7:
8:
9:

Application_ItemSend secondario riservato (articolo di ByVal come oggetto, annullamento come booleano)
    Se Item.Class = olMail allora
        Se InStr (1, Item.Subject, “: ") allora
            “Pubblicare il messaggio d'avvertimento ed il titolo sulla linea seguente come stata necessaria.„
            il msgbox “l'oggetto contiene i due punti.  Rimuoverlo prego ed allora trasmettere ancora. „, vbCritical + vbOKOnly, “politica di azienda„
            L'annullamento = allinea
        Concluder se
    Concluder se
Concludere il sommergibile
Altre soluzioni  
 
programming4us programming4us