28. maj 2004 - 18:37Der er
7 kommentarer og 1 løsning
linieskift problemer i importerede data
Jeg importerer data til Access fra Oracledatabase og får her et tegn for linieskift der ligner et rektangel. Er der nogen der kan hjælpe med at finde en løsning der kan lave dette tegn om til et linieskift i Access så det kan ses i rapporter dannet på rundlag af disse data. Access forstår tydeligvis ikke at et rektangel fra Oracle er et linieskift. Kan det evt. løses med et stykke visual basic kode i forbindelse med dannelse af rapporter i "Detaljesektion_Print()" procedure?
Først skal du have identificeret reaktanglet. Det gør du ved at markere det og kopiere (ctrl+C).
I din rapport, kan du lave en forespørgsel, baseret på tabellen (hvis du ikke allerede har det), hvor du laver det aktuelle felt om ved at lave en ny kolonne:
NytFelt: Replace([Dit gamle felt];"█";chr(13) & chr(10))
Dette nye felt skulle nu have rigtige linieskift i.
hmm Eksperten erstattede lige mit reaktangel med "█" Ideen var, at der skulle stå: NytFelt: Replace([Dit gamle felt];"[reaktangel]";chr(13) & chr(10))
Hvorfor skal jeg kopiere rektanglet? og hvor vil du jeg skal indsætte det?? Og der hvor jeg skal indsætte "replace" - er det direkte i forespørgslens SQL eller er det i visual basic?
Jeg er vist ikke helt med på hvor vi er?? Jeg formoder du mener, at jeg i en visual basic procedure skal lave en sætning som den du viser ovenfor? Men det slipper jeg ikke heldigt fra.. Syntax error... Kan du se hvad det er jeg gør galt???
Private Sub Gruppehoved1_Print(Cancel As Integer, PrintCount As Integer) If [FILENAME] <> "" Then Me![Billede].Picture = "h:\Bs_pict\" & [FILENAME] End If
Nej, jeg mener, at det kan klares lettest uden Visual Basic. Det hele sker i den forespørgsel, som du skal bruge til rapporten.
SQL'en til forespørgslen skal se nogenlunde således ud:
Select *, Replace([Ditfelt],"[Rektangel]",chr(13) & chr(10)) as NytFelt From [Din importerede tabel]
Alternativt kan du erstatte alle reaktangle i tabellen med chr(13) & chr(10) inden udskriften (det er måske det optimale?) Det gør du ved at køre denne forespørgsel én gang: Update [Din importerede tabel] Set [Ditfelt] = Replace([Ditfelt],"[Rektangel]",chr(13) & chr(10))
[Rektangel] erstattes med det symbol, som er forkert i tabellen.
Du skal klikke på mit navn i boksen til venstre før du klikker på Accepter-knappen (det er utroligt, at de ikke laver det om - der er så mange, som ikke kan acceptere, fordi der ikke er bedre information)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.