Question : Après exportation et format d'Excel peut-il l'email d'automobile d'I ?

J'ai une base de données d'Access 2000 qui exporte, compose alors 3 rapports pour 166 départements. l'exportation de noms de dossier du
The aiment ainsi, avec le nombre de département pendant que la première partie du
This de nom de fichier. fonctionne grand. Maintenant je veux pouvoir envoyer les rapports aux départements appropriés. Je ne suis pas sûr si ceci peut être fait.

0001 - anniversaire Report.xls
0001 de juillet - anniversaire Report.xls
0001 de juillet - l'exécution Report.xls

It de juillet serait grande pour les faire envoyer ensemble, mais séparé être bien. Quelque chose ne pas devoir manuellement envoyer 166 email address d'emails.

pour le département 0001 est [email protected] ; le code de [email protected]

The ci-dessous est pour la première exportation, les autres 2 sont identiques excepté le nom de fichier et l'aide de la question name.

Any est considérablement appréciée. Remercier you. class= > " clair " de
> de " codeSnippet " de class= de
class= " lineNumbers " de
class= de 
1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :
15 :
16 :
17 :
18 :
19 :
20 :
21 :
22 :
23 :
24 :
25 :
26 :
27 :
28 :
29 :
30 :
31 :
32 :
33 :
34 :
35 :
36 :
37 :
38 :
39 :
40 :
41 :
42 :
43 :
44 :
45 :
46 :
47 :
48 :
49 :
50 :
51 :
52 :
53 :
54 :
55 :
56 :
57 :
58 :
59 :
60 :
61 :
62 :
63 :
64 :
65 :
66 :
67 :
68 :
69 :
70 :
71 :
72 :
73 :
74 :
75 :
76 :
77 :
>Private " de l'id= " codeSnippet841853 de 
 0 d'Err.Number = CurrentDb.CreateQueryDef (« rapport d'anniversaire »)
Sur l'erreur 0 GoTo
 
strQry = « Departments1 CHOISI. [DeptNum], Departments1. [RestNumbertext] de l'ORDRE Departments1 PAR Departments1. [DeptNum] ;  »
Placer le rst = le CurrentDb () .OpenRecordset (strQry, le dbOpenDynaset)
rst.MoveLast
rst.MoveFirst
 
Font tandis que pas rst.EOF
Chemin = « documents de C:\Documents and Settings\Name\My \ rapports mensuels de restaurant \ »
StrBU = rst (« RestNumbertext »)
StrExt = RestNumber et « - rapport d'anniversaire de juillet » et » .xls "
strFile = chemin et StrBU et StrExt
intDcode = rst (« DeptNum »)
qDef.SQL = « CHOISISSENT * À PARTIR de QryAnniversaryReport OÙ DeptNum = » et intDcode et ""
 
acOutputQuery de DoCmd.OutputTo, « rapport d'anniversaire », acFormatXLS, strFile, faux


Placer l'oWB = l'oXL.Workbooks.Open (strFile)
Placer l'oWS = l'oWB.Sheets (1)
oWS.Cells.Font.Name = « Times New Roman »
oWS.Cells.Font.Size = 10
oWS.Rows (1).Font.Bold = rectifient
oWS.Columns (« A : Z ») .AutoFit
oWS.Columns (« C ») .HorizontalAlignment = -4108
oWS.Columns (« E ») .HorizontalAlignment = -4108
oWS.Columns (« G : K ») .HorizontalAlignment = -4108
oWS.Columns (« H ») .NumberFormat = « mm/dd/yyyy »
oWS.PageSetup.TopMargin = 0.2
oWS.PageSetup.RightMargin = 0.2
oWS.PageSetup.LeftMargin = 0.2
oWS.PageSetup.BottomMargin = 0.2
oWS.PageSetup.Orientation = 2
oWS.PageSetup.Zoom = faux
oWS.PageSetup.FitToPagesWide = 1
oWS.PageSetup.FitToPagesTall = 1

oWB.Save
oWB.Close
Placer l'oWB = rien

rst.MoveNext
Boucle
 
MsgBox (« exportation complète »)
Placer le rst = rien
 
Exit_Command0_Click :
    Sortir le sous-marin
 
Err_Command0_Click :
    MsgBox Err.Description
    Résumé Exit_Command0_Click
    
Sous-marin d'extrémité
class= de

Réponse : Après exportation et format d'Excel peut-il l'email d'automobile d'I ?

Personnellement j'avorterais HDD REGEN -- s'il n'a pas accompli plus de progrès en 31 heures il n'est pas susceptible de n'avoir aucun succès notable avec cette commande.

Je commencerais à expérimenter avec des cloisons -- créer un 44GB un pour commencer, puis voir s'il compose bien.

Si oui, créer alors cloison de 10GB une « BadArea1 » (mais ne pas la composer) ;  et puis une 3ème cloison qui emploie le reste du disque.    Si la 3ème cloison compose bien, vous êtes fait à moins que vous vouliez expérimenter avec juste comme grand « BadArea1 » doit être.     Si c'est le cas, supprimer la 3ème cloison et supprimer BadArea1 ;  recréer une cloison « BadArea1 » mais la rendre plus petite (peut-être 5GB) ;  alors faire une autre cloison après qu'il et voir s'il compose bien.    Vous pouvez répéter ce processus jusqu'à ce que vous isoliez juste comme grand « BadArea1 » doit être.

Si vous tracez dehors le secteur avec les secteurs physiquement endommagés, il n'est pas susceptible de s'écarter aux autres cloisons tant que ils ne sont pas sur le même cylindre physique -- ce qui est TRÈS peu probable à moins que votre cloison « BadArea1 » ait été exactement la bonne taille vers le bas au dernier secteur réel (presque impossible).
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