Question : Forme modale de JQuery

Recherche du code modal de jquery.  Vouloir fondamentalement pouvoir mettre un imprimé spécial dans un format modal.  le

I peut faire des recherches de google comme le prochain type, veuillez ainsi répondent seulement à si vous avez l'expérience faire this.

Note : Je ne suis pas nouveau au Javascript mais à l'AM nouveaux à jquery.

class= de

Réponse : Forme modale de JQuery

> comment peux je placer si la quantité > 0 dû et après 30 jours de date de facture
ajouter >0 à la colonne d'amountdue et <>            OÙ (((AmountDue) >0) ET ((DateDue)<> e (), - 30))))

Pour envoyer l'email. vous pourriez courir le code toutes les fois que vous ouvrez la base de données, quand vous ouvrez une forme spécifique, quand vous cliquez un bouton ou même l'appelez d'un macro et employez une tâche programmée de l'envoyer à un instant spécifique. Dépend de la façon dont vous voulez le faire.

Pour le code. voici un exemple simple. modifiant une partie du code d'autres ont signalé. Coller ces deux fonctions dans un module dans votre base de données et éditer la fonction « YourSavedQueryName » changeant de SendReport au nom réel de votre question et « [email protected] » à votre email address aussi bien que toute autre chose (tel que des noms de champ) ces a besoin changé. Appeler alors la fonction de SendReport de partout où vous voudriez (comme dessus un clic de bouton ou d'un macro) envoyer le rapport.

Fonction publique OutlookSend (MailUser de ByVal comme corde, ByVal MsgSubject comme corde, ByVal msgbody comme corde) comme booléen
Faible appOutLook comme Outlook.Application
Faible MailOutLook comme Outlook.MailItem
Sur l'erreur ErrHandler GoTo

Sinon "" d'IsNull (MailUser) et <> de MailUser alors

Placer l'appOutLook = le CreateObject (« Outlook.Application »)
Placer MailOutLook = appOutLook.CreateItem (l'olMailItem)
Destinataire = MailUser
Avec MailOutLook
. À = destinataire
. Sujet = MsgSubject
. Corps = msgbody
.DeleteAfterSubmit = vrai 'ceci laisserait des perspectives envoyer la note sans la stocker dans votre casier envoyé
. Envoyer
Finir avec

Placer MailOutLook = rien
Placer l'appOutLook = rien

Finir si 'pas IsNull (MailUser)

ExitHere :
Sortir la fonction

ErrHandler :
  Choisir le cas Err.Number
Affaire 0
   
    Résumé ExitHere

Cas autrement

    MsgBox « erreur » et Err.Number et « (" et Err.Description et ") dans OutlookSend »

Extrémité choisie
Fonction de fin





Fonction publique SendReport ()

   
    Faible MyMsgBody, MySubject, MyMailAddress comme corde
    Faible ItemCount comme nombre entier
    Sur l'erreur ErrHandler GoTo

Si DCount (« * », « YourSavedQueryName ») > 0 puis


Faibles dbs comme base de données, rst comme DAO.Recordset

    Placer les dbs = le CurrentDb
    Placer le rst = le dbs.OpenRecordset (« YourSavedQueryName »)

rst.MoveFirst
ItemCount = 0
Faire jusqu'à rst.EOF
item1 = rst ! AmountDue
item2 = rst ! WorkOrder
item3 = rst ! [Date de facture]
MyMsgBody = MyMsgBody et item1 et vbTab et item2 et vbTab et item3 et vbCrLf
ItemCount = ItemCount + 1
rst.MoveNext
Boucle
rst. Fin

MyMailAddress = « [email protected] »
MySubject = « rapport dû de factures :  » Et ItemCount et « articles »

Sinon le "" d'IsNull (MyMsgBody) et <> de MyMsgBody rouissent alors = OutlookSend (MyMailAddress, MySubject, MyMsgBody)

Finir si


ExitHere :
Sortir la fonction

ErrHandler :
  Choisir le cas Err.Number
Affaire 0
   
    Résumé ExitHere

Cas autrement

    MsgBox « erreur » et Err.Number et « (" et Err.Description et ") dans SendReport »

Extrémité choisie
Fonction de fin
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
  •  Winzip 12 issues de secours du travail ?
  •  
    programming4us programming4us