Un site qui utilise ASP et MDB, un certain MDB utilise une table de liens et se lie à une autre table MDB dans le répertoire actuel, afin que le partage de données puisse être réalisé.
Le problème arrive. Lors de la publication du site Web sur le site Web, le chemin d'espace en ligne est différent de ma machine native, donc le tableau des liens échoue et la page Web ne peut pas être ouverte.
Je pense que la solution est:
L'une consiste à créer une structure de répertoire qui est exactement la même que l'espace en ligne sur la machine. Mais cela est très gênant, surtout si vous devez souvent changer le site Web.
Une façon consiste à faire en sorte que la table de liaison utilise un chemin relatif, qui est de créer un lien vers le fichier MDB dans le répertoire actuel? (Soit dit en passant, l'accès est très retardé mentalement et la table de liaison enregistre le chemin absolu).
Une autre façon est de savoir comment modifier le lien de la table de liaison via la programmation (ASP ou VBA local)? (Soit dit en passant, l'accès est toujours mentalement retardé. Je ne peux utiliser que des mises à jour manuelles pour mettre à jour le tableau des liens. Vous devez trouver le MDB sous ce chemin! Mais le chemin local est différent de celui en ligne)
Quelqu'un peut-il me dire comment implémenter les deux dernières méthodes ci-dessus?
--------------------------------------------------------------------------------------------------------------------------------
Ce qui suit est le code ADOX que j'utilise, juste pour prouver que l'accès que j'ai mentionné a cette fonction (pour le dire franchement: est-ce une question d'accèsp? Ceux qui accédent à la programmation doivent le comprendre. Si vous ne pouvez pas le comprendre, je ne peux que dire des regrets.
PublicFunctionNewLinkEdExternalTableMDB ()
Dimstrtargetdb () asstring
Dimstrproviderstring () asstring
Dimstrsourcetbl () asstring
DimstrLinktblname () Asstring
Dimcatdbasadox.catalog
Dimtblinkasadox.Table
Dimtmplinkasadox.able
Dimiasinteger
Dimjasinteger
SetCatdb = newadox.catalog
CatDb.ActiveConnection = CurrentProject.Connection
i = catdb.tables.Count
Redimstrtargetdb (i)